İstenen Tarihte Aktif Olan Makro

[vasifokur]

Daha önce istenen tarihte aktif olan makrolar iie ilgili çalışmaları sitede görmüştüm. Kayıt etmek aklıma gelmedi. Şimdi lazım oldu ama bir türlü bulamıyorum. Yardımcı olursanız sevinirim.

 

[Galus]

Sub date_macro()
datemacro = InputBox("Örnek zaman " & Time & _
". zamanı belirt o zamanda makro çalışsın?")
If datemacro = "" Then Exit Sub
Application.OnTime TimeValue(datemacro), "makro1" 'makro1 isimli makro çalışır
End Sub
Sub makro1()
MsgBox "makro1 çalıştı"
End Sub

 

[vasifokur]

teşekkür ederim

 

[vasifokur]

Sn. Galus isteğimi şöyle dile getirsem nasıl olur ? İki ayrı gizli buton atayacağım.Bu butonlar gizli olacaklar. Örneğin A1 hücresine 1 değeri girilince 1. buton aktif olacak. A1 hücresine 2 değeri girilince 2. boton aktif olacak. Bu mümkün müdür ?