Changer valeur liste deroulante dans word à partir d'excel
davberna
Messages postés
4
Date d'inscription
Statut
Membre
Dernière intervention
-
davberna Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
davberna Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
Bonjour à tous,
A partir d'un fichier Excel, j'aimerais sélectionner les valeurs d'une liste déroulante sur Word.
J' arrive à modifier un Quickpart ou même une case à cocher mais pas une liste déroulante.
J'ai essayé de nombreux codes mais j'ai toujours une erreur.
Voic mon code en 2 parties : ouvrir word puis changement valeur d'une liste qui s'appelle "coco" et dont une valeur est "papa"
Merci par avance pour votre aide car je tourne en rond.
cordialement
A partir d'un fichier Excel, j'aimerais sélectionner les valeurs d'une liste déroulante sur Word.
J' arrive à modifier un Quickpart ou même une case à cocher mais pas une liste déroulante.
J'ai essayé de nombreux codes mais j'ai toujours une erreur.
Voic mon code en 2 parties : ouvrir word puis changement valeur d'une liste qui s'appelle "coco" et dont une valeur est "papa"
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
'ouvre session word
Set WordApp = New Word.Application
'ouvre du document Word
Set WordDoc = WordApp.Documents.Open("C:\testexcel3.docx")
'word est masqué pendant l'opération
WordApp.Visible = True
''''
'essaie de plusieurs codes pour essayer de mettre "papa" dans la liste déroulante "coco"
'WordDoc.Bookmarks("coco").Range.Text = "papa"
'WordDoc.FormFields(1).DropDown.Value = "papa"
'WordDoc.Fields(1).Result.Text = "papa"
'WordDoc.Fields(1).Result = papa
'WordDoc.ComboBox1.Value = papa
'WordDoc.FormFields("coco").Result = "papa"
'WordDoc.FormFields.Item("coco").Result = papa
'WordDoc.FormFields.Item("coco").DropDown.Value = "papa"
'WordDoc.FormFields("coco").DropDown.Value = Range("C6")
'WordDoc.DropDown("coco").Value = Range("C6")
'WordDoc.DropDown1.Value = "papa"
'Thisdocument.listbox1.Value = "papa"
Merci par avance pour votre aide car je tourne en rond.
cordialement
A voir également:
- Changer valeur liste deroulante dans word à partir d'excel
- Liste déroulante excel - Guide
- Changer dns - Guide
- Word et excel gratuit - Guide
- Excel liste déroulante en cascade - Guide
- Word 2013 - Télécharger - Traitement de texte
2 réponses
si tu sais où se situe papa dans ta liste qui alimente ta listbox (dans ce cas dans la 3eme ligne) tu peux utiliser :
Sélectionner la 3eme ligne dans une ListBox.
déjà je modifierai cette ligne en rajoutant le readonly := false
je continue à chercher...
Sélectionner la 3eme ligne dans une ListBox.
ListBox1.ListIndex = 2 '1ere ligne = 0
déjà je modifierai cette ligne en rajoutant le readonly := false
Set WordDoc = WordApp.Documents.Open("C:\testexcel3.docx", ReadOnly :=false)
je continue à chercher...
Ca ne marche pas.
De plus pour moi il me semblai que Additem était fait pour rajouter un élément de liste alors que je veux juste choisir la valeur "papa" dans ma liste qui peut avoir plusieurs valeurs dont "papa"
merci quand même
pourquoi tu passes de WordDoc à Thisdocument?
comme tout ce que j'ai essayé avec worddoc ne marchait pas j'ai tenté Thisdocument sans succès.
dans un premier temps il faudrait être sur du nom de l'objet en question
partage tes fichiers en question anonymisés ici via cjoint en créant un lien que tu colles ici en réponse pour y voir + clair