Makro bei Bedarf ein und ausschalten
12.01.2006 08:12:05
Andre´
wie muss ich dieses Makro umschreiben, dass ich es bei Bedarf ein und wieder ausschalten kann. Der Grund ist, dass ich viel kopieren und einfügen muss. Bei diesem Makro ist das nicht möglich. Mit 'Priv.Sub Worksheet_SelectionChange(ByVal Target As Range)) arbeite ich sehr häufig und auch da habe ich oft das Bedürfnis, den Befehl zu unterbrechen und wieder zu starten.
Ich hoffe mir kann jemand helfen.
Danke im vorraus!
MFG
Andre
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
Columns(1).Interior.ColorIndex = xlNone
Cells(Target.Row, 1).Interior.ColorIndex = 7
Application.ScreenUpdating = True
End Sub