Dans un document Word, une liste déroulante, par exemple une listes comme "OUI", "NON", "Je ne sais pas".

Lorsque l'on sélectionne une valeur, comment faire pour que cette dernière prenne une couleur particulière ?
Le "OUI" serait vert, le "NON" serait rouge, et enfin le "Je ne sais pas" serait noir.

contrôles de formulaire

Utilisation : Contrôles de liste de la barre d'outils Formulaires( Word 2000/2003), ou contrôles de formulaire hérité (Word 2007 et ultérieur)

On va créer cette macro qui se déclenchera automatiquement à la sortie du contrôle de formulaire. 

Sub couleurs()

ld = Selection.FormFields(1).DropDown.Value
ActiveDocument.Unprotect

Select Case ld
Case 1
Selection.Font.Color = wdColorGreen
Case 2
Selection.Font.Color = wdColorRed
Case 3
Selection.Font.Color = wdColorBlack
End Select
ActiveDocument.Protect Type:=wdAllowOnlyFormFields, NoReset:=True

End Sub

 

Pour que la macro se déclenche :

  • Double-cliquez sur chaque liste déroulante
  • Sous la rubrique Exécuter la macro, sélectionnez la macro en question dans la liste déroulante A la sortie.

Statistiques

Aujourd'hui133
Hier2637
Cette semaine2770
Total depuis 200410055940

8
visiteurs actuellement en ligne