Hvordan oprettes afhængige rullelister i Word-dokument?
Som det viste skærmbillede til venstre, skal du begrænse valgene i den anden rulleliste baseret på muligheden i den første rullemenu, hvordan kan du gøre det? Denne artikel viser dig en metode til at oprette afhængige rullelister i et Word-dokument.
Opret afhængige rullelister i Word med VBA-kode
Nedenstående VBA-kode kan hjælpe dig med at oprette en afhængig rulleliste i et Word-dokument. Følg venligst instruktionerne trin for trin.
1. For det første skal du indsætte to rullelister i dit Word-dokument. Klik på Udvikler > Ældre formularer > Drop-down formularfelt. Se skærmbillede:
2. Højreklik på den første rulleliste (denne rulleliste skal være den overordnede), og klik Egenskaber. Se skærmbillede:
3. I åbningen Drop-down Formularfeltindstillinger dialogboks skal du:
3.1 Indtast kategorien i Drop-down vare boks og klik derefter på Tilføj gentag handlingen, indtil alle kategorier er føjet til rullelisteelementerne Elementer.
3.2 Indtast ddfood ind i Bookmark boks.
3.3 Klik på OK knap. Se skærmbillede:
4. Højreklik på den anden rulleliste, klik på Ejendomme at åbne sin Drop-down Formularfeltindstillinger dialogboks, og indtast i dialogboksen ddKategori ind i Bookmark og klik på OK knap. Se skærmbillede:
5. Tryk på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
6. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Modul, kopier derefter under VBA-koden i modulvinduet.
VBA-kode: Opret afhængig rulleliste i 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
Bemærkninger:
1. I koden skal du ændre emner under hvert tilfælde, som du har brug for.
2. ddfood , ddKategori skal matche de bogmærkemuligheder, du indtastede i ovenstående to Drop-down Formularfeltindstillinger dialogbokse.
7. Gem koden, og gå tilbage til dokumentet.
8. Højreklik på den første rulleliste, og klik Ejendomme at åbne Drop-down Formularfeltindstillinger dialog boks. I dialogboksen skal du vælge ovenstående makronavn (her er Popolateddfood) fra Udgang rullelisten, og klik derefter på OK .
9. Klik nu Udvikler > Begræns redigering som vist nedenstående skærmbillede.
10. i Begræns redigering rude, skal du:
10.1) Kontroller Tillad kun denne type redigering i dokumentet boks;
10.2) Vælg Udfyldning af formularer mulighed fra rullelisten;
10.3) Klik på Ja, start håndhævelse af beskyttelse knap;
10.4) I Start håndhævelse af beskyttelse dialog, skal du indtaste adgangskoden og klikke på OK knap. Se skærmbillede:
Nu oprettes en afhængig rulleliste. Når du vælger Frugt i den første rulleliste, kan kun frugtkategorierne vælges i den anden.
Bedste kontorproduktivitetsværktøjer
Kutools for Word - Forøg din Word-oplevelse med Over 100 Bemærkelsesværdige funktioner!
🤖 Kutools AI-assistent: Transformer din skrivning med AI - Generer indhold / Omskriv tekst / Opsummer dokumenter / Spørg for information baseret på Dokument, alt sammen i Word
📘 Dokumentbeherskelse: Opdelt sider / Flet dokumenter / Eksporter udvalg i forskellige formater (PDF/TXT/DOC/HTML...) / Batch Konverter til PDF / Eksporter sider som billeder / Udskriv flere filer på én gang...
✏ Indholdsredigering: Batch Find og erstat på tværs af flere filer / Ændr størrelse på alle billeder / Transponer tabelrækker og kolonner / Konverter tabel til tekst...
🧹 Ubesværet rengøring: Fej væk Ekstra pladser / Afsnit bryder / Alle overskrifter / Tekstbokse / Hyperlinks / For mere fjernelse af værktøjer, gå til vores Fjern gruppe...
➕ Kreative indlæg: Indsæt Tusind adskillere / Afkrydsningsfelter / Radio knapper / QR kode / Stregkode / Diagonal linjebord / Ligningstekst / Billede Caption / Tabeltekst / Flere billeder / Oplev mere i Indsæt gruppe...
???? Præcisionsvalg: Find ud af specifikke sider / tabeller / former / overskrifter / Forbedre navigation med mere Vælg funktioner...
⭐ Stjerneforbedringer: Naviger hurtigt til ethvert sted / automatisk indsæt gentagende tekst / skifte problemfrit mellem dokumentvinduer / 11 Konverteringsværktøjer...