MS Excel

Téma: makro Excel

Zaslal/a lachim 30.3.2010 15:55

Má toto makro:
Sub FILTR_ZOBRAZITVSE()
ActiveSheet.ShowAllData
End Sub
potřebuju, aby se zobrazil MsgBox "Vše zobrazeno" v případě že už je vše zobrazeno (všechny řádky) - nevím jak to tam správně přidat do toho makra.
děkuji

Zaslat odpověď >

Poki(30.3.2010 16:41)#001398

Myslim, ze sis odpovedel sam, takze asi takhle:

Sub FILTR_ZOBRAZITVSE()
ActiveSheet.ShowAllData
MsgBox "Vše je zobrazeno", vbInformation
End Sub

Problem nastane, kdyz se procedura spusti v okamziku, kdy nebude filtrovano (bude tedy vse zobrazeno).citovat