¿Cómo reemplazar los caracteres acentuados con caracteres regulares en Excel?
¿Ha recibido algunos informes con caracteres acentuados en Microsoft Excel? Parece tedioso revisar todo el libro y reemplazar los caracteres acentuados por los normales manualmente, como "û"a" u "Y este artículo presentará algunas cosas complicadas para reemplazar rápidamente los caracteres acentuados con caracteres regulares en Excel.
Reemplace los caracteres acentuados con caracteres regulares con VBA
Reemplace los caracteres acentuados con caracteres regulares con Kutools para Excel
Reemplace los caracteres acentuados con caracteres regulares con VBA
Para los usuarios que tienen experiencia con Microsoft Excel, usar la macro de VBA es una manera fácil de lidiar con este complicado trabajo.
1. Mantenga pulsado el botón otro + F11 claves en Excel, y abre el Ventana de Microsoft Visual Basic para aplicaciones.
2. Haga Clic en recuadro > Móduloy pegue la siguiente macro en el Ventana de módulo.
Function StripAccent(thestring As String)
Dim A As String * 1
Dim B As String * 1
Dim i As Integer
Const AccChars= "ŠŽšžŸÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖÙÚÛÜÝàáâãäåçèéêëìíîïðñòóôõöùúûüýÿ"
Const RegChars= "SZszYAAAAAACEEEEIIIIDNOOOOOUUUUYaaaaaaceeeeiiiidnooooouuuuyy"
For i = 1 To Len(AccChars)
A = Mid(AccChars, i, 1)
B = Mid(RegChars, i, 1)
thestring = Replace(thestring, A, B)
Next
StripAccent = thestring
End Function
3. Luego vaya a una celda en blanco y pegue la fórmula en una celda: = CheckStringCHAR (InString), Por ejemplo = CheckStringCHAR ("ù")o = CheckStringCHAR (A2).
Notas:
(1) Es posible que Microsoft Visual Basic no reconozca los caracteres acentuados si no es compatible con Unicode. Por ejemplo, cuando pega "š" en Visual Basic, puede obtener "?". Si es así, esta macro no está disponible.
(2) No reemplaza los caracteres acentuados en las cadenas de la celda seleccionada directamente.
Reemplace los caracteres acentuados con caracteres regulares con Kutools para Excel
Requiere demasiadas habilidades y conocimientos para usar la macro de VBA. Y el siguiente método lo ayudará a trabajar más fácilmente con solo algunos clics. La herramienta Reemplazar caracteres acentuados de Kutools for Excel le permite reemplazar todo tipo de caracteres acentuados con caracteres regulares fácilmente a la vez.
Kutools for Excel - Potencia Excel con más de 300 herramientas esenciales. ¡Disfrute de una prueba GRATUITA de 30 días con todas las funciones sin necesidad de tarjeta de crédito! Consíguelo ahora
1. Seleccione el rango en el que reemplazará todos los caracteres acentuados.
2. Haga Clic en Kutools > Texto > Reemplazar caracteres acentuados…, Mira la captura de pantalla:
3. In Reemplazar caracteres acentuados cuadro de diálogo, haga clic en Seleccionar todo para seleccionar todas las reglas de reemplazo y haga clic en el botón Aceptar para reemplazar todos los caracteres acentuados. ver captura de pantalla:
Notas:
(1) Si no hay algunos caracteres acentuados específicos que desee, puede hacer clic en el Añadir regla para agregar sus propias reglas en el cuadro de lista del cuadro de diálogo Reemplazar caracteres acentuados anterior.
(2) Puede personalizar nuevas reglas de reemplazo en el cuadro de diálogo Reemplazar caracteres acentuados.
Ahora tendrá todos los caracteres acentuados en cadenas del rango seleccionado convertidos en caracteres regulares inmediatamente. Ver captura de pantalla:
La Reemplazar caracteres acentuados La función de Kutools para Excel puede reemplazar fácilmente todo tipo de caracteres acentuados con caracteres regulares en todo el libro de trabajo. ¡Tenga una prueba gratis!
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!