Auto_open makrosu hakkında

[teapworm]

Sub Autpen()
Sürekli
End Sub

Sub Sürekli()
DoEvents
Application.OnTime = Now + TimeValue("00:00:01") , "Sürekli_makro"
End Sub

Sub Sürekli_makro()
DoEvents
Sürekli

...kodlar...
End Sub


yukarıdaki kodları içeren bir vba hazırladım.benim istediğim sadece yaptığım sayfada kodların işlemesi fakat bu excel sayfası açıkken başka bir excel sayfası açtığımda ondada kodlar işliyor.Bu durumu nasıl düzeltebilirim ?

 

[uzmanamele]

Sub Autpen()
Sürekli
End Sub

Sub Sürekli()
DoEvents
Application.OnTime = Now + TimeValue("00:00:01") , "Sürekli_makro"
End Sub

Sub Sürekli_makro()
DoEvents
Sürekli

...kodlar...
End Sub


yukarıdaki kodları içeren bir vba hazırladım.benim istediğim sadece yaptığım sayfada kodların işlemesi fakat bu excel sayfası açıkken başka bir excel sayfası açtığımda ondada kodlar işliyor.Bu durumu nasıl düzeltebilirim ?

Merhaba
Bunu deneyiniz.
Kodu, açtığınız çalışma kitabında çalıştırmak istiyorsanız Workbook_Activate altında yazınız, çalışma sayfasında istiyorsanız Worksheet_Activate altında yazınız.

 

[teapworm]

Söylemek istediğinizi tam anlıyamadım. Workbook_Activate altında yazın derken AUTO_OPEN yerinemi kullanacam yoksa başka bi yerdemi? biraz açıklarmısız ?