Sabemos como converter texto em letras minúsculas em letras maiúsculas na planilha, mas como podemos converter letras minúsculas em maiúsculas usando o VBA? Ao automatizar o processo, pode ser necessário converter o texto da planilha em maiúsculas.
Na planilha, usamos a função UPPER para minúsculas para cima. No VBA, temos uma função semelhante. O nome da função é UCase. UCase significa UpperCase.
Sintaxe da função UCase:
= UCase (Fragmento)
Aquifragmentopode ser uma string de código rígido ou uma referência à string.
Portanto, agora que sabemos sobre a função que pode ser usada para transformar letras minúsculas em strings maiúsculas, vamos usá-la em um exemplo prático.
Converter todo o texto em uma folha em maiúsculas
Aqui, temos uma tarefa simples de converter todo o texto de uma determinada planilha em uma pasta de trabalho em letras maiúsculas. eu
Para obter o código para converter o texto em letras maiúsculas; precisamos seguir os passos abaixo para lançar o editor VB
- Clique na guia Desenvolvedor
- No grupo Código, selecione Visual Basic
Copie o código abaixo para o módulo de planilha (não um módulo normal).
Sub UpperCaseCode1 ()
Application.ScreenUpdating = False
Dim Rng como alcance
Dim c As Range
Em caso de erro, continuar próximo
Definir Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
Para Cada C In Rng
c.Value = UCase (c.Value)
Próximo c
Application.ScreenUpdating = True
End Sub
Como funciona?
O código acima é escrito no módulo sheet1. O código acima irá converter todo o texto da planilha1 em maiúsculas.
As linhas principais do código acima são:
Definir Rng = Cells.SpecialCells (xlCellTypeConstants, 2)
Para Cada C In Rng
c.Value = UCase (c.Value)
Próximo c
Aqui usamos a função SpecialCells da classe Cells e passamos os argumentos xlCellTypeConstants. Ele retorna uma enumeração de células e intervalos que contêm constantes.
Em seguida, usamos o loop for para iterar sobre cada célula na enumeração. Em seguida, alteramos o valor da célula usando a função UCase.
Aqui a declaraçãoc.Value = UCase (c.Value) atualiza os valores em cada célula com texto em maiúsculas.
Exemplo 2: converter o texto da coluna A em maiúsculas.
Neste exemplo, temos a tarefa de converter apenas a coluna de texto A. Você pode querer fazer isso quando colunas específicas contiverem texto especial que precisa estar apenas em maiúsculas.
Sub UpperCaseCode2 () Application.ScreenUpdating = False
Dim cell como range
Para cada célula no intervalo ("$ A $ 1:" & Intervalo ("$ A $ 1"). SpecialCells (xlLastCell) .Address)
Se Len (célula)> 0 Então célula = UCase (célula)
Próxima célula
Application.ScreenUpdating = True
End Sub
O código é quase igual ao do exemplo anterior. A única mudança que temos são estas linhas:
Para cada célula no intervalo ("$ A $ 1:" & Intervalo ("$ A $ 1"). SpecialCells (xlLastCell) .Address)
Se Len (célula)> 0 Então célula = UCase (célula)
Próxima célula
Aqui, criamos uma faixa dinâmica usando a linha Intervalo ("$ A $ 1:" & Intervalo ("$ A $ 1"). SpecialCells (xlLastCell) .Address). Esta linha cria um intervalo a partir da célula A1 até a última célula que contém qualquer valor na coluna A.
Em seguida, iteramos em cada célula e a atualizamos com strings em maiúsculas de si mesma.
Você pode baixar o arquivo abaixo.
Download - VBA para converter texto de minúsculas para maiúsculas - xlsm
Então, sim pessoal, é assim que você pode atualizar o texto em letras minúsculas para letras maiúsculas. Espero ter sido suficientemente explicativo. Se você tiver alguma dúvida sobre este artigo ou qualquer outra consulta relacionada ao VBA. Pergunte-me na seção de comentários abaixo.
Como usar a função TRIM no Excel: A função TRIM é usada para aparar strings e limpar quaisquer espaços à direita ou à esquerda da string. Isso nos ajuda muito no processo de limpeza de dados.
Como usar a função CLEAN no Excel: A função de limpeza é usada para limpar caracteres não imprimíveis da string. Esta função é usada principalmente com a função TRIM para limpar dados estrangeiros importados.
Substitua o texto do final de uma string começando na posição variável: Para substituir o texto do final da string, usamos a função REPLACE. A função REPLACE usa a posição do texto na string para substituí-lo.
Como verificar se uma string contém um dos muitos textos no Excel: Para verificar se uma string contém algum texto múltiplo, usamos esta fórmula. Usamos a função SUM para somar todas as correspondências e, em seguida, executamos uma lógica para verificar se a string contém alguma das várias strings.
Contar células que contêm texto específico: Uma simples função CONT.SE fará a mágica. Para contar o número de células múltiplas que contêm uma determinada string, usamos o operador curinga com a função CONT.SE.
Função REPLACE vs SUBSTITUTE do Excel: As funções REPLACE e SUBSTITUTE são as funções mais incompreendidas. Para localizar e substituir um determinado texto, usamos a função SUBSTITUTE. Onde REPLACE é usado para substituir vários caracteres na string …
Artigos populares:
50 atalhos do Excel para aumentar sua produtividade | Torne sua tarefa mais rápida. Esses 50 atalhos farão você trabalhar ainda mais rápido no Excel.
Como usar a função VLOOKUP do Excel| Esta é uma das funções mais usadas e populares do Excel, que é usada para pesquisar valores em diferentes intervalos e planilhas.
Como usar o Excel Função CONT.SE| Conte valores com condições usando esta função incrível. Você não precisa filtrar seus dados para contar valores específicos. A função Countif é essencial para preparar seu painel.
Como usar a função SUMIF no Excel | Esta é outra função essencial do painel. Isso ajuda você a somar valores em condições específicas.