Office 2016 Fortschrittsbalken während der Berechnung x-beliebigen Makros

[whiteb3ard]

Hallo Office-Forum,

im Internet habe ich bereits mehrere angebotene Lösungen für einen Fortschrittsbalken gefunden. Obwohl ich die Codes per Schritt-für-Schritt-Anleitung (über YouTube und Google) nachgebaut habe, hat das Ganze bei mir nicht funktioniert. Bzw. habe ich den Eindruck, dass ich was anderes brauche, als mir angeboten wurde.

Zum Fall: Ich kenne mich mit VBA kaum bis gar nicht aus. Deshalb zeichne ich Makros immer auf. Ich habe ein aufgezeichnetes Makro, das mir lediglich eine Formelzeile markiert, die Formeln per Doppelklick einmal bis zum letzten Datensatz hinunterzieht sowie anschließend die Formelergebnisse kopiert, als Werte einfügt und die oberste Formelzeile stehen lässt.

Dieses Makro dauert ein wenig. Und ich würde mir gerne den Berechnungsfortschritt, der ja auch unten rechts in der Ecke angezeigt wird (Berechnung (4 Prozessoren)), als VBA-basierten Fortschrittsbalken anzeigen lassen.

Ich wäre Euch super verbunden, wenn ihr mir helfen könntet. Ich danke vielmals im Voraus!

[maninweb]

Hallo,

Während Excel mit etwas beschäftigt ist, kannst Du keinen Fortschritt per VBA anzeigen. Beispiel: angenommen, Dein Makro führt
das AutoAusfüllen aus. Excel ist dann damit beschäftigt, ein Fortschritt kann nicht angezeigt werden, z.B. weil es länger dauert.

Was aber sehr wohl geht, ist den Fortschritt zwischen einzelnen Schritte anzuzeigen, also in etwa so ...

- Fortschrittsbalken Pos. 1 per Code
- Markieren Formelzeile per Code
- Fortschrittsbalken Pos. 2 per Code
- AutoAusfüllen per Code
- Fortschrittsbalken Pos. 3 per Code
- Kopieren per Code
- Fortschrittsbalken Pos. 4 per Code
- Einfügen per Code
- Fortschrittsbalken Pos. 5 per Code

Genauso wäre es dann im Code. Du musst dann pro Schritt den Fortschrittsbalken (oder Text) zwischen den einzelnen
Schritten aktualisieren.

Gruß

[RPP63]

Moin!
Du könntest natürlich auch mal Deine (gekürzte, aber alle Formeln beinhaltende) Datei hier hochladen.
Dein aufgezeichnetes Makro sollte dabei sein.
Ich kann mir gut vorstellen, dass Du nach unserer Überarbeitung keinen Fortschrittsbalken mehr brauchst.
Du würdest ihn wahrscheinlich kaum bewusst sehen …

Gruß Ralf

[whiteb3ard]

Hallo,

bitte entschuldigt meine späte Antwort. Leider war ich privat stark verhindert. Vielen lieben Dank für das schnelle Reagieren!

Ich habe mal kurzer Hand meine Tabelle mit sinnfreien Einträgen nachgebaut und auf das Nötigste reduziert, da ich die vertraulichen Daten schützen muss. Mein Makro befindet sich - wie in meiner Originaldatei - auf dem Objekt "aktualisieren".

Ich bin super gespannt auf Eure Antworten und danke Euch vorab für Eure Mühen.

LG

[maninweb]

Hallo,

ein Fortschrittsbalken würde hier nicht viel bringen, denn Du kannst nicht den Fortschritt einer Berechnung anzeigen bzw. abfangen.
Deine ZÄHLENWENNS Formel ist elendig langsam, was daran liegt, dass Du die gesamten Spalten aus Input abfragst. Das kannst
Du dynamisch beschränken, indem Du eine intelligente Tabelle verwendest. Wenn Du nicht weisst, was das ist, dann google
mal nach dem Stichwort "Excel intelligente Tabelle". Auch codemäßig lässt sich noch was optimieren.

Beispieldatei anbei, Intelligente Tabelle, Makro aktualisieren2. Insgesamt deutlich schneller.

Gruß

[whiteb3ard]

Hi,

wow, das geht tatsächlich sehr viel schneller! Ich danke dir! Allerdings habe ich hier noch folgendes Problem:

Deine Formel bzw. dein Makro geht nur bis zur 2426. Zeile. Bei meinem aufgezeichneten Makro konnte ich per Doppelklick auf die untere rechte Ecke der markierten Formelzeile die Formel so weit runterziehen, wie ich links noch Datensätze hatte. Die Anzahl der Datensätze wächst bei mir nämlich kontinuierlich.

Zudem habe ich mittlerweile (siehe Datei im Anhang) in meinem aufgezeichneten Makro vor diesem Doppelklick die markierte Formelzeile zunächst erstmal nur eine Zeile runtergezogen. Das hat den Hintergrund, dass ich in der Zelle B2 ein "Bitte warten" ausgeben lasse, sobald in der Zelle C8 eine Formel hinterlegt ist. Und sobald ich alle errechneten Zeilen mit Werten ersetze und damit auch die Zelle C8 keine Formel mehr enthält, wird mir in B2 ein "Bereit" ausgegeben. Damit habe ich quasi den Fortschrittsbalken ersetzt, der sich nicht realisieren lässt.

Wenn du dies mit deiner neuen Formel nachstellen könntest - also dein Makro die Formelzeile zunächst nur eine Zeile und danach bis zum letzten Datensatz runterzieht und dann alles bis auf die Formelzeile durch Werte ersetzt - dann haben wir alles und ich schließe dich in meine Gebete ein.

Ich danke dir!

LG

[maninweb]

Hallo,

Du hast anscheinend dieselbe Beispieldatei hochgeladen, wie die aus dem ersten Beitrag.
Besser wäre die Datei, die Du bearbeitet hast.

Gruß

[whiteb3ard]

Hi,

hmm.. nein, das ist die neue Datei, die ich hochgeladen habe. Ich habe sie gerade extra nochmal heruntergeladen und es überprüft.. Könntest du bitte noch einmal schauen? Ich danke dir!

[maninweb]

Hallo,

sorry, also bei mir sieht die so aus, wenn ich die runterlade. Da sind z.B. meine Änderungen nicht drin.

Gruß

[whiteb3ard]

Hi,

ja, genau. Sorry, ich hab mich nicht verständlich genug ausgedrückt.

Also hochgeladen habe ich tatsächlich meine eigene neue Version, um dir quasi zu veranschaulichen, welche Funktion ich gerne hätte - sprich, dass die Formelzeile zunächst nur eine Zeile und danach bis zum letzten Datensatz gezogen wird. Exakt das alles macht mein aufgezeichnetes Makro, aber halt super-langsam, wie du selbst festgestellt hast.

Deine Datei mit deinem klügeren Makro habe ich aus dem einfachen Grund nicht bearbeitet, da ich nicht weiß, wo ich da rumdoktern muss. Deshalb also nochmal die Bitte, dass du erneut mein Makro professioneller machst, basierend auf dieser zuletzt hochgeladenen Datei.

Ich danke dir vielmals!

[maninweb]

Hallo,

meine Motivation, dasselbe nochmal zu machen, hält sich sehr in Grenzen.

Gruß