Comment créer des listes déroulantes dépendantes dans un document Word?

Comme le montre la capture d'écran de gauche, vous devez limiter les choix dans la deuxième liste déroulante en fonction de l'option de la première liste déroulante, comment pouvez-vous faire ? Cet article vous montrera une méthode pour créer des listes déroulantes dépendantes dans un document Word.
Créer des listes déroulantes dépendantes dans Word avec le code VBA
Créer des listes déroulantes dépendantes dans Word avec le code VBA
Le code VBA ci-dessous peut vous aider à créer une liste déroulante dépendante dans un document Word. Veuillez suivre les instructions étape par étape.
1. Tout d'abord, vous devez insérer deux listes déroulantes dans votre document Word. Cliquez sur Développeur > Formulaires hérités > Champ de formulaire déroulant. Voir la capture d'écran:
2. Cliquez avec le bouton droit sur la première liste déroulante (cette liste déroulante doit être celle parente), puis cliquez sur Propriétés. Voir capture d'écran:
3. Dans l'ouverture Options de champ de formulaire déroulant boîte de dialogue, vous devez:
3.1 Entrez la catégorie dans le Élément déroulant boîte, puis cliquez sur le Ajouter une détection de fuite de données , répétez l'opération jusqu'à ce que toutes les catégories soient ajoutées à la zone de liste déroulante Éléments dans.
3.2 Entrer ddnourriture into the Favoris boîte.
3.3 Cliquez sur le OK bouton. Voir la capture d'écran:
4. Cliquez avec le bouton droit de la souris sur la deuxième liste déroulante, cliquez sur Propriétés ouvrir son Options de champ de formulaire déroulant boîte de dialogue et dans la boîte de dialogue, entrez ddCatégorie into the Favoris boîte et cliquez sur le OK bouton. Voir la capture d'écran:
5. appuie sur le autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
6. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module, puis copiez ci-dessous le code VBA dans la fenêtre Module.
Code VBA: créer une liste déroulante dépendante dans 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
Notes:
1. Dans le code, veuillez modifier les éléments sous chaque cas selon vos besoins.
2. ddnourriture et ddCatégorie doit correspondre aux options de signet que vous avez entrées dans les deux ci-dessus Options de champ de formulaire déroulant Boîtes de dialogue.
7. Enregistrez le code et revenez au document.
8. Cliquez avec le bouton droit de la souris sur la première liste déroulante et cliquez sur Propriétés ouvrir le Options de champ de formulaire déroulant boite de dialogue. Dans la boîte de dialogue, veuillez sélectionner le nom de la macro ci-dessus (ici Popolateddfood) dans le Sortir liste déroulante, puis cliquez sur le OK .
9. Cliquez maintenant sur Développeur > Restreindre l'édition comme ci-dessous la capture d'écran montrée.
10. dans le Restreindre l'édition volet, vous devez:
10.1) Vérifiez le Autoriser uniquement ce type de modification dans le document boîte;
10.2) Sélectionnez Remplir des formulaires option dans la liste déroulante;
10.3) Cliquez sur le Oui, commencez à appliquer la protection bouton;
10.4) Dans le Commencer à appliquer la protection boîte de dialogue, entrez le mot de passe et cliquez sur le OK bouton. Voir la capture d'écran:
Maintenant, une liste déroulante dépendante est créée. Lorsque vous sélectionnez Fruit dans la première liste déroulante, seules les catégories de fruits peuvent être sélectionnées dans la seconde.
Outils de productivité Word recommandés
Kutools For Word - Plus de 100 fonctionnalités avancées pour Word, économisez 50% de votre temps
- Les opérations compliquées et répétées peuvent être effectuées une seule fois en quelques secondes.
- Insérez simultanément plusieurs images dans des dossiers dans un document Word.
- Fusionner et combiner plusieurs fichiers Word dans des dossiers en un seul avec l'ordre souhaité.
- Divisez le document actuel en documents séparés selon l'en-tête, le saut de section ou d'autres critères.
- Convertissez des fichiers entre Doc et Docx, Docx et PDF, collection d'outils pour les conversions et la sélection courantes, etc.


























