Nach Doppelklick Zelle aktiv lassen
24.01.2006 11:50:48
Harald
nach dem Doppelklick- Ereignis (Wechsel zwischen leer und NIO) bleibt der Cursor blinkend in der Zelle stehen
und ein weiterer Doppelklick ist nutzlos.
Wie bekomme ich den blinkenden Cursor weg ?
Die Zelle soll aktiv bleiben.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If ActiveCell.Value = "" Then
ActiveCell.Value = "NIO"
Else
ActiveCell.Value = ""
End If
'activecell.offset(1, 0).select und wieder zurück ist soooo unelegant ;-(
End Sub
Gruss Harald
Anzeige