Conectați-vă cu Microsoft
Conectați-vă sau creați un cont
Salut,
Selectați un alt cont.
Aveți mai multe conturi
Alegeți contul cu care doriți să vă conectați.

Rezumat

Word nu are o metodă încorporate să întârzie executarea unei macrocomenzi, dar soluții poate fi utilizat pentru a realiza acest efect.

Mai multe informații

Microsoft furnizează exemple de programare scop ilustrativ, fără nicio garanţie explicită sau implicită. Aceasta include, dar nu se limitează la, garanţiile implicite de vandabilitate sau de potrivire pentru un anumit scop. Acest articol presupune că sunteţi familiarizat cu limbajul de programare care este prezentat şi cu instrumentele utilizate pentru a crea şi a depana proceduri. Specialiștii în asistență Microsoft pot ajuta la explicarea funcționalității unei anumite proceduri, dar nu vor modifica aceste exemple pentru a furniza funcționalitate suplimentară sau pentru a construi proceduri pentru a răspunde cerințelor dvs. specifice.
Pentru mai multe informații despre cum se utilizează mostre de cod în acest articol, faceți clic pe următorul număr de articol pentru a vedea articolul în baza de cunoștințe Microsoft:

212536 OFF2000: cum se execută mostre de cod din articolele din baza de cunoștințe
Utilizați una dintre următoarele metode pentru a amâna executarea unei macrocomenzi utilizând Visual Basic for Applications.


Metoda 1: Utilizaţi un gol pentru... Următorul buclă

Un dezavantaj la această metodă este că nu există niciun mod direct pentru a determina exact cantitatea de timp în care programul nevoie pentru a executa la curent. Intervalul de timp depinde de viteza de pe computer. Codul următor se execută o buclă care nu face nimic, dar ia ceva timp.

Sub MyDelayMacro

For iCount = 1 to 1000
Next iCount

End Sub

Metoda 2: Utilizaţi un apel API suspenda executarea Word

Utilizați un apel API pentru suspendarea executării Word un interval fix de timp.

Kernel32 conține o funcție care pune în pauză executarea unui program pentru o perioadă specificată de timp, specificată în milisecunde. Pentru a utiliza funcția, trebuie să fie declarate mai întâi în secțiunea General declarațiile de modul în care vor fi utilizate:

   Declare Sub Sleep Lib "kernel32" Alias "Sleep" _
(ByVal dwMilliseconds As Long)

Utilizați următoarea sintaxă pentru a apela funcția de repaus :

Sub Sleep()
Sleep 1000 'Implements a 1 second delay
End Sub

Metoda 3: Utilizați metoda OnTime

Utilizați metoda OnTime pentru a seta o cantitate de timp pentru a întrerupe. Metoda OnTime utilizează următoarea sintaxă:

expression. OnTime (când, nume, toleranță)Deoarece argumentul nume necesită o macrocomandă pentru a executa numele, trebuie să creați două macrocomenzile: prima macrocomandă să conțină apelul metoda OnTime și alte comenzi relevante pentru dvs. de macrocomenzi și al doilea macrocomanda să se execute când a trecut timpul alocat. Al doilea macrocomanda poate fi o macrocomandă "dummy" care nu face nimic.

Acest exemplu se execută macrocomanda denumit "MyDelayMacro" 15 secunde din momentul în care se execută un exemplu.

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

Pentru mai multe informații despre utilizarea metodei OnTime, în editorul Visual Basic, faceți clic pe Ajutor Microsoft Visual Basic , în meniul Ajutor , tastați OnTime metoda în Asistentul Office sau în expert răspuns, și apoi faceți clic pe Căutare pentru a vizualiza subiectul.

Referințe

Pentru informații suplimentare despre obținerea ajutorului pentru Visual Basic for Applications, faceți clic pe următorul număr de articol pentru a vedea articolul în baza de cunoștințe Microsoft:

212623 WD2000: resurse de programare macrocomenzi

226118 OFF2000: programare resurse pentru Visual Basic for Applications

Aveți nevoie de ajutor suplimentar?

Doriți mai multe opțiuni?

Explorați avantajele abonamentului, navigați prin cursurile de instruire, aflați cum să vă securizați dispozitivul și multe altele.

Comunitățile vă ajută să adresați întrebări și să răspundeți la întrebări, să oferiți feedback și să primiți feedback de la experți cu cunoștințe bogate.

Au fost utile aceste informații?

Cât de mulțumit sunteți de calitatea limbajului?
Ce v-a afectat experiența?
Apăsând pe Trimitere, feedbackul dvs. va fi utilizat pentru a îmbunătăți produsele și serviciile Microsoft. Administratorul dvs. IT va avea posibilitatea să colecteze aceste date. Angajamentul de respectare a confidențialității.

Vă mulțumim pentru feedback!

×