/ / Excel VBA zaškrtávací políčko

Excel VBA zaškrtávací políčko

Zaškrtávací políčko je pole, které lze zkontrolovat pro ukládání informací. Chcete-li vytvořit zaškrtněte políčko v Excel VBA, proveďte následující kroky.

1. Na kartě Vývojář klepněte na Vložit.

2. Ve skupině ActiveX Controls klepněte na políčko Check Box.

Vytvořte zaškrtávací políčko v aplikaci Excel VBA

3. Přetáhněte zaškrtávací políčko na pracovní list.

4. Zaškrtněte políčko pravým tlačítkem myši (zkontrolujte, zda je vybrán režim návrhu).

5. Klepněte na tlačítko Zobrazit kód.

Zobrazit kód

Poznámka: můžete změnit popis a název ovládacího prvku kliknutím pravým tlačítkem myši na ovládací prvek (ujistěte se, že je vybrán návrhový režim) a poté klepnutím na Vlastnosti. Změňte nadpis zaškrtávacího políčka na MyCheckBox. Prozatím opustíme CheckBox1 jako název zaškrtávacího políčka.

6. Přidejte následující řádky kódu:

If CheckBox1.Value = True Then Range("D2").Value = 1
If CheckBox1.Value = False Then Range("D2").Value = 0

7. Klikněte na zaškrtávací políčko na listu (zkontrolujte, zda není vybrán návrhový režim).

Výsledek:

Zaškrtávací políčko True

Zaškrtněte políčko False

Ačkoli v některých situacích může být užitečné přímo umístit políčko na pracovní list, zaškrtávací políčko je obzvláště užitečné při umístění na Userform.

Také si přečtěte: