< návrat zpět
MS Excel
Téma: sledování změny a posun listu
Zaslal/a PavDD 4.5.2022 9:39
Zdravím.
1.
Mám makro , které na základě nějaké podmínky postupně mění v listu hodnoty v bunkách sloupce, jednu po druhé až do konce seznamu.
Makro pracuje vcelku pomalu , že prvních 20 záznamu, co je viditelných na obrazovce vidím , jak se postupně mění.
Ale jakmile to postoupí pod okraj okna, už nejsou vidět ty změny v reálném čase.
Jde to nějak ošetřit, aby aktuální bunka, se kterou zrovna makro pracuje vždy byla vidět ?...aby se ten lista jako posunoval dolu.
2. Chtěl bych si ve formuláři zobrazit v nějakém posouvajícím se seznamu to stejné, tzn ten průběh. ..že se bude třeba vypisovat :
"provádím výpočet bunky A1"
"provádím výpočet bunky A2"
"provádím výpočet bunky A3" atd
prostě klasické info co dělají běžné programy, když pracují.
Děkuji
JoKe(4.5.2022 11:43)#052635 ad 2) Nestačilo by
Application.StatusBar = "provádím výpočet buňky " & Cells(radek, sloupec).Address(RowAbsolute:=False, ColumnAbsolute:=False)
citovat
PavDD(4.5.2022 12:19)#052636 ..no chtěl jsem to podprobně, jak jsem uvedl. Jestli na to je nějaký mustr...?
citovat
Stalker(4.5.2022 13:48)#052638 Takže Ti nevadí, že makro pracuje pomalu a chceš ho ještě zpomalit?
citovat
JoKe(4.5.2022 14:17)#052639 ad 1)
Cells(radek, sloupec).Select
by mělo odrolovat obrazovku, aby vybraná buňka byla vidět
citovat
PavDD(4.5.2022 15:01)#052640 Nevadí,i tak jede jak rus.
citovat
PavDD(4.5.2022 16:13)#052644 ad 1/ cells(radek, sloupec).Select
můžete mi to aplikovat do příkladu ? Nějak mi to není jasné jak to napsat do makra.
ad 2/ Application.StatusBar = "provádím výpočet buňky " & Cells(radek, sloupec).Address(RowAbsolute:=False, ColumnAbsolute:=False)
můžete mi to aplikovat do příkladu ? Nějak mi to není jasné jak to napsat do makra.
P.
Příloha: 52644_test-stav-a-posun.zip (22kB, staženo 9x) citovat
JoKe(4.5.2022 17:13)#052645 V příloze
Příloha: 52645_test-stav-a-posun1.zip (21kB, staženo 11x) citovat
PavDD(4.5.2022 21:50)#052647 Super .
Jen prosím v té stavové liště, jak se výpočet dokončí, je tam furt napsáno "provádím výpočet buňky C43".
Jak to zase vygumuju?
citovat
Anonym(4.5.2022 22:50)#052648 Application.StatusBar = False
citovat
PavDD(5.5.2022 7:39)#052649