/ / Kombinovaná schránka aplikace Excel VBA

Kombinovaná schránka Excel VBA

Rozbalovací seznam je rozbalovací seznam, odkud může uživatel vybrat položku nebo vyplnit svou vlastní volbu. Chcete-li vytvořit pole se seznamem 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 položku Combo Box.

Vytvoření pole se seznamem v aplikaci Excel VBA

3. Přetáhněte pole se seznamem na pracovní list.

Přetáhněte kombinovanou schránku

Poznámka: můžete změnit název ovládacího prvku kliknutím pravým tlačítkem myši na ovládací prvek (ujistěte se, že jste zvolili Režim návrhu) a poté kliknutím na Vlastnosti. Prozatím opustíme ComboBox1 jako název pole se seznamem.

Vytvořit událost Open Workbook. Kód přidaný do události Open Workbook bude spuštěn v aplikaci Excel VBA při otevření sešitu.

4. Otevřete editor jazyka.

5. Poklepejte na tento sešit v aplikaci Průzkumník projektu.

6. V levém rozevíracím seznamu vyberte sešit a v pravém rozevíracím seznamu vyberte možnost Otevřít.

Otevřete událost sešit v aplikaci Excel VBA

7. Chcete-li přidat položky do pole se seznamem, přidejte následující řádky kódu do události Open Workbook:

With Sheet1.ComboBox1
    .AddItem "Paris"
    .AddItem "New York"
    .AddItem "London"
End With

Poznámka: použijte Sheet2, pokud je vaše pole se seznamem umístěno na druhém listu Sheet3, pokud je vaše pole se seznamem umístěno ve třetím listu apod. Pokud použijete tyto řádky kódů mimo událost Workbook Open, můžete přidat řádky kódu níže před těmito kódové řádky. První řádek kódu vymaže pole se seznamem. Tímto způsobem se vaše položky nebudou přidávat vícenásobně, pokud kód spustíte vícekrát. Druhý řádek kódu vymaže vlastní volbu.

ComboBox1.Clear
ComboBox1.Value = ""

8. Chcete-li připojit toto pole se seznamem k buňce, klepněte pravým tlačítkem na pole se seznamem (ujistěte se, že je vybrán návrhový režim) a klikněte na Vlastnosti. Vyplňte D2 pro LinkedCell.

LinkedCell

Poznámka: také zobrazit vlastnost ListFillRange vyplnit pole se seznamem s řadou buněk.

9. Uložte, zavřete a znovu otevřete soubor aplikace Excel.

Výsledek:

Kombinovaný rámeček

Ačkoli v některých situacích může být užitečné umístit přímo do pole list se seznamem, pole se seznamem je zvláště užitečné při umístění na Userform.

Také si přečtěte: