über doppel klick zwei Zellen füllen
02.01.2016 17:48:10
Schorsch
Ich habe die Spalte H zeile 2-200 hier kann ich die zeilen durch doppel klick mit einem "x" markieren.
Jetzt möchte ich das in Spalte I das aktuelle Datum gleich mit geschrieben wird,
kann mir da jemand weiter helfen...
Gruß Schorsch
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Range("H2:H200"), Target) Is Nothing Then
Cancel = True
Target = IIf(Target = "x", "", "x")
End If
End Sub