Notifications
Clear all

Exportar para word dentro de um modelo

9 Posts
2 Usuários
0 Reactions
3,130 Visualizações
(@mylton)
Posts: 59
Trusted Member
Topic starter
 

Bom dia.
Procurei no fórum, uma forma de criar via VBA um botão que exportasse os dados de um determinado registro num cadastro para um modelo doc.
De modo que esses dados fossem direto para o local escolhido na criação do modelo.
Em anexo um modelo de cadastro e um modelo de doc.
Se puderem ajudar com alguma dica ficarei agradecido.
Obrigado

 
Postado : 26/03/2013 5:52 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

mylton,

Na verdade, o que você quer dá, perfeitamente, para você fazer diretamente dio próprio Word. O que você quer é fazer uma mala direta, buscando os dados em um Banco de Dados. Você pode, por exemplo, fazer seu banco de dados no Excel e depois, no Word, da sua mala direta, indicar o arquivo Excel como Banco de dados para que o mesmo emscle com os dados desse banco de dados.

Todavia, atendendo ao seu pedido, segue seu arquivo após processadas as devidas alterações. Clique no novo botão que criei no seu arquivo do Excel para testar.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 26/03/2013 7:14 am
(@mylton)
Posts: 59
Trusted Member
Topic starter
 

Vou testar a nite em casa e posto dp. Dese ja mto obrigado

 
Postado : 26/03/2013 12:28 pm
(@mylton)
Posts: 59
Trusted Member
Topic starter
 

Oi Wágner.
Tudo bem?
Espero que sim.
Testei sua dica.
Contudo, ficaram duas dúvidas:
1) Tem como exportar somente o conteúdo? Do jeito que está vai com célula e isso aumenta o arquivo e dificulta sua arrumação no doc.
2) Percebi que esta relacionado a linha 2. O que desejava era que fosse relacionado no form. Onde ao clicar num botão exportasse o registro de n. 001, o 002 exporta e assim sucessivamente.
Se vc puder tenta ajudar-me em outro post meu.
viewtopic.php?f=10&t=7006
Obrigado

 
Postado : 26/03/2013 5:39 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

mylton,

Boa Noite!

Bem... até onde vai o meu conhecimento (que é pouco) creio não ser possível exportar sem ser como célula. Na verdade, não é que esteja sendo exportada a própria célula. Eu modifiquei seu arquivo Word para que ele ficasse no formato de tabela (no caso, com duas colunas). Porque isso? Porque quando você tem células no Word, você pode colocar, em caa uma delas, um nome como indicador de localização do dado. Esse localizador é utilizado então pelo código que assim "sabe" onde ele deve inserir o dado que está no Excel. apesar de você também poder inserir indicadores no Word fora de células (ou tabelas), como texto comum, na hora que você manda inserir os dados do Excel, além desse dados dessarumarem os dados no Word, esses dados ainda sobrepõem os indicadores previamente inseridos o que significa que você só utilizaria os indicadores no código uma única vez. Ou seja, se precisasse rodar a maxro de novo, ela não mais funcionaria pois não acharia mais os indicadores que foram previamente inseridos.

Com relação a inserir os dados dos demais registros, até é possível sim, todavia, como você mesmo mencionou, seu arquivo em Word ficaria pesadíssimo já que ficaria com muitas páginas e todas com células.

De outro modo, é como já lhe disse também: utilize Mala Direta do Word que é muito mais simples e prático para essa finalidade que você quer.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 26/03/2013 5:50 pm
(@mylton)
Posts: 59
Trusted Member
Topic starter
 

Wganer achei esses códigos, só não sei como adaptar...rsrsrs
http://www.vbaexpress.com/forum/archive/index.php/t-35558.html&prev=/search%3Fq%3Dvba%2Bexportar%2Bexcel%2Bword%26hl%3Dpt-BR&sa=X&ei=_DFSUYGmKcri4AOo2oAI&ved=0CJ8BEO4BMA k"> http://translate.google.com.br/translat ... J8BEO4BMAk

http://info.abril.com.br/forum/viewtopic.php?t=2371

http://translate.google.com.br/translat ... tml&anno=2

http://www.ozgrid.com/forum/showthread.php?t=161959

