bu körserin renklenmesini birden sayfaya uygulamak istiyoru

[othara]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static OldRange As Range
OldRange.Interior.ColorIndex = 0
On Error Resume Next
Target.Interior.Color = vbRed
Set OldRange = Target
End Sub


bu yazılımı yaptım diyelim sayfa 1 e 2 ye uygulmakistiyorum ne yapmaliyim

 

[htsumer]

Aynı Soruyu Ayrı yerlere ??

http://www.excel.web.tr/viewtopic.php?p=40747#40747