Worksheet_BeforeDoubleClick ?
23.02.2009 16:15:42
Micha
leider habe ich ein nur sehr begrenztes VBA Wissen, und freue mich sehr auf Eure Hilfe :-)
Gruß: Micha
Der unten stehende Code wird ja auf dem kompletten Tabellenbaltt angewendet. Wie muss jedoch der Code aussehen wenn ich die Ausführung auf den Bereich ("A:O") begrenzen möchte?
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Fügt bei Doppelklick ein "x" in oben stehende Zelle ein
On Error Resume Next
Application.DoubleClick
ActiveCell.Offset(-1, 0).FormulaR1C1 = "x"
ActiveCell.Offset(1, 0).Range("A1").Select
End Sub
Anzeige