Poklepáním přidáte/odeberete zaškrtnutí

Anonim

V tomto článku použijeme před dvojitým kliknutím událost listu ke zaškrtnutí a zrušení zaškrtnutí buňky.

Surová data se skládají z některých potravin. Chceme zaškrtnout položky, které jsme zakoupili.

Při dvojitém kliknutí na buňku se do ní přidá značka zaškrtnutí. Stejným způsobem jej lze odstranit opětovným dvojitým kliknutím.

Vysvětlení kódu

If Target.Column = 3 Then

Výše uvedený kód slouží k omezení události dvojitého kliknutí, která se má spustit, pouze když dvakrát kliknete na buňku ve 3. sloupci.

Zrušit = Pravda

Výše uvedený kód slouží k tomu, aby se buňka nedostala do režimu úprav.

Target.Font.Name = "Marlett"

Výše uvedený kód slouží k přiřazení Marlettova písma k cílové buňce.

If Target = "" Pak

Cíl = "a"

Jiný

Cíl = ""

Konec If

Výše uvedený kód slouží k vložení zatržítka a jeho odstranění. V písmu Marlett „a“ představuje značku zaškrtnutí a k odstranění značky zaškrtnutí se používá prázdné místo.

Pro kód prosím postupujte níže

 Možnost Explicitní soukromý dílčí list_BeforeDoubleClick (ByVal Cíl jako rozsah, Zrušit jako booleovský) 'Kontrola, zda je cílová buňka ve třetím sloupci Pokud Target.Column = 3 Potom' Zabránit přechodu buňky do režimu úprav Zrušit = True 'Změna typu písma buňky Cíl. Font.Name = "Marlett" 'Kontrola, zda je hodnota cílové buňky prázdná, poté zaškrtnutím If Target = "" Then Target = "a" Else Target = "" End If End If End Sub 

Pokud se vám tento blog líbil, sdílejte ho se svými přáteli na Facebooku. Také nás můžete sledovat na Twitteru a Facebooku.

Rádi bychom od vás slyšeli, dejte nám vědět, jak můžeme zlepšit naši práci a zlepšit ji pro vás. Napište nám na e -mail