Arkadaşlar excel dosyası açık olduğu sürece açıldığı saatten (örneğin 18:26:25) sonraki her 30 saniyede bir işlem yaptırmak istiyorum. bunu makro kısmında nereye nasıl yazmam gerekiyor?

Hallettim arkadaşlar. Birine lazım olur belki diye yazayım nasıl olduğunu;

Main fonksiyonu içine hangi işlemi tekrarlamasını istiyorsak onu yazıyoruz. Main içinde de Refresh_Macro fonksiyonunu çağırıyoruz. Refresh_Macro içine de Main fonksiyonunu ne kadar sürede bir yenileyeceğini belirtiyoruz. TimeSerial(0,0,0) yazan kısımdaki ilk 0 saati, ikinci 0 dakikayı, üçüncü 0 ise saniyeyi belirtiyor.

Sub Main()
Range("S19").Value = "Tarih: " & Format(Date, "mm.dd.yyyy")
Range("S20").Value = "Saat: " & Format(Time, "hh:mm:ss")
Call Refresh_Macro
End Sub

Private Sub Refresh_Macro()
Application.OnTime Now + TimeSerial(0, 0, 5), "Main"
End Sub