Jak tworzyć zależne listy rozwijane w dokumencie programu Word?

Jak pokazano na lewym zrzucie ekranu, musisz ograniczyć wybór na drugiej liście rozwijanej w oparciu o opcję z pierwszego menu rozwijanego, jak możesz to zrobić? W tym artykule pokażemy metodę tworzenia zależnych list rozwijanych w dokumencie programu Word.
Utwórz zależne listy rozwijane w programie Word z kodem VBA
Poniższy kod VBA może pomóc w utworzeniu zależnej listy rozwijanej w dokumencie programu Word. Postępuj zgodnie z instrukcjami krok po kroku.
1. Po pierwsze, musisz wstawić dwie listy rozwijane w dokumencie programu Word. Kliknij Deweloper > Starsze formularze > Rozwijane pole formularza. Zobacz zrzut ekranu:
2. Prawym przyciskiem myszy kliknij pierwszą listę rozwijaną (powinna to być lista nadrzędna) i kliknij Nieruchomości. Zobacz zrzut ekranu:
3. W otwarciu Rozwijane opcje pól formularza w oknie dialogowym, musisz:
3.1 Wprowadź kategorię do Element rozwijany a następnie kliknij Dodaj przycisk, powtarzaj operację, aż wszystkie kategorie zostaną dodane do listy rozwijanej Elementy w.
3.2 Wejdź ddjedzenie do Zakładka pudełko.
3.3 Kliknij OK przycisk. Zobacz zrzut ekranu:
4. Kliknij prawym przyciskiem drugą listę rozwijaną, kliknij Właściwości otworzyć Rozwijane opcje pól formularza iw oknie dialogowym wprowadź ddKategoria do Zakładka i kliknij OK przycisk. Zobacz zrzut ekranu:
5. wciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
6. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł, następnie skopiuj poniższy kod VBA do okna modułu.
Kod VBA: Utwórz zależną listę rozwijaną w programie Word
Sub Populateddfood()
'Update by Extendoffice 2018/10/25
Dim xDirection As FormField
Dim xState As FormField
On Error Resume Next
Set xDirection = ActiveDocument.FormFields("ddfood")
Set xState = ActiveDocument.FormFields("ddCategory")
If ((xDirection Is Nothing) Or (xState Is Nothing)) Then Exit Sub
With xState.DropDown.ListEntries
.Clear
Select Case xDirection.Result
Case "Fruit"
.Add "Apple"
.Add "Banana"
.Add "Peach"
.Add "Lychee"
.Add "Watermelon"
Case "Vegetable"
.Add "Cabbage"
.Add "Onion"
Case "Meat"
.Add "Pork"
.Add "Beef"
.Add "Mutton"
End Select
End With
End Sub
Uwagi:
1. W kodzie zmień pozycje w każdym przypadku według potrzeb.
2. ddjedzenie i ddKategoria powinien pasować do opcji zakładek, które zostały wprowadzone w dwóch powyższych Rozwijane opcje pól formularza okna dialogowe.
7. Zapisz kod i wróć do dokumentu.
8. Kliknij prawym przyciskiem pierwszą listę rozwijaną i kliknij Właściwości otworzyć Rozwijane opcje pól formularza Okno dialogowe. W oknie dialogowym wybierz powyższą nazwę makra (tutaj jest Popoleddfood) z pliku Wyjście listę rozwijaną, a następnie kliknij plik OK przycisk.
9. Teraz kliknij Deweloper > Ogranicz edycję jak pokazano na poniższym zrzucie ekranu.
10. w Ogranicz edycję okienko, musisz:
10.1) Sprawdź Zezwalaj tylko na ten typ edycji w dokumencie pudełko;
10.2) Wybierz Wypełnianie formularzy opcja z listy rozwijanej;
10.3) Kliknij Tak, uruchom Wymuszanie ochrony przycisk;
10.4) W Rozpocznij wymuszanie ochrony wprowadź hasło i kliknij OK przycisk. Zobacz zrzut ekranu:
Teraz tworzona jest zależna lista rozwijana. Wybierając Owoce z pierwszej listy rozwijanej, w drugiej można wybrać tylko kategorie owoców.
Zalecane narzędzia zwiększające produktywność programu Word
Kutools dla programu Word — ponad 100 zaawansowanych funkcji programu Word, oszczędzaj 50% czasu
- Skomplikowane i powtarzalne operacje można wykonać jednorazowo w ciągu kilku sekund.
- Wstaw wiele obrazów w folderach do dokumentu programu Word jednocześnie.
- Scalaj i łącz wiele plików programu Word w folderach w jeden z żądaną kolejnością.
- Podziel bieżący dokument na oddzielne dokumenty według nagłówka, podziału sekcji lub innych kryteriów.
- Konwertuj pliki między Doc i Docx, Docx i PDF, zbiór narzędzi do typowych konwersji i zaznaczania, i tak dalej ...


























