Jak vytvořit seznam uživatelů v aplikaci Outlook

Programovací jazyk maker aplikace Microsoft Outlook Visual Basic for Applications umožňuje přidat do e-mailové zprávy formulář, který může shromažďovat data od jejího příjemce. Například můžete do zprávy vložit uživatelský formulář VBA a seznam se seznamem, který zobrazuje více položek nebo možností, ze kterých si příjemce může vybrat. Než budete moci tuto funkci přidat do svých zpráv, musíte na pás karet přidat kartu Vývojář a její nástroje a změnit nastavení zabezpečení aplikace Outlook tak, aby umožňovala spuštění maker VBA.

Krok 1

Klikněte na kartu „Soubor“, „Možnosti“ a poté na „Přizpůsobit pás karet“.

Krok 2

Zaškrtněte políčko „Vývojář“ na hlavních kartách a klikněte na „OK“. Outlook se automaticky vrátí na panel Domů.

Krok 3

Klikněte na kartu „Soubor“ a poté na „Možnosti“, „Centrum zabezpečení“ a „Nastavení centra zabezpečení“.

Krok 4

Vyberte „Nastavení maker“, „Povolit všechna makra“ a poté kliknutím na „OK“ povolte spuštění makra seznamu během testování. Až budete s UserForm hotovi, můžete pro větší zabezpečení změnit nastavení na „Oznámení pro všechna makra“.

Krok 5

Restartujte aplikaci Outlook a aktivujte změnu nastavení zabezpečení maker.

Krok 6

Klikněte na kartu „Vývojář“, „Makra“ a poté na možnost „Makra“.

Krok 7

Zadejte název makra a klikněte na „Vytvořit“.

Krok 8

Kliknutím na tlačítko „Vložit UserForm“ zobrazíte panel nástrojů formuláře a vytvořte UserForm, který bude obsahovat váš seznam.

Krok 9

Klikněte na ovládací prvek „Listbox“ na panelu nástrojů, podržte tlačítko myši, přetáhněte ovládací prvek do UserForm a poté jej uvolněte.

Krok 10

Klikněte na ovládací prvek „CommandButton“ na panelu nástrojů, podržte tlačítko myši, přetáhněte jej na UserForm a poté jej uvolněte.

Krok 11

Klikněte pravým tlačítkem na „CommandButton“ v UserForm a poté klikněte na „Zobrazit kód“, abyste zobrazili jeho kód makra VBA.

Krok 12

Přidejte položky do seznamu pomocí funkce AddItem. Například pokud chcete, aby seznam obsahoval tři primární barvy, měl by váš kód vypadat takto:

Soukromá Sub CommandButton1_Click () ListBox1.AddItem "Červená" ListBox1.AddItem "Zelená" ListBox1.AddItem "Modrá" Konec Sub

ListBox1 je název, který Outlook automaticky přidá do seznamu, který jste přetáhli do UserForm. Díky příkazu ListBox1.AddItem "Red" je Red první položkou v seznamu.

Klikněte na „Uložit“, stiskněte „F5“ a poté kliknutím na CommandButton spusťte makro. Když spustíte makro a kliknete na „CommandButton“, v seznamu se objeví červená, zelená a modrá barva.