Clever-Excel-Forum

Hallo Leute,

ich habe ein kleines Problem wo ich auch nach googeln keine Hilfe gefunden habe.

Wir haben eine todo-liste in der ab Zelle M:2 das Wort Nein für nicht erledigt eingetragen wird.
Nun zur Frage:

Kann man bei einfachem Klick auf die Zelle M:2 das Wort Nein in Ja (für erledigt) automatich umwandeln und 2 !!! Spalten weiter ab O:2 das aktuelle Datum eintragen??

Das ganze soll dann bis Zelle M:200 funktionieren!

Vielen Dank Leute..

Hallo,

ein Ereignis für einfachen Klick gibt es nicht, nur für Doppelklick oder Rechtsklick.
Ich empfehle das Rechtsklickereignis, sonst bekommst du ständig ein "Ja" in die Zelle, wenn mal einer Doppelklickt um "Nein" einzutragen.

Code:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)

If Not Application.Intersect(Target, Range("M2:M200")) Is Nothing Then

    Cells(Target.Row, "M") = "Ja"

    Cells(Target.Row, "O") = Date

    Cancel = True

End If

End Sub

Der Code gehört in das Modul des Tabellenblatts.

BTW: Man schreibt nicht M:2, nur M2

Wow, innerhalb weniger minuten kompetente Antwort.... :18:

Funktioniert einwandfrei, Vielen Dank :19: :19: :100:

Beltason

MisterBurns

Beltason