Como verificar se a primeira letra de uma célula específica está em maiúscula no Excel?
É fácil converter todas as letras de uma célula para maiúsculas no Excel. Mas sabe como verificar se apenas a primeira letra de uma célula específica está em maiúscula? Este artigo apresenta um código VBA que o ajuda a alcançar esse objetivo.
Verifique se a primeira letra numa célula especificada é maiúscula com código VBA
Verifique se a primeira letra numa célula especificada é maiúscula com código VBA
Siga os passos abaixo para aplicar o código VBA e verificar se a primeira letra de uma célula está em maiúscula no Excel.
1. Prima simultaneamente as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Na janela do Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie e cole o seguinte código VBA na janela de código.
Código VBA: Verificar se a primeira letra é maiúscula numa célula
Sub UpperCaseCheck()
Dim xRg As Range
Dim xAsc As Integer
Set xRg = Range("A1")
xAsc = Asc(Mid(xRg.Value, 1, 1))
If xAsc > 64 And xAsc < 91 Then
MsgBox "First alpha character is capital"
Else
MsgBox "First alpha character is not capital"
End If
End SubNota: No código, A1 é a célula que será verificada quanto à primeira letra ser maiúscula. Altere-a conforme necessário.
3. Prima a tecla F5 para executar o código. Depois, aparece uma caixa de diálogo Microsoft Excel a indicar se a primeira letra nessa célula especificada é maiúscula ou não, tal como mostrado nas imagens seguintes.
Artigos Relacionados:
- Como verificar se o valor de uma célula está entre dois valores no Excel?
- Como verificar se uma célula começa ou termina com um caractere específico no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos