Je ne peux pas lire un chexkbox

[phil91]

je dois récupérer à l'aide d'une macro les données d'un formulaire word
avec des signets. Cela fonctionne mais je n'arrive pas à lire le résultats des cases à cochers. je récupèrer des  (carré) cochez ou pas.
comment puis je faire

Voici mon code

a = 1
Dim Wd As Word.Application
Set Wd = New Word.Application
With Wd
.Visible = False
.Documents.Open ("C:\inscription.doc")

z = ActiveDocument.Bookmarks.Count
.Selection.GoTo What:=wdGoToBookmark, Name:="Texte53"
num = .Selection.BookmarkID


Dim aMarks As Bookmark

Feuil1.Cells(a, 2) = .Selection.Text
a = a + 1
For i = z To 1 Step (-1)

Set myField = .Selection.NextField
If Not (myField Is Nothing) Then StatusBar = "Field found"
testar = .Selection.Text

Feuil1.Cells(a, 2) = .Selection.Text
a = a + 1
Next



.Quit False
End With

 

[STéphane]

bonjour

essaye d'utiliser la collection fields, myfield en faisant partie si je comprends bien.

je crois que pour en retourner le resulta, il faut utiliser la propriété result des champs.

bye
stephane