mit diesem Makro können meine KollegInnen eine große Anzahl von Abfragen durcharbeiten (target natürlich viel umfangreicher):
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, [B2:B5, B7:B9]) Is Nothing Then
Target.Value = IIf(Target.Value = "", "X", "")
End If
End Sub
Ich habe ein kleines Problem beobachtet: Nach dem Doppelklick bleibt die Zelle aktiv, der Cursor blinkt. Um also ein falsch gesetztes "X" zu entfernen, muss die Zelle erst durch return oder Tab verlassen werden (oder ESC-Taste). Der Recorder hilft mir da nicht wirklich.Wie kann ich es erreichen, dass nach dem Doppelklick die Zelle nur noch "selected" ist?
Ich hoffe, ich konnte es verständlich erklären.
Vielen Dank schon jetzt für eure Hilfe.
Gruß, Margarete