Tutoriais Word
Home  |  Tutoriais  |  Artigos  |  VBA  |  Download  |  eBooks Word VBA  |  Dicas e Truques  |  Teclas de Atalho  |  Serviços  |  Contato


Categorias

Básico/Intermediário

  Avançado

  VBA

  Tabelas

  Formulário

  Campo

  Livros

  ABNT

  TCC

Personalizando Formulário

eBook Word 2010 VBA

Tabela do Word como banco de dados

Como repetir o conteúdo de um campo de formulário em outro?





Às vezes em um formulário existem campos que deverão ter o mesmo conteúdo. Para agilizar o preenchimento podemos fazer com que o conteúdo de um campo seja repetido em outro automaticamente.


Veja na imagem abaixo o exemplo de um requerimento onde os campos Nome e RG do requerente constam no corpo do requerimento e no espaço reservado para assinatura do mesmo.


Formulário


Quanto o usuário preenche o Nome e RG no corpo do requerimento automaticamente os campos Nome e RG do espaço reservado para assinatura também é preenchido.


Mostrarei aqui quatro formas de executar essa tarefa.


Exemplo 1:


Se o valor a ser exibido for texto você pode utilizar Campo.


Clique com o botão direito do mouse sobre o Campo de Texto onde será inserido o nome do requerente no corpo do requerimento e selecione Propriedades.


Propriedades


Na caixa de diálogo Opções do campo de formulário texto marque a opção de Calcular ao sair.  Anote o nome do campo que você quer puxar os dados, neste exemplo o nome do Indicador é Texto3.


Opções do campo de formulário texto


Agora vamos colocar o ponto de inserção na frente de Nome:, logo abaixo da linha de assinatura do requerente.



Acione a Guia Inserir e no Grupo Texto clique em Partes Rápidas e depois em Campo...


Campo


Na listagem Nomes de campos clique em Ref. À direita irão aparecer todos os campos que você tem no seu documento. Selecione Texto3 clique sobre ele e tecle OK. Se desejar defina as opções de campos.  Observe a imagem abaixo:


Campo Ref


Siga os mesmos procedimentos para repetir o RG do requerente.


Proteja o Formulário e preencha-o para ver o resultado:


Formulário


Exemplo 2:


Criando um vínculo.


Selecione o campo onde será inserido o nome do requerente no corpo do requerimento e clique com o botão direito do mouse sobre e selecione Propriedades.


Propriedades


Na caixa de diálogo Opções do campo de formulário texto marque a opção de Calcular ao sair. Anote o nome do campo que você quer puxar os dados, neste exemplo o nome do Indicador é Texto3.


Opções do campo de formulário texto


Selecione novamente o campo onde será inserido o nome do requerente.


Acione a Guia Início e no Grupo Área de Transferência clique em Copiar.


Copiar para área de transferência


Agora vamos colocar o ponto de inserção na frente de Nome:, logo abaixo da linha de assinatura do requerente.




Acione a Guia Início e no Grupo Área de Transferência clique na setinha abaixo da ferramenta Colar para abrir as opções de colagens.Selecione a opção Colar Especial.


Colar Especial


Selecione a opção Colar vínculo e do lado direito selecione a opção Texto não formatado. Clique em OK.


Colar vínculo


Siga os mesmos procedimentos para repetir o RG do requerente.


Proteja o Formulário e preencha-o para ver o resultado:


Formulário


Exemplo 3:


Dependendo do seu formulário eu recomendo utilizar este exemplo:


Neste exemplo vamos usar o Editor do Visual Basic (VBA) para criar uma macro que será acionada ao sair de um campo de formulário:


Manteremos os campos de texto com os nomes padrão, a saber: Texto1 e Texto13. (para saber o nome do Indicador do campo basta selecioná-lo e clicar com o botão direito do mouse sobre ele e clicar em propriedade).


Para abrir o Editor do Visual Basic acione a Guia Desenvolvedor e no Grupo Código clique em Visual Basic ou acionando as teclas ALT + F11 simultaneamente. Observe a imagem abaixo:


ThisDocument


Clique no menu Inserir e selecione Módulo para inserir um novo módulo.


Inserir Módulo


Na Janela de Código criaremos a macro e daremos o nome de repetecampo, portanto, dentro do módulo adicione as seguintes linhas de código:


