Bom dia.
Antes de mais nada sou um pouco leigo em VBA, porém entendo de programão orientada a objeto. Criei uma macro em VBA para copiar uma planilha, em anexo neste post, para uma determinada referência em um arquivo no word. Porém eu quero também centralizar a planilha. Quando o eu "colo" ela no word ela vai formatada a esquerda.
Li a respeito de alguns métodos de colagem como o ParagraphFormat.Alignment ou Rows.alignment , porém não consigo usar, na vdd eu não sei.
Acredito eu o método "rows.alignment" funciona porém quando eu colo no word eu perco a referência na tabela, ela não fica mais selecionada.
Código - Copia no excel e cola no word:
Sub Botão_127()
Dim ws As Worksheet
'Define o nome da ABA
Set ws = ThisWorkbook.Sheets("Dados para o relatório")
'Define o Objeto Word
Dim OBJWORD As Object
'Define o objeto de aplicacao WORD
Dim Doc As Word.Document
'Cria o oobjeto para abertura posteriormente
Set OBJWORD = CreateObject("Word.Application")
'Exibe a janela do word
OBJWORD.Visible = True
'Inserindo documento
Set Doc = OBJWORD.Documents.Open("C:UsersLABLUXNOVO3DesktopTestes Macro AlecRelatorio teste 127.docx")
'DADOS PARA O RELATÓRIO
'Copia Todas as Celulas
ws.Range("C9:L20").Copy
'Procurou a referência Dados de Planilha
With Doc
.Application.Selection.Find.Text = "#DdRelat"
.Application.Selection.Find.Execute
.Application.Selection.PasteExcelTable False, False, False
End With
Postado : 24/11/2017 7:47 am