Bruk " Timer" -funksjonen for å måle medgått tid i Visual Basic for Applications ( VBA ) . Det returnerer antall sekunder som har gått siden midnatt . Du kan bruke den til benchmark eller måle den totale kjøretiden til en VBA-funksjon . Ved å tilordne en variabel til å ta et "øyeblikksbilde " av timer ved starten og slutten av koden din , og deretter måle forskjellen mellom dem, kan du få antall sekunder det tok for din funksjon å utføre. Ved å sette output format tilsvarende, kan du få resultater opp til hundredeler av et sekund. Instruksjoner
en
Start Microsoft Office-program som du bruker å kjøre VBA-funksjon . Trykk "CTRL + O ", velg det dokumentet som inneholder koden din og klikk på " Åpne".
2
Trykk " ALT + F11 " for å åpne Visual Basic-redigering ( VBE ) . I "Project Explorer " panel , dobbeltklikker du på navnet på modulen som inneholder din funksjon
3
Sett inn følgende kode rett etter den første linjen i funksjon din : .
StartTime = Timer ( )
4
Sett inn følgende kode før linjen som sier " End Function " eller "End Sub " : en
endtime = Timer ( )
msg = " Running tid :" & Chr ( 13 ) & _
Format ( endtime - StartTime , " 0.000 s ")
MsgBox msg , vbInformation
5
Trykk "CTRL + S " for å lagre koden og dokumentere.
6
Trykk " F5 ", velg navnet på din funksjon fra listen, og klikk deretter på "Kjør". Etter din funksjon fullfører sitt trinn , vil en liten meldingsboks deretter vise sin driftstid . Klikk " OK " for å lukke det .