Toegang krijgen tot de Excel-statusbalk
Wilt u de statusbalk gebruiken om uw eigen tekst of informatie weer te geven terwijl een macro wordt uitgevoerd?
Ga rechtstreeks naar de statusbalk door de eigenschap te gebruiken Toepassing.Statusbalk gebruik maken van. De volgende macro laat zien hoe u dit doet:
Substatusbalk ()
Dim AanUit Als Booleaans
AanUit = Toepassing.DisplayStatusBar
Application.DisplayStatusBar = True
Application.StatusBar = "Mijn bericht …"
'vul hier commando's in'
Application.StatusBar = False
Toepassing.DisplayStatusBar = AanUit
Einde sub
De macro registreert eerst of de statusbalk momenteel wordt weergegeven of verborgen. Vervolgens wordt de balk ingeschakeld en de tekst "Mijn bericht wordt daar weergegeven. De statusbalk wordt dan teruggezet naar de standaardwaarde. De balk wordt dan uitgeschakeld als deze ook was uitgeschakeld voordat de macro werd opgeroepen.
Wanneer u de macro uitvoert, ziet u het nieuwe bericht in de statusbalk:
