saat makrosunu kullanamıyorum

[yaakyurt]

Arkadaşlar elimde hazırlanmış bir saat makrosu var.(ekteki gibi) bu makroyu istediğim herhangi bir çalışma kitabında çalıştırmayı beceremedim. Yardımcı olursanız sevinirim.

 

[spilavci]

bende çalıştı.sayfada herhangi bir yere tıklayınca saat çalışıyor.

selamlar

 

[alipinar]

Bende de çalıştı. İyi akşamlar.

 

[yaakyurt]

eklemiş olduğum sayfanın içinde zaten çalışıyor.ben bu makroyu alarak her hangi başka bir çalışma sayfasında çalıştıramadım nasıl yapacağım?

 

[Zeki Gürsoy]

Saatin her sayfanın "A1" hücresinde çalışacaksa aşağıdaki kod kullanılabilir.

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Do
DoEvents
[a1] = Format(Time, "hh:mm:ss")
Loop
End Sub