- Katılım
- 3 Haziran 2021
- Mesajlar
- 203
- Excel Vers. ve Dili
- Excel 2016 64 bit Türkçe ve Google e-tablo
Merhabe
Sayfaya bu kodu yazıyorum Çalışıyor.
1. Sorun: Sayfa açıldığında direkt kod çalışmıyor Sayfa 2 ye geçip sonra tekrar sayfa 1 e geçtiğimde çalışıyor. Ben İstiyorum ki Excel açıldığında direkt çalışsın
_Open denedim olmadı
2 : Sorun: Sayfanın belirli Hücrelerini korumak istiyorum ama Macro olduğu içi hata veriyor koruyor fakat makro hatası alıyorum
Private Sub Worksheet_Activate()
For k = 1 To 10
Cells(3, 14).Interior.ColorIndex = 4
basla = Timer
bekle = 1
While Timer < basla + bekle
DoEvents '1 saniye bekle
Wend
Cells(3, 14).Interior.ColorIndex = xlNone
basla = Timer
bekle = 1
While Timer < basla + bekle
DoEvents '2 saniye bekle
Wend
Next k
End Sub
Sayfaya bu kodu yazıyorum Çalışıyor.
1. Sorun: Sayfa açıldığında direkt kod çalışmıyor Sayfa 2 ye geçip sonra tekrar sayfa 1 e geçtiğimde çalışıyor. Ben İstiyorum ki Excel açıldığında direkt çalışsın
_Open denedim olmadı
2 : Sorun: Sayfanın belirli Hücrelerini korumak istiyorum ama Macro olduğu içi hata veriyor koruyor fakat makro hatası alıyorum
Private Sub Worksheet_Activate()
For k = 1 To 10
Cells(3, 14).Interior.ColorIndex = 4
basla = Timer
bekle = 1
While Timer < basla + bekle
DoEvents '1 saniye bekle
Wend
Cells(3, 14).Interior.ColorIndex = xlNone
basla = Timer
bekle = 1
While Timer < basla + bekle
DoEvents '2 saniye bekle
Wend
Next k
End Sub