Probleme mit Makro-Start bei Klick in Zelle
23.10.2015 17:18:39
Tim
ich möchte gerne beim Klick in bestimmte Zellen eines Blattes jeweils ein bestimmtes Makro ausführen.
Grundsätzlich funktioniert mein Code wie gewünscht ich stoße jedoch auf folgende Probleme:
1) Wie kann ich erreichen, dass ein Makro nur ausgeführt wird, wenn max. 2 Zellen gleichzeitig aktiv sind ? Ich möchte vermeiden, dass Makros auch dann starten, wenn man z.B. eine ganze Zeile / Spalte oder das ganze Blatt markiert.
2) Ich kann Makros starten, wenn ich in bestimmte Zellen klicke, jedoch nicht, wenn ich zwei Mal hintereinander auf die gleiche Zelle klicke. Das funktioniert nur, wenn ich die Zelle nach dem ersten Klick verlasse, d.h. auf eine andere Zelle klicke, und dann wieder auf die Zelle, die das Makro startet. Lässt sich das irgendwie umgehen ?
Mein Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rngSelected As String
If Not Intersect(Target, Range("D11:D17")) Is Nothing Then
'do stuff
End If
End Sub
Gruß,
Tim
Anzeige