Hoe zet je de waarde van een checkbox in een Word doc.?

[jen]

Ik heb 4 checkboxen gemaakt in Word 2003

Checkbox 1, naam 1
Checkbox 2, naam 2
Checkbox 3, naam 3
Checkbox 4, naam 4

De keuze is 1,2,3, of 4 namen invoeren in het Word document

Hoe kun je de namen die (als caption) achter de checkbox staat als waarde in je document krijgen?

Ik krijg nu de waarde Waar als de checkbox is aangevinkt. Maar ik wil graag de waarde van de caption...

 

[jen]

Ik heb zelf een beetje zitten puzzelen. Het werkt wel, maar ik weet niet of dit de juiste werkwijze is.

Private Sub CommandButton1_Click()
a = CheckBox1.Value
If CheckBox1.Value = True Then
a = "truus"
ActiveDocument.Bookmarks("naam").Range = a
Unload UserForm1
End If
End Sub

 

[Wigi]

Private Sub CommandButton1_Click()
If CheckBox1.Value Then
ActiveDocument.Bookmarks("naam").Range = "truus"
Unload UserForm1
End If
End Sub