Discussion :

[familledacp]

Bonjour à tous et toutes

Je cherche depuis mon fichier excel a remplir un document word avec entre autres des cases a cocher.

Sur mon fichier word de base, ma première case à cocher est nommée CheckBox1 (clic droit / propriétés / signet = Checkbox1)

Je fais le test suivant, mais cela beugue

Code :

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

1
2
3
4
5
6
7
8
9
Set objword = CreateObject("Word.Application")
 
objword.Visible = True
Set objdoc = objword.Documents.Open("e:\1 - aff\aa divers novorest\00 - gestion affaires\00 base\OprEtRece\Modele Exe 4.doc")
 
Set objselection = objword.Selection
 
'Essai case a cocher
objdoc.checkbox1.Value = True

Avez vous une explication ?

Merci pour votre aide

Daniel S

[familledacp]

Bonjour

En furetant sur le web, j'ai trouvé une (la ?) solution :

Il suffisait de remplacer les chekbox de mon formulaire par des checkbox avec controle activeX et tout fonctionne correctement

A bientot

Daniel