|
VBA - Makrogeschwindigkeit testen |
 |
 |
 |
|
Geschrieben von: Marcus Rose
|
|
Samstag, 18. April 2009 um 22:12 Uhr |
|
Es gibt Situationen, in denen man die Geschwindigkeit eines Makroablaufs testen möchte. Das kann zum Beispiel vorkommen, wenn man ein Makro auf verschiedenen Rechnern testet, oder wenn man einen Makrocode optimieren möchte. Doch wie kann man so etwas bewerkstelligen? Oft wird nach einem Excel Tool für dieses Vorhaben gefragt. Es ist aber kein Excel Tool von Nöten. Was wir benötigen ist ein ganz kleines Makro, welches wir aufrufen:
Option Explicit
Sub Zeitberechnung()
Dim Zeit As Single
Zeit = Timer
Application.ScreenUpdating = False
'Dein Makro
Call Testmakro
'Dein Makro Ende
Application.ScreenUpdating = True
MsgBox "Zeitbedarf: " & Round(Timer - Zeit, 2) & " Sekunden"
End Sub
Als Testmakro dient in unserem Fall:
Sub Testmakro()
Dim i As Variant
For i = 1 To 1000000 Step 0.01
Next
End Sub
|
|
Zuletzt aktualisiert am Samstag, 18. April 2009 um 22:24 Uhr |
VBA Makro Beispiele 