¿Cómo puedo comprobar si la primera letra de una celda específica está en mayúscula en Excel?
Convertir todas las letras de una celda a mayúsculas en Excel puede ser sencillo. Pero, ¿sabe cómo comprobar si únicamente la primera letra de una celda específica está en mayúscula? Este artículo le presenta un código VBA que le ayudará a lograrlo.
Compruebe si la primera letra de una celda especificada es mayúscula mediante código VBA
Compruebe si la primera letra de una celda especificada es mayúscula mediante código VBA
Siga los pasos que se indican a continuación para aplicar el código VBA y verificar si la primera letra de una celda está en mayúscula en Excel.
1. Pulse simultáneamente las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga clic en Insertar > Módulo. A continuación, copie y pegue el siguiente código VBA en la ventana de código.
Código VBA: Comprobar si la primera letra es mayúscula en una celda
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: En el código, A1 es la celda en la que se comprobará si la primera letra está en mayúscula. Cámbiela según sus necesidades.
3. Pulse la tecla F5 para ejecutar el código. A continuación, aparecerá un cuadro de diálogo Microsoft Excel que le indicará si la primera letra de dicha celda es mayúscula o no, tal como se muestra en las siguientes capturas de pantalla.
Artículos relacionados:
- ¿Cómo puedo comprobar si el valor de una celda está comprendido entre dos valores en Excel?
- ¿Cómo puedo comprobar si una celda empieza o termina con un carácter específico en Excel?
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos