Merhaba arkadaşlar. Aşağıdaki kodu netten buldum. Bir Excel çalışmasında kullanıyorum. Hazırladığım tabloda bazı hücrelerin içeriği değişmesin diye korumalı.
Aşağıdaki Makro’yu uyguladığımda hata veriyor. Korumayı kaldırdığımda ise sorun çözülüyor. Acaba bu Mako’yu korumalı hücrelerin olduğu bir çalışma sayfasında nasıl kullanabiliriz?
NOT: makrodan hiç anlamıyorum
kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
If Intersect(Target, [A1:Q100]) Is Nothing Then Exit Sub
Range(Cells(Target.Row, 1), Cells(Target.Row, 12)).Interior.ColorIndex = 40
End Sub
Aşağıdaki Makro’yu uyguladığımda hata veriyor. Korumayı kaldırdığımda ise sorun çözülüyor. Acaba bu Mako’yu korumalı hücrelerin olduğu bir çalışma sayfasında nasıl kullanabiliriz?
NOT: makrodan hiç anlamıyorum
kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
If Intersect(Target, [A1:Q100]) Is Nothing Then Exit Sub
Range(Cells(Target.Row, 1), Cells(Target.Row, 12)).Interior.ColorIndex = 40
End Sub