Håndtering af checkboxe i Word

Du kan ikke uden videre bruge caption, Det er mere almindeligt at referer til name eller index.
Prøv at kigge på den her:
Sub wrd()
Dim objwrd As New Word.Application
Dim objDoc As Word.Document

Set objDoc = objwrd.Documents.Open("C:\dok1.doc")

If objDoc.CheckBox1 = True Then
  MsgBox "tjek"
Else
  MsgBox "IKKE tjekket"
End If

objDoc.Close
Set objDoc = Nothing
Set objwrd = Nothing

End Sub

'CheckBox1' er NAVNET på en chekbox sat direket på et dokumentet 'C:\dok1.doc'

Niels

Jeg skal bruge caption. Men dit forslag gav mig egentlig et hint om syntaksen. Jeg var ikke klar over at jeg blot kunne bruge punktum-notation til referencen direkte. Jeg fandt frem til, at for at ændre caption fra Access kan det gøres ved at skrive:
objDoc.checkbox3.Caption = "Ny tekst til checkbox3"

Ganske simpelt når det nu står der.

Torben

Torben -> mere 'syntaks' :)

Hvis Word er åben kan du referere til Word på flg. måde:
  Set objwrd = GetObject(, "Word.Application")
Hvis dit dokument er åben kan du bruge flg syntaks
  Set objDoc = objwrd.Application.Documents.Item("dok1.doc")

Niels