Saltar al contenido principal

¿Cómo eliminar todas las etiquetas HTML de la cadena en Excel?

Si tiene una hoja de trabajo que contiene cadenas de texto que están rodeadas con las etiquetas HTML, ahora, desea eliminar todas las etiquetas HTML de las cadenas para que las celdas sean claras y más legibles, como se muestra a continuación. En este artículo, presentaré algunos métodos para abordar esta tarea en Excel.

doc eliminar etiquetas html 1
1
doc eliminar etiquetas html 2

Elimine todas las etiquetas HTML de la cadena de texto con el comando Buscar y reemplazar

Elimine todas las etiquetas HTML de la cadena de texto con código VBA


flecha azul burbuja derecha Elimine todas las etiquetas HTML de la cadena de texto con el comando Buscar y reemplazar

De hecho, la Buscar y reemplazar La función en Excel puede resolver este problema, haga lo siguiente:

1. Seleccione las celdas en las que desea eliminar las etiquetas HTML.

2. Sostener Ctrl + H teclas para abrir el Buscar y reemplazar cuadro de diálogo, en el diálogo, en el Encuentra lo que cuadro de texto, tipo <*>y deja el Reemplazar con cuadro de texto en blanco, ver captura de pantalla:

doc eliminar etiquetas html 3

3. Luego haga clic reemplazar todo , todas las etiquetas HTML se eliminan a la vez.


flecha azul burbuja derecha Elimine todas las etiquetas HTML de la cadena de texto con código VBA

El siguiente código VBA puede ayudarlo a eliminar las etiquetas HTML de una selección, haga lo siguiente:

1. Mantenga pulsado el Alt + F11 claves en Excel, y abre el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Móduloy pegue el siguiente código VBA en el Módulo Ventana.

Código VBA: elimine todas las etiquetas HTML de la cadena de texto

Sub RemoveTags()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("please select data range", "Kutools for Excel", xAddress, , , , , 8)
    Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
    If xRg Is Nothing Then Exit Sub
    xRg.NumberFormat = "@"
    With CreateObject("vbscript.regexp")
        .Pattern = "\<.*?\>"
        .Global = True
        For Each xCell In xRg
            xCell.Value = .Replace(xCell.Value, "")
        Next
    End With
End Sub

3. Entonces presione F5 clave para ejecutar este código, en el cuadro de diálogo emergente, seleccione las celdas en las que desea eliminar las etiquetas HTML, vea la captura de pantalla:

doc eliminar etiquetas html 4

4. Y luego haz clic OK, todas las etiquetas HTML se han eliminado de la selección a la vez.

¡Descarga gratis Kutools para Excel ahora!

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

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...

Descripción


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!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Formatting is also removed, as it is with the Find and Replace.

Thanks for the code and tips.
This comment was minimized by the moderator on the site
Вариант с <*> просто великолепен.
Спасибо Вам
This comment was minimized by the moderator on the site
I have some text that is in bullet points, when i run this program it strips this out. how can i select which html tags to remove and which to keep?
This comment was minimized by the moderator on the site
xAddress is never used
This comment was minimized by the moderator on the site
Thank you .. The VBA instructions worked!
This comment was minimized by the moderator on the site
Thank you! I was able to clean up a large excel file with VBA with your simple instructions
This comment was minimized by the moderator on the site
Thank you for the code to remove all HTML tags from text string using VBA. I am going to pass your site along to my co-workers.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations