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 campo?





Às vezes em um formulário existem campos que deverão ter o mesmo conteúdo, seja ele um valor ou um texto qualquer. Para agilizar o preenchimento podemos fazer com que o conteúdo de um campo se repita 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 onde será inserido o nome do requerente no corpo do requerimento e selecione Propriedade.


Propriedades

Nas propriedade dos campos de formulários marque a opção de calcular ao sair.  Anote o nome dos campo que você quer puxar os dados, neste exemplo o nome do Indicador é Texto3.


Opções do campo de formulário texto


Se o formulário estiver protegido desative sua proteção e exclua o campo nome do espaço reservado para assinatura. Veja a imagem:


Formulário

Agora coloque o cursor no lugar onde quer o campo nome se repita.


No menu Inserir clique em Campo, na listagem Nomes de campos clique em Ref. À direita irá 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 sequência de imagens abaixo


Campo

Campo


Exemplo 2:


É possível também criando um vínculo.


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


Propriedades


Nas propriedade dos campos de formulários marque a opção de calcular ao sair. 


Opções do campo de formulário texto


Selecione o campo e clique no menu Editar >> Copiar


Copiar


Coloque o cursor no lugar onde quer que apareça os dados digitados no campo anterior.


Formulário


Acione novamente o menu Editar >> 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


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 nome padrão a saber: Texto1 e Texto 15. (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).


Formulário

Abra o Editor do Visual Basic acionando o as teclas ALT + F11 simultaneamente. Observe a imagem abaixo:


Editor do Visual Basic


No ambiente de programação clique no menu Inserir e selecione Módulo.


Inserir Módulo

Agora vamos criar uma macro e daremos o nome de repetecampo.


Digite o código abaixo dentro do módulo:


Subrepetecampo( )     'Copia o texto de Texto3 e repete-o em Texto15
    Dim strValor as String
    strValor = ActiveDocument.FormFields("Texto3").Result
    ActiveDocument.FormFields("Texto15").Result = strValor
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 primeiro campo do formulário e selecione Propriedades.


Veja a sequência de imagens abaixo:


Propriedades

Em Saída selecione o nome da 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.


Considerações Finais: Neste tutorial apresentamos dois campos que devem se repetir (Nome e RG). As formas aqui mostradas de como fazer isso foi somente com o campo Nome, porém, para fazer o campo RG se repetir é só seguir os mesmos passos. Com os exemplos aqui mostrados é possível fazer essa tarefa com quantos campos de formulários forem necessários.



Veja também...


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


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


Formulário com Macro - Exemplo 2: Repetindo conteúdo dos controles


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


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


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