Comment obtenir une liste déroulante B dont les items soient fonction du choix d'une liste déroulante A ?
- Détails
- Catégorie parente: Faq Word
- Catégorie : VBA solutions
- Mis à jour le mardi 18 octobre 2011 18:18
- Affichages : 8081
C'est possible à l'aide d'une macro. Soit ld1 le nom du signet de la première liste déroulante et ld2 le nom du signet de la deuxième liste déroulante, voici le code à copier dans ThisDocument et à adapter.
Sub Synchro()
'macro écrite par m@rina
Dim ld2 As ListEntries, ld1 As Byte
Set ld2 = ActiveDocument.FormFields("ld1").DropDown.ListEntries
ld1 = ActiveDocument.FormFields("ld2").DropDown.Value
ld2.Clear
If ld1 = 1 Then
With ld2
.Add Name:="item1"
.Add Name:="item2"
.Add Name:="item3"
End With
ElseIf ld1 = 2 Then
With ld2
.Add Name:="item4"
.Add Name:="item5"
.Add Name:="item6"
End With
ElseIf ld1 = 3 Then
With ld2
.Add Name:="item7"
.Add Name:="item8"
.Add Name:="item9"
End With
End If
End Sub
Une fois la macro insérée, double-cliquez sur la liste déroulante ld1, et sélectionnez cette macro dans la liste déroulante "Exécuter la macro à la sortie."
