Az auto_open és az Application.OnTime metódus kombinálásával egy egyszerűen kezelhető időzítőt tudunk létrehozni az Excel munkafüzetben.
Folyamat: A táblázat megnyitásakor automatikusan elindul az Application.OnTime metódus, ami bizonyos idő elteltével elindít egy eljárást.
1. Megnyitáskor automatikusan induljon el egy makró
Készítsünk egy makrót, aminek a neve auto_open. Ez az elnevezés teszi lehetővé, hogy automatikusan elinduljon az eljárásunk a munkafüzet megnyitásakor.
Sub auto_open() ' amit ideírunk, automatikusan elindul a munkafüzet megnyitásakor End Sub
2. Készítsük el az elindítandó eljárást
Az eljárásunk egész egyszerűen jelenítsen meg egy üzenődobozt.
Sub idozitett() 'Ide jöhet az eljárás amit késleltetve akarunk elindítani MsgBox "Üzenet" End Sub
3. Állítsuk be az időzítést
Az elsőként létrehozott auto_open()-be írjuk be a metódust. Két attribútumot adunk meg neki, először meghatározzuk neki az időpontot úgy hogy a jelenlegi időértékhez hozzáadunk 10 másodpercet, utána megmondjuk neki mit indítson el ha eljön az idő.
Sub auto_open()
'
' 10 másodperc elteltével elindul az idozitett() makrónk
'
Application.OnTime Now + TimeValue("00:00:10"), "idozitett"
End Sub
Az eredeti cikk itt olvasható: http://excelzoom.com/run-macro-at-a-specified-time/
