Código de macro de exemplo para alterar as maiúsculas/minúsculas do texto no Excel

Resumo

Embora o Microsoft Excel tenha funções que alteram as maiúsculas/minúsculas do texto, há alturas em que poderá querer alterar as maiúsculas/minúsculas de texto através de programação.

Este artigo contém três macros de exemplo do Microsoft Visual Basic for Applications (Subprocessos) que pode utilizar para alterar as letras numa cadeia de texto para todas em maiúsculas, todas em minúsculas ou maiúsculas (a primeira letra em cada palavra está em maiúscula). Estas ações são semelhantes às funções do Excel, =UPPER(), =LOWER() e =PROPER().

Mais Informações

A Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isto inclui, mas não se limita a, as garantias implícitas de comercialização ou adequação a uma finalidade específica. Este artigo pressupõe que está familiarizado com a linguagem de programação que está a ser demonstrada e com as ferramentas que são utilizadas para criar e depurar procedimentos. Os engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas não modificarão estes exemplos para fornecer funcionalidades adicionais ou criar procedimentos para satisfazer os seus requisitos específicos.

Sub Uppercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("A1:A5")
      ' Change the text in the range to uppercase letters.
      x.Value = UCase(x.value)
   Next
End Sub

Sub Lowercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("B1:B5")
      x.Value = LCase(x.Value)
   Next
End Sub

Sub Proper_Case()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("C1:C5")
      ' There is not a Proper function in Visual Basic for Applications.
      ' So, you must use the worksheet function in the following form:
      x.Value = Application.Proper(x.Value)
   Next
End Sub

Referências

Para obter mais informações sobre como utilizar funções de folha de cálculo para alterar as maiúsculas/minúsculas do texto, clique no seguinte número de artigo para ver o artigo na Base de Dados de Conhecimento Microsoft:

263580 Como alterar as maiúsculas/minúsculas do texto no Excel

Para obter mais informações sobre como obter ajuda com Visual Basic for Applications, clique no seguinte número de artigo para ver o artigo na Base de Dados de Conhecimento Microsoft:

305326 Lista de recursos de programação para Visual Basic for Applications