Aşağıdaki kod ile sekmeler arası otomatik olarak 30 saniyede bir geçiş yapabiliyorum
sorun ise bu kodu yazdığım Excel sayfası ile birlikte açtığım diğer Excel sayfalarında da aynı şeyin olması bunu nasıl engelliyebilirim yardımcı olabilirmisiniz



Option Explicit

Sub Auto_Open()
DoEvents
Application.OnTime Now + TimeValue("00:00:30"), "SAYFA_AÇ"
End Sub

Sub SAYFA_AÇ()
DoEvents
If ActiveSheet.Index < ThisWorkbook.Worksheets.Count Then
ActiveSheet.N

Bugün 5 e kadar yetiştirmem gereken bir program var kullanıcı adı şifre girince bir hatayla karsılasıyorum hatanın çözümü için 1 dakikanızı ayırıp bakabilirmsiniz veya düzeltebilirmisiniz

oluşturduğum arşiv programına kulanıcı adı ve şifre oluşturamıyorum lütfen yardım edebilirmisiniz.