Sub repetecampo( )
Dim strNome as String
Dim strRG as String
'Copia o texto de Texto3 e repete-o em Texto15
strNome = ActiveDocument.FormFields"Texto3").Result
ActiveDocument.FormFields("Texto13").Result = strNome
'Copia o texto de Texto3 e repete-o em Texto14
strRG = ActiveDocument.FormFields("Texto4").Result
ActiveDocument.FormFields("Texto14").Result = strRG
End Sub



Observe a imagem abaixo:


Janela de Código


Feche o Editor do Visual Basic para voltar ao documento que contém os campos de formulário:


Clique com o botão direito do mouse sobre o Campo de Texto (Texto3), onde será informado o nome do requerente e em seguida selecione Propriedades.


Veja a de imagem abaixo:


Propriedades


Em Saída selecione a macro repetecampo que acabamos de criar e dê um OK


Opções do campo de formulário texto


Clique com o botão direito do mouse sobre o Campo de Texto (Texto4), onde será informado o RG do requerente e em seguida selecione Propriedades.


Veja a de imagem abaixo:


Propriedades


Em Saída selecione a macro repetecampo que acabamos de criar e dê um OK


Opções do campo de formulário texto


Proteja o Formulário e faça um teste para ver o resultado.


Formulário


Exemplo 4:


Se o valor a ser exibido em outro campo fosse um valor numérico seria fácil de resolver.


Bastaria seguir os seguintes passos:


1.Selecione o campo onde o valor será informado


2.Clique com o botão direito sobre ele e selecione Propriedades


3.Ative as opções Preenchimento e Calcular ao sair


4. Memorize o nome do Indicador, por padrão é sempre Texto1, Texto2... a não ser que tenha sido alterado para outro nome por quem criou o formulário.


5. Selecione o campo onde deverá aparecer automaticamente o valor digitado no campo anterior.


6. Clique com o botão direito sobre ele e selecione Propriedades


7. Agora no campo Tipo selecione Cálculo


8. No campo Expressão digite o nome do Indicador do campo anterior. Por exemplo: =Texto1


9. Clique em OK e proteja o formulário.


Para que uma macro possa ser executada é necessário alterar a configuração de Macro do Word. Pra isso clique no Botão do Office e em seguida clique no botão Opções, como mostra as imagens abaixo:


Opções do Word


Na janela de Opções do Word clique em Central de Confiabilidade:


Central de Confiabilidade


Clique em Configurações da Central de Confiabilidade...


Configurações da Central de Confiabilidade


Em Central de Confiabilidade clique em Configurações de Macro e em Configurações de Macro selecione a opção Habilitar todas as macros.


Configurações de Macro


Para concluir clique no botão OK. Agora o Microsoft Word está habilitado para executar macros.


Considerações Finais: Neste tutorial apresentamos dois campos que devem se repetir (Nome e RG). Com os exemplos aqui mostrados é possível fazer essa tarefa com quantos campos de formulários forem necessários.





Veja também...


Formulário com Macro - Exemplo 1: Cálculo Automático


Formulário com Macro - Exemplo 3: Caixa de Seleção


Formulário com Macro - Exemplo 4: Usar Enter em vez de Tab


Formulário com Macro - Exemplo 5: Cálculos com datas


Formulário com Macro - Exemplo 6: Cálculos com datas


Conhecendo os Controles de Formulários


Como criar Formulário no Word


Como criar Formulários com Cálculo automático - Exemplo 1


Como criar Formulários com Cálculo automático - Exemplo 2


Como proteger somente o Formulário e deixar o restante do documento livre para edição


Inserindo Texto de Ajuda







eBook Word 2010 VBA

      

 Inscreva-se

 E seja informado sempre que um novo tutorial for publicado.

 E mais... Você poderá fazer gratuitamente o download de 02(dois) e-Books:
- Como preencher uma tabela(VBA) - Iniciante;
- Como preencher uma tabela com várias linhas(VBA) - Iniciante.


 Nome* 
 E-mail* 
 *Preenchimento obrigatório.
Prometemos não utilizar suas informações de contato para enviar qualquer tipo de SPAM.

 



eBook Word 2010 VBA




© 2013 Tutoriais Word - Todos os direitos reservados