ich starte in einer UF die abfolge bestimmter Makros. Ich möchte gern
während der Laufzeit die meldung "Makro läuft, bitte warten...." erhalten.
mit mein untenstehenden Versuch klappt es leider nicht. Hat jemand eine andere Idee?
liebe grüsse thomas
Private Sub CommandButton1_Click()
Application.StatusBar = "Makro läuft, bitte warten...."
Sheets("Filtereinstellungen").Range("B18").Value = CDate(TextBox1.Text)
Sheets("Filtereinstellungen").Range("B19").Value = CDate(TextBox2.Text)
Call Daten_holen
Call Tabelle_ordnen_Modul
Call leerzeilen_loeschen
Unload Me
Application.StatusBar = "fertig"
End Sub