Doppelklick zum Hinzufügen/Entfernen von Häkchen

Anonim

In diesem Artikel verwenden wir das Vor-Doppelklick-Ereignis des Arbeitsblatts, um die Zelle zu aktivieren und zu deaktivieren.

Rohdaten bestehen aus einigen Lebensmitteln. Wir möchten die Artikel ankreuzen, die wir gekauft haben.

Wenn Sie auf eine Zelle doppelklicken, wird ihr ein Häkchen hinzugefügt. Ebenso kann es durch erneutes Doppelklicken entfernt werden.

Codeerklärung

Wenn Ziel.Spalte = 3 Dann

Der obige Code wird verwendet, um die Ausführung des Doppelklickereignisses zu beschränken, wenn auf die Zelle in der 3. Spalte doppelgeklickt wird.

Abbrechen = Wahr

Der obige Code wird verwendet, um zu verhindern, dass eine Zelle in den Bearbeitungsmodus gelangt.

Target.Font.Name = "Marlett"

Der obige Code wird verwendet, um der Zielzelle die Marlett-Schriftart zuzuweisen.

Wenn Ziel = "" Dann

Ziel = "a"

Anders

Ziel = ""

Ende Wenn

Der obige Code wird verwendet, um ein Häkchen einzufügen und auch zu entfernen. In der Marlett-Schrift stellt „a“ ein Häkchen dar und ein Leerzeichen wird verwendet, um das Häkchen zu entfernen.

Bitte folgen Sie unten für den Code

 Option Explicit Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 'Überprüfen, ob die Zielzelle in der dritten Spalte ist If Target.Column = 3 Then 'Verhindern, dass die Zelle in den Bearbeitungsmodus wechselt Cancel = True 'Schriftart des Zellenziels ändern. Font.Name = "Marlett" 'Überprüfen, ob Zielzellenwert leer ist, dann Häkchen einfügen If Target = "" Then Target = "a" Else Target = "" End If End If End Sub 

Wenn Ihnen dieser Blog gefallen hat, teilen Sie ihn mit Ihren Freunden auf Facebook. Außerdem können Sie uns auf Twitter und Facebook folgen.

Wir würden uns freuen, von Ihnen zu hören, lassen Sie uns wissen, wie wir unsere Arbeit verbessern und für Sie verbessern können. Schreiben Sie uns auf der E-Mail-Site