zaman zaman "Private Sub Worksheet_Activate()" çalışmıyor.

[sdegirmenci]

Değerli Hocalarım Merhaba;
Zaman zaman sayfayı açtığımda Private Sub Worksheet_Activate() altında çalışan kodlar çalışmıyor. o anda Kontrol ediyorum, Tasarım modu kapalı , makro güvenlik düzeyi düşük, etki edebileceğini düşündüğüm Excel.Application.Calculation = xlCalculationAutomatic ,
"Application.ScreenUpdating = False" ise "True" konumunda. Çalışma kitabını kapatıp yeniden açtığımda çalışmaya başlıyor. Sebebini anlayabilmiş değilim yardımcı olursanız sevinirim. Saygılarımla

 

[Orion1]

Exit sub diye bir satır varmı.Veya çalışan kodları bir şarta bağladıysanız şart sağlanmıyorsa çalışmayabilir.

 

[sdegirmenci]

Hocam merhaba;
Çalışma kitabı içindeki sayfalarda Exit Sub olan kodlar var ancak ilgili sayfa açıldığında şarta bağlı bir kod yok.

 

[sdegirmenci]

Sayın Evren Hocam;
Aşağıdaki Combobox ' tan seçim yaptıktan sonra çalışmadığını farkettim, ve gerekli düzeltmeyi yaptım
Işık tuttuğunuz için size teşekkür ederim.

Private Sub ComboBox1_Change()

With Application

.EnableEvents = False dedikten sonra
'xxxxxx kodlar

.EnableEvents = True 'ile kaptmadığımızdan dolayı çalışmadığını anladım.