Do Básico ao Avançado
Home | Tutoriais | Artigos |Contato

Home > VBA > Adicionar Parênteses ao Texto Selecionado


Adicionar Parênteses ao Texto Selecionado.





Neste tutorial criaremos uma macro que irá Adicionar Parênteses ao Texto Selecionado previamente, por exemplo durante ou após a edição de seu documento você pode querer colocar alguma palavra ou um trecho do texto entre parênteses. 


Para acessar o Editor do Visual Basic, acione a Guia Desenvolvedor e no Grupo Código clique em Visual Basic, ou simplesmente utilize o atalho ALT + F11.


Guia Desenvolvedor


No ambiente de desenvolvimento VBA clique no menu Inserir e depois em Módulo para inserir um novo Módulo.


Inserir Módulo


Na Janela de Código adicione o código abaixo:


Sub adicparenteses()
Selection.InsertBefore "("
Selection.InsertAfter ")"
End Sub



Ficará como na imagem abaixo:


Janela de Código


Feche o Editor do Visual Basic para voltar a área de trabalho do Word.


Fechar e voltar para Microsoft Word


Selecione qualquer palavra no seu documento, como mostra a imagem abaixo:


Texto selecionado


Na Guia Desenvolvedor, no Grupo Código, clique em Macros.


Macros


Selecione a macro adicparenteses e clique em Executar.


Executar macro


Veja o resultado, com apenas um clique foi adicionado parênteses à palavra selecionada:


Adicionar Parênteses


Considerações Finais:


A macro que criamos usa os métodos InsertBefore e InsertAfter para adicionar os parênteses adequadamente antes e depois do texto selecionado. 


Neste exemplo mostramos a inserção automática de parênteses ao texto selecionado, mas podemos também, por exemplo, adicionar aspas, colchetes, chaves etc. Veja os códigos abaixo:


Adicionando aspas:


Sub adicaspas()
Selection.InsertBefore "””"
Selection.InsertAfter "””"
End Sub



Adicionando colchetes:


Sub AdicColchetes()
Selection.InsertBefore "["
Selection.InsertAfter "]"
End Sub



Adicionando chaves:


Sub AdicChaves ()
Selection.InsertBefore "{"
Selection.InsertAfter "}"
End Sub








Gostou? Se quiser mais eu tenho um e-Book sobre VBA que você pode se interessar.
Confira aqui





Conteúdo Correspondente:




eBook Word 2010 VBA

© 2013 Tutoriais Word - Todos os direitos reservados