Excel: onclick Zelle mit Wert befüllen

    Servus!

    Ist es irgendwie möglich, in Excel per VBA eine Zelle so zu manipulieren, dass sie per Klick mit 1 bzw. per erneutem Klick mit 0 gefüllt wird?

    thx4hints
    Fugo



    Reagieren kannst du auf den Doppelklick:

    Im VBA Projekt-Explorer selektier die Arbeitsmappe und füge folgenden Code ein:

    Code
    Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If Target.Cells.Count > 1 Then Exit Sub
Select Case Target.Value
Case "0": Target.Value = 1
Case "1": Target.Value = 0
Case Else:
End Select
End Sub

    Damit solltest du weiterkommen.
    mfg AntiBit

    Hätten uns Spiele wie Pac-Man in unserer Jugend beeinflusst, würden wir heute durch dunkle Räume irren, elektronische Musik hören und Pillen fressen.

Jetzt mitmachen!

Sie haben noch kein Benutzerkonto auf unserer Seite? Registrieren Sie sich kostenlos und nehmen Sie an unserer Community teil!

Benutzerkonto erstellen Anmelden