AW: Makros auswerten - Zeit messen
08.02.2016 18:13:02
Daniel
Hi
Im Prinzip so wie es dir Michael gezeigt hat:
am Anfang des zu messenden Programmabschnitts:
MyStart = Timer
hier der Code der auf Laufzeit zu überprüfen ist
Msgbox Timer - MyStart
das muss nicht zwingen am Anfang und Ende eines Makros stehen, dass kann auch mitten drin und mehrfach erfolgen.
Die Ausgabe muss auch nicht zwingend mit einer Messagebox erfolgen, wenn du mehrere Bereiche messen willst und das Makro ununterbrochen durchlaufen soll, du kannst die Zeitwerte auch mit Debug.Print im Direkfenster anzeigen lassen oder in ein Tabellen blatt schreiben:
MyStart = Timer
hier der Code
Debug.Print "Abschnitt 1:", Timer - MyStart
MyStart = timer
hier der Code
Zeile = Zeile + 1
Sheets("Durchlaufzeiten").Cells(Zeile, 2) = Timer - MyStart
Sheets("Durchlaufzeiten").Cells(Zeile, 1) = "Abschnitt 1"
das es dazu was fertiges gibt was du einfach nur answenden brauchst, glaube ich nicht, denn ausser dir kann ja niemand wissen, in welche Abschnitte das Programm sinnvoll geteilt werden muss.
Gruß Daniel