Office: Progressbar / Application-Anzeige

Hallo.
Ich habe ein Programm in VBA erstellt, dass Berechnungen vornimmt.
Diese Berechnungen dauern manchmal lange, da auch grosse Exceldateien benutzt werden.
Nun sieht der Benutzer während das Programm arbeitet nur die “Wasseruhr“ oder den Hinweis „Keine Rückmeldung“.
Damit der Benutzer weiss, dass das Programm noch läuft, will ich eine Progressbar oder andere Anzeige parallel laufen lassen, also die Bar im Vordergrund und die Berechnung im Hintergrund. Allerdings weiss ich nicht, wie lange das Programm läuft, so dass die Progressbar eventuell wieder angestoßen werden müßte, also „endlos“ laufen müsste, bis das Programm beendet ist.
Zu meinem Leidwesen habe ich mit Progressbar or Applications für Anzeigen noch nicht gearbeitet.
Könnt Ihr mir bitte Hinweise geben, wo man das ordentlich erklärt lernen kann bzw. mir sagen wie ich vorgehen , was ich programmieren muss.
Vielen Dank.
Gruss

saxopraxo

:)

 

Hallo saxopraxo,

abgesehen davon, dass dieses Thema in den letzten Tagen hier mehrfach behandelt wurde: Hast Du den Code bereits so optimiert, dass die Wartezeit minimiert wird?

Grüße
EarlFred

 

Hallo saxopraxo,

zur Progressbar habe ich dir mal eine Datei angehängt.
So baue ich mir die Progressbar auf. und bringe dann den Code (den ich markiert habe) an einer sinnvollen stelle im Makro ein.

Gruß
Marc

 

Hallo Leute,

danke für die Antworten.
Wo mir auch noch das Verständnis fehlt, wie ich es anstellen, dass die Berechnung und die Bar parallel laufen.
Oder wird die Bar am Anfang der Berechnung gestartet und wenn die Berechnung beendet ist, dann auch beendet?
Da EarlFred sagt, das das Thema schon mehrfach vorkam in den letzten Tagen, nach "Progressbar" suchen lassen im Forum?
Wisst ihr eine gute Beschreibung über die Applications?
@MCK_H: danke für das Beispiel
Danke.

Gruss

saxopraxo

 

Hallo saxopraxo,

was für Applications meinst Du?

Hier oder im gesamten Netz, ja. Es gibt schon so viele Themen und Lösungen dazu.

Nicht jede Lösung passt womöglich auf Deinen Code. Manche Vorgänge arbeiten ohne Schleife und brauchen dennoch Zeit - da hast Du keinen Anhaltspunkt, den Fortschrittsbalken weiter laufen zu lassen. Hier könnten einfache Hinweisfenster sinnvoller sein ("bitte etwas Geduld...")

Andererseits braucht sowas auch Rechenleistung - da sollte man schauen, ob es sinnvoll ist, den Balken bei jedem Rechenschritt mitlaufen zu lassen oder lieber nur alle 10, 100, 1000 oder gar 10000 Durchläufe.

Daher auch meine Frage nach der Zeitoptimierung Deines Codes: Erst, wenn die Möglichkeiten hier ausgereizt sind, würde ich mir Gedanken um Fortschrittsbalken machen.

Grüße
EarlFred

 

Hallo EarlFred,

als Hinweissschilder "Bitte etws Geduld..." kenne ich nur die Msgbox. Die muss aber quittiert warden und halt das Programm an. Es müsste eine Anzeige sein, die beim Start "auspoppt" und wenn die Berechnung beendet ist, dann wieder verschwindet. Das Programm darf aber nicht unterbrochen werden. Ich hatte gehört ,das geht mit Applicatons zu machen.

Gruss

saxopraxo

 

Hallo saxopraxo,

wenn Du irgendwo in einem Excel-VBA Projekt das Objekt "Application" findest, ist in der Regel die Excel-Instanz gemeint.

Nimm doch eine Userform, in der Du z. B. ein Label platzierst mit dem Hinweis Geduld zu haben und rufe diese auf:

Code:

Grüße
EarlFred

 

Hallo EarlFred,

vielen Dank für die Info und das kleine Programm
Nun ist mir auch einiges klarer geworden.
Es funktioniert :-)

Grüsse

saxopraxo