Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Integração com Word...
 
Notifications
Clear all

Integração com Word - Tabela

 
2024 - VBA & Macros
Post Recente por adGere 8 anos atrás
2 Posts
2 Usuários
0 Reactions
1,153 Visualizações
RSS
 areias001
(@areias001)
Posts: 13
Active Member
Topic starter
 

Pessoal, é o seguinte,

Tenho um formulário em excel e quero exportar os dados para um relatório em Word. Eu consigo manipular bem quando crio objetos ActiveX no Word. O problema é que pro usuário editar depois não rola.

De forma resumida, uma das informações é a "Descrição" de uma ocorrência e eu gostaria que posteriormente o usuário pudesse editar o texto normalmente como se tivesse sido escrito no próprio Word.

Eu tentei utilizar um controle de conteúdo rich text, mas não consigo referenciá-lo depois no VBA ou então lançar os dados direto na célula da tabela do Word, mas também não consigo fazer a referência.

Seguem os arquivos simplificados de exemplo,

Agradeceria muito a ajuda de vocês, obrigado!

 
Postado : 27/12/2016 12:21 pm
 adGere
(@adgere)
Posts: 76
Trusted Member
 
Private Sub CommandButton1_Click()

Dim objWord As Object
Dim DOC As Word.Document
Set objWord = CreateObject("Word.Application")
objWord.Visible = True

Set DOC = objWord.Documents.Open("C:UsersGerenuttiDownloadsRelatório de Ocorrências - AUTO.docx")

                        With DOC
                             
                             DOC.Tables(1).Cell(18, 1).Select
                             DOC.Application.Selection.TypeText Text:=txtDescricao.Value
                                
                        End With
End Sub
 
Postado : 02/01/2017 10:08 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico