Forsink en makro i Excel VBA

At udføre en sub i Excel VBA efter en bestemt tid, brug onTime, Now og TimeValue funktionen. Først skal du placere en del i et modul.

1. Åbn Visual Basic Editor og klik på Insert, Modul.

2. Tilføj følgende under med navnet påmindelse:

Sub reminder()

MsgBox "Don"t forget your meeting at 14.30"

End Sub

Vi vil have Excel VBA til at udføre denne under 5 sekunder efter at en kommandoknap er klikket.

2. Placer en kommandoknap på dit regneark og tilføj følgende kodelinje:

Application.OnTime Now() + TimeValue("00:00:05"), "reminder"

3. Klik på kommandoknappen på regnearket.

Resultat 5 sekunder senere:

4. Hvis du vil udføre denne under på et bestemt tidspunkt, skal du blot bruge følgende kode linje:

Application.OnTime TimeValue("14:00:00 am"), "reminder"

5. Klik på kommandoknappen på regnearket og vent til 14:00 for at se din del udføres.

Bemærk: du vil sandsynligvis ikke bruge Excel VBA til at minde dig om et vigtigt møde, men hvis du vil, er det bedst at sætte en makro som denne i en Arbejdsbog Open Event. Derved får du automatisk en påmindelse om klokken 14: 00 AM (du behøver ikke at klikke på en kommandoknap for at aktivere makroen). Selvfølgelig modtager du kun påmindelsen, når du forlader din projektmappe.