http://www.ozgrid.com/forum/showthread.php%3Ft%3D11398&prev=/search%3Fq%3Dvba%2Bexportar%2Bexcel%2Bword%26hl%3Dpt-BR&sa=X&ei=_DFSUYGmKcri4AOo2oAI&ved=0CFoQ7gEwA w"> http://translate.google.com.br/translat ... CFoQ7gEwAw

http://www.xtremevbtalk.com/showthread.php%3Ft%3D307801&prev=/search%3Fq%3Dvba%2Bexportar%2Bexcel%2Bword%26start%3D10%26hl%3Dpt-BR%26sa%3DN%26biw%3D1366%26bih%3D667&sa=X&ei=9jNSUbG-B6nj0QGRm4H4DQ&ved=0CDMQ7gEwADg K"> http://translate.google.com.br/translat ... MQ7gEwADgK

http://www.exceltip.com/st/Copy_worksheet_information_to_Word_using_VBA_in_Microsoft_Excel/481.html&prev=/search%3Fq%3Dvba%2Bexportar%2Bexcel%2Bword%26start%3D10%26hl%3Dpt-BR%26sa%3DN%26biw%3D1366%26bih%3D667&sa=X&ei=9jNSUbG-B6nj0QGRm4H4DQ&ved=0CDwQ7gEwATg K"> http://translate.google.com.br/translat ... wQ7gEwATgK

http://voices.yahoo.com/excel-vba-print-text-word-document-7547014.html&usg=ALkJrhjc5O-tmsEQvSybxYazKcfyph_Gn w"> http://translate.googleusercontent.com/ ... Kcfyph_Gnw

Obrigado mais uma vez.

 
Postado : 26/03/2013 5:55 pm
(@mylton)
Posts: 59
Trusted Member
Topic starter
 

Amigo
Só mais duas coisas, então:
Como seria exportar pelo código da forma que vc criou?
onde acho literatura para sua dica de mala direta.
Quanto a ajuda no outros post? teria alguma ideia?
Obrigado

 
Postado : 26/03/2013 6:32 pm
(@mylton)
Posts: 59
Trusted Member
Topic starter
 

Esqueci..
rsrsrs
Como colocou os indicadores?
Obrigado

 
Postado : 26/03/2013 6:33 pm
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Mylton,

Na internet tem vários tutoriais sobre a criação de mala direta no Word. abaixo segue um desses tutoriais:
http://www.wfdias.com.br/tutorial/308/c ... rd-e-excel

Todavia, elaborar uma mala direta no Word é tão fácil que até seguindo o assistente de mala direta no próprio Word você conseguirá fazer facilmente. Para fazer isso, vá na aba Correspondências e no painel Iniciar mala direta, clique na pequena seta para baixo do botão Iniciar Marla Direta. alí você pode escolher o ítem Cartas, por exemplo (que é o seu caso). Isso fará o botão vizingo (Selecionar Destinatários ser habilitado. Clicando na pequena seta para baixo desse botão você pode selecionar o ítem Usar Lista Existente. Isso abrirá a caixa de Arquivos para que você indique o arquivo Excel que você já deve ter previamente criado. A única observação que você deve ter em relação a utilização de um arquivo Excel como Banco de Dados em uma mala direta é que a linha 1 da planilha deve conter o nome de cada coluna (cabeçalhos) e as demais linhas, cada uma, com seu respectivo registro. após escolher o arquivo, os demais botões da guia Correspondência serão também habilitados. agora você pode ir digitando normalmente a sua carta e, quando encontrar um dado que será variável na carta, você clica na seta para baixo do botão Inserir Campo de Mesclagem e escolhe o campo (do Excel) que armazena aquele campo variável. Finalmente, depois de pronta toda a carta e salva, existe um botão chamado Concluir e Mesclar cuja seta para baixo deixa que você Imprima os documentos (já mesclados com os dados que estão armazenados no Excel) diretamente para a impressora. Cada registro gerará uma carta única personalizada.

Com relação a ajuda no outro post, eu não entendi o que você está querendo de verdade. Seu post está muito confuso. Sugiro que você abrta um novo post e com muitas minúcias de como é que você está querendo. No fórum tem muitas pessoas que poderão ajudar (desde que entendam) além de mim. Coloque suas planilhas compactadas e explique detalhadamente.

Os indicadores no Word são inseridos na Guia Inserir, Painel Links, Botão Indicador.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 26/03/2013 7:00 pm