Düğmeyle makroyu çalıştırmak ve durdurmak

Katılım
16 Aralık 2010
Mesajlar
23
Excel Vers. ve Dili
2007
Arkadaşlar merhaba. Aşağıda yazılı kodu düğmeye atamak istiyorum. Düğmeye ilk basınca çalıştırmak; düğmeye ikinci defa basınca durdurmak ve bu düğmeyi menüye ekleyerek tüm excel çalışmalarında kullanmak istiyorum. Yardımlarınızı bekliyorum. Şimdiden çok teşekkürler ederim.



Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
'Update 20140318
Static xRow
Static xColumn
If xColumn <> "" Then
With Columns(xColumn).Interior
.ColorIndex = xlNone
End With
With Rows(xRow).Interior
.ColorIndex = xlNone
End With
End If
pRow = Selection.Row
pColumn = Selection.Column
xRow = pRow
xColumn = pColumn
With Columns(pColumn).Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
With Rows(pRow).Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
End Sub
 
Üst