Bedingung für VBA-Code einfügen
04.08.2014 13:27:37
BEN10
mit folgendem VBA-Code setze ich per Doppelklick in meiner Tabelle in Spalte D ein "X".
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Range("D2:D2000")) Is Nothing Then Exit Sub
Target = IIf(Target = "x", "", "x")
Cancel = True
End Sub
Meine Frage:
Kann man das Makro so umschreiben, dass es in Spalte D nur in Zellen Funktioniert die z.B. BLAU eingefärbt sind?
Wie müsste das Makro dann aussehen?
Gruß Ben