Sammendrag
Word har ikke en innebygd metode til å utsette utføringen av en makro, men løsninger som kan brukes til å oppnå denne effekten.
Hvis du vil ha mer informasjon
Microsoft bruker ment som eksempler, uten garanti, verken direkte eller indirekte. Dette inkluderer, men er ikke begrenset til, eventuelle stilltiende garantier om salgbarhet eller anvendelighet for særskilte formål. Denne artikkelen forutsetter at du er kjent med programmeringsspråket som anvendes, og verktøyene som brukes til å opprette og feilsøke prosedyrer. Microsofts kundestøtteteknikere kan hjelpe deg med å forklare funksjonaliteten til en bestemt prosedyre, men de endrer ikke disse eksemplene for å lage forbedret funksjonalitet eller lage prosedyrer som dekker dine spesifikke behov.
Hvis du vil ha mer informasjon om hvordan du bruker eksempelkoden i denne artikkelen, kan du klikke følgende artikkelnummer for å vise artikkelen i Microsoft Knowledge Base:
212536 OFF2000: hvordan kjøre eksempelkode fra Knowledge Base-artikler
Du kan bruke én av følgende metoder til å utsette utføringen av en makro ved hjelp av Visual Basic for Applications.
Metode 1: Bruke et tomt For... Next-løkke
En ulempe med denne metoden er at det er ingen direkte måte å finne ut akkurat hvor mye tid som programmet tar for å kjøre løkken. Hvor lang tid avhengig av hastigheten på datamaskinen. Følgende kode kjøres en løkke som gjør ingenting, men tar litt tid.
Sub MyDelayMacro
For iCount = 1 to 1000
Next iCount
End Sub
Metode 2: Bruke et API-kall for å stoppe kjøring av Word
Bruk et API-kall for å utsette videre utføring av Word for en fast periode.
Kernel32 inneholder en funksjon som stopper kjøring av et program for en angitt tidsperiode, angitt i millisekunder. Hvis du vil bruke funksjonen, må den først deklareres i delen for generelle deklarasjoner i modulen der den brukes:
Declare Sub Sleep Lib "kernel32" Alias "Sleep" _
(ByVal dwMilliseconds As Long)
Bruk følgende syntaks til å kalle funksjonen hvilemodus :
Sub Sleep()
Sleep 1000 'Implements a 1 second delay
End Sub
Metode 3: Bruke metoden OnTime
Bruk OnTime -metoden til å angi en tidsperiode du vil stoppe. Metoden OnTime bruker følgende syntaks:
uttrykk. OnTime (når, navn, toleranse)Siden navn -argumentet krever navnet på en makro skal kjøres, må du opprette to makroer: den første makroen skal inneholde metodekallet OnTime og andre kommandoer som er relevante for makroen, og den andre makroen kjøres når tildelt tid er passert. Den andre makroen kan være en "midlertidig" makro som ikke gjør noe.
Dette eksemplet kjører makroen kalt "MyDelayMacro" 15 sekunder fra tidspunktet i eksemplet er kjørt.
Sub MyMainMacro()
' Pause for 15 seconds.
Application.OnTime When:=Now + TimeValue("00:00:15"), _
Name:="MyDelayMacro"
End Sub
Public Sub MyDelayMacro()
' Place your delayed macro commands here.
MsgBox "This macro runs after 15 seconds."
End Sub
Hvis du vil ha mer informasjon om hvordan du bruker OnTime-metoden i Visual Basic-redigering, klikker du Hjelp for Microsoft Visual Basic på Hjelp -menyen, skriver inn OnTime-metoden i Office-hjelperen eller svarveiviseren, og klikk deretter Søk for å vise emnet.
Referanser
Hvis du vil ha mer informasjon om hvordan du får hjelp med Visual Basic for Applications, kan du klikke følgende artikkelnummer for å vise artikkelen i Microsoft Knowledge Base:
212623 WD2000: makro programmeringsressurser
OFF2000 226118 : programmeringsressurser for Visual Basic for Applications
