Přejít k hlavnímu obsahu

Jak přidat zaškrtnutí do buňky dvojitým kliknutím v aplikaci Excel?

Autor: Siluvia Naposledy změněno: 2024-09-13

Za normálních okolností se pro vložení zaškrtnutí do buňky musíte dostat do dialogového okna Symbol, najít symbol zaškrtnutí a vložit jej ručně. Není však tak snadné zjistit symbol zaškrtnutí v dialogovém okně Symbol, protože uvnitř je uvedeno mnoho symbolů. Jak rychle přidat zaškrtnutí do buňky v aplikaci Excel? Tento článek vám ukáže metodu VBA pro snadné přidání zaškrtnutí do buňky pouze dvojitým kliknutím.

Poklepáním přidáte do buňky s kódem VBA značku zaškrtnutí


Poklepáním přidáte do buňky s kódem VBA značku zaškrtnutí

Následující kód VBA vám pomůže přidat zaškrtnutí do buňky dvojitým kliknutím. Postupujte prosím následovně.

1. Otevřete list, který chcete do buňky přidat, poté klikněte pravým tlačítkem a vyberte Zobrazit kód z nabídky pravého tlačítka myši.

2. V Microsoft Visual Basic pro aplikace okno, zkopírujte a vložte níže uvedený kód VBA do Kód okno.

Kód VBA: Dvojitým kliknutím přidáte do buňky zaškrtnutí

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("B1:B10")) Is Nothing Then
        Application.EnableEvents = False
        If ActiveCell.Value = ChrW(&H2713) Then
            ActiveCell.ClearContents
        Else
            ActiveCell.Value = ChrW(&H2713)
        End If
        Cancel = True
    End If
    Application.EnableEvents = True
End Sub

Pozor: V kódu je rozsah B1: B10, který přidáte zaškrtnutím dvojitým kliknutím. Změňte to prosím podle svých potřeb.

klikněte na Zobrazit kód a vložte kód do modulu

3. zmáčkni Další + Q klávesy pro zavření Microsoft Visual Basic pro aplikace okno a vrátit se do listu.

Nyní poklepejte na libovolnou buňku v rozsahu B1: B10, značka zaškrtnutí se zadá automaticky. Poklepáním na buňku znovu odstraníte vloženou značku zaškrtnutí.

dvakrát klikněte na libovolnou buňku v rozsahu, zaškrtnutí se zadá automaticky

Pokud ve své excelové každodenní práci potřebujete často používat zaškrtnutí, doporučuji Automatický text Užitečnost Kutools pro Excel. Pomocí této funkce můžete uložit zaškrtnutí jako automatický textový záznam a poté jej v budoucnu znovu spustit jediným kliknutím v aplikaci Excel, jak je ukázáno níže.
Stáhněte si a vyzkoušejte to hned! (30denní bezplatná trasa)

snímek obrazovky kutools pro excel ai

Odemkněte Excel Magic pomocí Kutools AI

  • Chytré provedení: Provádějte operace s buňkami, analyzujte data a vytvářejte grafy – to vše pomocí jednoduchých příkazů.
  • Vlastní vzorce: Vytvářejte přizpůsobené vzorce pro zefektivnění vašich pracovních postupů.
  • Kódování VBA: Napište a implementujte kód VBA bez námahy.
  • Výklad vzorce: Snadno porozumíte složitým vzorcům.
  • Překlad textu: Prolomte jazykové bariéry ve svých tabulkách.
Vylepšete své možnosti aplikace Excel pomocí nástrojů založených na umělé inteligenci. Stáhnout nyní a zažijte efektivitu jako nikdy předtím!

Související články:

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!