Word Checkbox durch Excel VBA aktivieren.

[schmidli]

Hallo zusammen,
ich benötige mal eure Hilfe.
ich habe ein Word Formular erstellt das mit Textmarker bestückt ist.
nun wollte ich fragen wie das funktioniert, wenn auch eine Checkbox im Word Formular aktiviert werden soll.
Kann ich da auch einen Textmarker bei der Checkbox machen oder gibt es da einen Code dazu?

[00202]

Hallo, :19:

die kannst du so ansprechen: :21:

CheckBox object (Word)...

[schmidli]

besten dank werde ich gleich mal testen.

[schmidli]

Hallo Case,
ich habe es versucht aber leider ohne erfolg.
siehst du da einen Fehler?

Code:

Option Explicit
Private Sub CommandButton1_Click()
Dim WordApp As Object

Set WordApp = CreateObject("Word.Application")
With WordApp
    .Visible = True
    .WindowState = 1
    AppActivate .Caption
    .Documents.Open Filename:="C:FilePfad\Dokument.docx"
End With
With WordApp.ActiveDocument
.FormFields("TEST").CheckBox1.Value = True
End With

End Sub

[00202]

siehst du da einen Fehler?

Hallo, :19:

also - nach "C:" fehlt ein Backslash. Und es heißt nicht ".CheckBox1.Value", sondern ".CheckBox.Value".

Aber - magst du eine Beispieldatei (Word) hochladen? :21:

[snb]

Einfacher so:

Code:

Private Sub CommandButton1_Click()
  with getobject("C:\FilePfad\Dokument.docx"
    .windows(1).visible = true
    .FormFields(1).CheckBox.Value = True
  End With
End Sub

[schmidli]

    besten Dank 
leider bekomme ich einen Fehler bei der Zeile

Code:

with getobject("C:\FilePfad\Dokument.docx"

Den Fad ist aber richtig Hinterlegt.

[Steffl]

Hallo,

da fehlt die schließende Klammer

Code:

with getobject("C:\FilePfad\Dokument.docx")

[schmidli]

danke dir die habe ich tatsächlich übersehen.
wenn ich aber die Klammer noch anschließend mache kommt immer noch ein Syntax Fehler.
leider darf ich aus geschäftlichen Gründen das Word nicht hochladen

[steve1da]

Hola,

Obelix hat genau das gleiche Problem....

https://office-fragen.de/thread-11069.html

Gruß,
steve1da