wie kann ich bei der Funktion Doppelklick erreichen, dass in der jeweils akiven Zelle ein großes X eingetragen wird. Und wenn schon ein X drin ist, dieses dann wieder verschwindet.
Vielen Dank schon mal
Klaus
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
Target = IIf(Target = "", "X", "")
End Sub