MS Excel

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

Zaslat odpověď >

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ětcitovat

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: zip