Jak dodać pole listy (ListBox) do formularza UserForm w Outlooku

Makro VBA w Microsoft Outlook pozwala osadzić w wiadomości formularz, który może zbierać dane od odbiorcy. Dzięki temu możesz wstawić do e‑maila UserForm z polem listy, umożliwiającym wybór spośród wielu opcji. Przed rozpoczęciem trzeba włączyć kartę Developer oraz zezwolić na uruchamianie makr.

Krok po kroku

Krok 1

Przejdź do zakładki Plik → Opcje → Dostosuj wstążkę.

Krok 2

Zaznacz pole Developer w sekcji Main Tabs i kliknij OK. Outlook automatycznie powróci do widoku głównego.

Krok 3

Wybierz Plik → Opcje → Centrum zaufania → Ustawienia centrum zaufania.

Krok 4

W sekcji Ustawienia makr wybierz Włącz wszystkie makra i potwierdź OK. Po zakończeniu prac możesz przywrócić bardziej restrykcyjne ustawienie „Powiadomienia dla wszystkich makr”.

Krok 5

Uruchom ponownie Outlook, aby zmiany w ustawieniach bezpieczeństwa weszły w życie.

Krok 6

Na karcie Developer kliknij Makra, a następnie ponownie Makra.

Krok 7

Wpisz nazwę nowego makra i wybierz Utwórz.

Krok 8

W edytorze VBA kliknij przycisk Insert UserForm, aby wyświetlić narzędzia formularza i utworzyć nowy UserForm.

Krok 9

Wybierz kontrolkę ListBox w Toolbox, przytrzymaj przycisk myszy, przeciągnij ją na formularz i zwolnij.

Krok 10

Dodaj przycisk CommandButton w ten sam sposób – przeciągnij go na UserForm.

Krok 11

Kliknij prawym przyciskiem na CommandButton i wybierz View Code, aby otworzyć edytor kodu VBA.

Krok 12

Wstaw elementy do listy za pomocą metody AddItem. Przykładowy kod, który dodaje trzy podstawowe kolory, wygląda tak:

Private Sub CommandButton1_Click()
    ListBox1.AddItem "Czerwony"
    ListBox1.AddItem "Zielony"
    ListBox1.AddItem "Niebieski"
End Sub

„ListBox1” to domyślna nazwa pola listy nadanej przez Outlook. Po zapisaniu (Ctrl+S) i uruchomieniu makra (klawisz F5) kliknięcie przycisku wyświetli wymienione kolory w polu listy.

Uwaga

• Instrukcje dotyczą Outlooka 2013; w innych wersjach mogą wystąpić niewielkie różnice.