Discussion :

[yougmeaz]

Bonjour !

Je cherche à savoir s'il est possible d'importer toute un plage de données excel dans une DropdownList sous Word.

Je pourrais effectivement les ajouter un par un mais la liste est longue et surtout évolutive...

La manip me parait un peu élaborée mais on découvre parfois des surprises ! Alors si jamais vous connaissez quelque chose du genre, je suis preneur

[Heureux-oli]

Salut,

Une piste là : http://heureuxoli.developpez.com/off...ormulaires/#L4

[yougmeaz]

Bonjour Oli et merci pour ta suggestion.

J'ai finalement décidé d'utiliser :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub MISE_A_JOUR_SERVICES()
Dim objCC As ContentControl
Dim objCE As ContentControlListEntry
Dim objMap As XMLMapping
 
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlDropdownList)
objCC.Title = "Service"
If objCC.ShowingPlaceholderText Then _
 objCC.SetPlaceholderText , , "Choisissez un service"
 
'List entries
objCC.DropdownListEntries.Add "A.D.V."
objCC.DropdownListEntries.Add "ACCUEIL"
 'Ainsi de sutie avec tous mes services

Je fais don cun copié collé de la formule entière, ça revient presque au même :-)

Merci !