Что считается самым точным способом тестирования кода VBA (в моем случае, я тестирую код в Excel)? Существуют ли какие-либо другие методы для бенчмаркинга, кроме второго, и если да, то каковы преимущества/недостатки метода?
Вот два популярных метода.
Во-первых: Таймер
Sub TimerBenchmark()
Dim benchmark As Double
benchmark = Timer
'Do your code here
MsgBox Timer - benchmark
End Sub
И Тик (который я считаю наиболее точным):
Option Explicit
Private Declare Function GetTickCount Lib "kernel32" () As Long
Sub TickBenchmark()
Dim Start As Long
Dim Finish As Long
Start = GetTickCount()
'Do your code here
Finish = GetTickCount()
MsgBox CStr((Finish - Start) / 1000)
End Sub