¿Cómo encontrar rápidamente la posición de la primera mayúscula en la cadena de texto de Excel?
Suponiendo que hay una lista de cadenas de texto mezcladas con números, letras mayúsculas y minúsculas, ¿cómo puede encontrar rápidamente la posición de la primera letra mayúscula de las cadenas? En este artículo, presento los trucos que pueden especificar rápidamente la posición de la primera mayúscula sin contarlos uno por uno manualmente en Excel.
Encuentra la posición de la primera mayúscula en la cadena con fórmula
Encuentre la posición de la primera mayúscula en la cadena con la función definida
Cambie todas las letras a MAYÚSCULAS o al caso adecuado con Kutools para Excel 
Encuentra la posición de la primera mayúscula en la cadena con fórmula
Aquí hay una fórmula que puede ayudarlo a encontrar rápidamente la posición de la primera mayúscula de la cadena, haga lo siguiente:
Seleccione una celda en blanco junto a la cadena en la que desea encontrar la primera mayúscula, B1 por ejemplo, ingrese esta fórmula =MIN(IF(ISERROR(FIND(CHAR(ROW(INDIRECT("65:90"))),A1)),"",FIND(CHAR(ROW(INDIRECT("65:90"))),A1)))
Prensa Mayús + Ctrl + Entrar para obtener el resultado correcto y luego arrastre el controlador de autocompletar sobre las celdas que necesitaban para aplicar esta fórmula. Ver captura de pantalla:
Encuentre la posición de la primera mayúscula en la cadena con la función definida
Excepto la fórmula, también puede usar la función definida para averiguar la posición de la primera mayúscula en la cadena.
1. Active la hoja que contiene la cadena que desea encontrar en mayúsculas y presione Alt + F11 llaves para abrir Microsoft Visual Basic para aplicaciones ventana.
2. Haga clic derecho en la hoja en la que desea usar el código. Proyecto Explore panel y haga clic en recuadro > Móduloy pegue el código siguiente en la secuencia de comandos del módulo en blanco. Ver captura de pantalla:
Código: Encuentra la posición de la primera mayúscula de la cadena.
Function GetFirstUpper(Rg As Range) As Integer
'UpdatebyExtendoffice20160726
Dim xStr As String
Dim I As Integer
Application.Volatile
GetFirstUpper = -1
On Error Resume Next
xStr = Trim(Rg.Value)
For I = 1 To Len(xStr)
If (Asc(Mid(xStr, I, 1)) < 91) And (Asc(Mid(xStr, I, 1)) > 64) Then
GetFirstUpper = I
Exit Function
End If
Next
End Function
3. Guarde el código y vuelva a la hoja que usa, y seleccione una celda en blanco al lado de la cadena que desea encontrar en mayúscula, ingrese esta fórmula = GetFirstUpper (F1), prensa Participar y luego arrastre el controlador de autocompletar sobre las celdas que necesitan esta fórmula. Ver captura de pantalla:
Consejo: Si no hay mayúsculas en la cadena, el resultado se muestra como -1.
Cambie todas las letras a MAYÚSCULAS o al caso adecuado con Kutools para Excel
En el trabajo general de Excel, es posible que deba cambiar las cadenas de letras a MAYÚSCULAS, mayúsculas y minúsculas, minúsculas, mayúsculas y minúsculas o ToGgLe CaSe como se muestra a continuación.
Con Kutools para Excel, puedes aplicar su Cambiar caso utilidad para cambiar rápidamente la caja de la letra según lo necesite.
| Kutools for Excel, con más de 300 funciones prácticas, facilita su trabajo. |
Después instalación gratuita Kutools para Excel, haga lo siguiente:
1. Seleccione las cadenas en las que desea cambiar sus casos y haga clic en Kutools > Texto > Cambiar caso. Ver captura de pantalla:
2. Luego, en el estallido Cambiar caso cuadro de diálogo, marque la opción que desee en el Cambiar tipo sección, y puede obtener una vista previa del resultado cambiante en el panel Vista previa. Ver captura de pantalla:
3. Luego haga clic Ok or ¡Aplicá! para cambiar de caso.
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite 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 de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
