Target anpassen
19.09.2005 06:30:05
Erich
habe ein Makro, das zu 90 % funktioniert. Ich möchte, dass SelectionChange
nur bei Auswahl von Cells(5,7) aktiv ist. Bei Target einer anderen Zelle soll
nichts passieren:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells = Cells(5, 7) Then
Cells(5, 7).FormulaR1C1 = "=COUNT(R[7]C[-5]:R[7]C[64])"
Else
If Target.Cells <> Cells(5, 7) Then Exit Sub
End If
End Sub
Derzeit wird das Makro bei jedem Klick ausgeführt. Was ist falsch?
Besten Dank für kurze Hilfe!
mfg
Erich
EXCEL-Shareware und Freeware: http://www.toolex.de
Private Tippgemeinschaft für Lotto oder KENO: http://www.kenostrategen.de