Přejít k hlavnímu obsahu

Jak zajistit zaškrtnutí políčka na základě hodnoty buňky v aplikaci Excel?

Možná víte, jak změnit hodnotu buňky na základě zaškrtávacího políčka. Ale víte, jak zajistit automatické zaškrtnutí políčka na základě hodnoty buňky v aplikaci Excel? Tento článek vám ukáže metody, jak toho dosáhnout.

Zaškrtněte políčko na základě hodnoty buňky pomocí vzorce
Zaškrtněte políčko na základě hodnoty buňky s kódem VBA


Zaškrtněte políčko na základě hodnoty buňky pomocí vzorce

Předpokládejme, že chcete, aby bylo zaškrtávací políčko 1 zaškrtnuto automaticky, když se hodnota v buňce A1 rovná „Testovat“. Postupujte prosím následovně.

1. Po vložení zaškrtávacího políčka (Form Control) jej vyberte a propojte jej se zadanou buňkou C2 zadáním = C2 do řádku vzorců.

Pro Ovládací prvek ActiveX zaškrtávací políčko, klikněte na něj pravým tlačítkem a vyberte Nemovitosti z nabídky pravého tlačítka myši. A v Nemovitosti dialogové okno, zadejte propojená buňka do Propojená buňka pole a poté zavřete dialogové okno. Viz screenshot:

2. Vyberte lemovanou buňku (C2) a zadejte vzorec = IF (A2 = "Test", TRUE, FALSE) do řádku vzorců a poté stiskněte vstoupit klíč.

Poznámka: Ve vzorci jsou A2 a Test buňka a hodnota buňky, na které je třeba provést automatické zaškrtnutí políčka.

3. Při zadávání hodnoty „Test“ do buňky A1 bude automaticky zaškrtnuto odpovídající políčko. Viz screenshot:

Poznámka: V tomto vzorci se nerozlišují velká a malá písmena.


Zaškrtněte políčko na základě hodnoty buňky s kódem VBA

Můžete spustit následující kód VBA a zaškrtnout políčko na základě hodnoty buňky v aplikaci Excel.

1. Klikněte pravým tlačítkem na ikonu Tab se zaškrtávacím políčkem na základě hodnoty buňky, klikněte na Zobrazit kód z nabídky pravého tlačítka myši.

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

Kód VBA: Zaškrtněte políčko na základě hodnoty buňky

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("A2").Value = "Test" Then
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOn
    Else
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOff
    End If
End Sub

Poznámka: V kódu jsou A2 a Test buňka a hodnota buňky, na které je třeba provést automatické zaškrtnutí políčka. Zaškrtávací políčko 1 je název zaškrtávacího políčka.

3. lis Další + Q klávesy pro zavření okna Microsoft Visual Basic pro aplikace.

Při zadávání hodnoty „Test“ do buňky A2 bude automaticky zaškrtnuto zadané zaškrtávací políčko.

Poznámka: Tento kód rozlišuje velká a malá písmena.

Tip: Pokud chcete hromadně vložit více zaškrtávacích polí do vybraného rozsahu, můžete zkusit Zaškrtávací políčka Dávkové vložení užitečnost Kutools pro Excelnebo dávkově vložte více tlačítek možností pomocí Tlačítka možnosti hromadného vkládání nástroj. Kromě toho můžete pomocí zaškrtávacího políčka odstranit všechna zaškrtávací políčka najednou Zaškrtávací políčka Dávkové odstranění nástroj, jak je uvedeno níže. Můžeš jít do stáhnout Kutools pro Excel! (30denní bezplatná zkušební verze).


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...

Popis


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!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
can i do thisin google sheet?
This comment was minimized by the moderator on the site
Hello,

I downloaded a template from Microsoft Office itself for Excel.
There is a column with a check box and a check mark.
I can activate the check mark by typing "1", when I do this the task will be set in a lighter color.

But I don't get the check box activated. It is with color and not a check mark. I see this in the formula bar =ALS(G7="";"☐";"⬛") (I think ALS is IF. My language is set on Dutch). I've already been searching but no results. There is no format control, int the properties I don't see anything either.
This comment was minimized by the moderator on the site
Queria saber como fazer isto com mais de um parâmetro de comparação. Por exemplo: quero que automaticamente minha célula A1 retorne o valor TRUE se e somente se outras três células B1, C1 e D1 estiverem todas com o valor TRUE (caso pelo menos uma delas esteja com o valor FALSE, a célula A1 continuará com o valor FALSE). Já tentei usar várias fórmulas usando o comando IF, mas sem êxito. Por favor, você sabe me dizer qual a fórmula certa para conseguir isto? :)
This comment was minimized by the moderator on the site
Descobri! Apenas usar:

=if(and(B1=true, C1=true, D1=true), true, false)
This comment was minimized by the moderator on the site
I am trying to use the checkbox to display specific text to another sheet when it is checked or true and remain blank when it is unchecked or false.
This comment was minimized by the moderator on the site
specifically if it is true I would like it to display 0700-0800 and if it is false display a blank cell.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations