VB INTEGRACAO COM WORD CAIXA DE SELECAO
estou tentando marcar uma caixa de seleção que inclui num formulário do word via vb, ábaixo o código que retirei aqui do site, mas não estou conseguindo, pois da maneira que estou tentando quando abre o formulário do word a caixa some e é inserido [Ô]true[Ô].
a
Private Sub Command7_Click()
Set objWord = New Word.Application
objWord.Visible = True
Set objDoc = objWord.Documents.Open(App.Path & [Ô]\PROPOSTA DE FINANCIAMENTO.doc[Ô])
objDoc.Activate
[ô]If objDoc.FormFields([Ô]Selecionar1[Ô]).CheckBox = True Then
objDoc.Bookmarks([Ô]Selecionar1[Ô]).Range.Text = True
[ô]End If
End Sub
a
Private Sub Command7_Click()
Set objWord = New Word.Application
objWord.Visible = True
Set objDoc = objWord.Documents.Open(App.Path & [Ô]\PROPOSTA DE FINANCIAMENTO.doc[Ô])
objDoc.Activate
[ô]If objDoc.FormFields([Ô]Selecionar1[Ô]).CheckBox = True Then
objDoc.Bookmarks([Ô]Selecionar1[Ô]).Range.Text = True
[ô]End If
End Sub
Consegui.
Para quem precisar ai vai...
Private Sub Command7_Click()
Set objWord = New Word.Application
objWord.Visible = True
Set objDoc = objWord.Documents.Open(App.Path & [Ô]\PROPOSTA DE FINANCIAMENTO.doc[Ô])
objDoc.Activate
objDoc.FormFields([Ô]Selecionar1[Ô]).CheckBox.Value = True
End Sub
Tópico encerrado , respostas não são mais permitidas