Remover ou retirar tags HTML de strings de texto
Se houver várias strings de texto cercadas por tags HTML, para remover todas as tags HTML, os métodos neste artigo podem ser úteis.
- Remover ou retirar todas as tags HTML simples com fórmula
- Remover ou retirar algumas tags HTML complexas com código VBA
Remover ou retirar todas as tags HTML simples com fórmula
Se suas strings de texto estiverem cercadas por algumas tags HTML simples, a função MID no Excel pode ajudá-lo a resolver este problema. A sintaxe genérica é:
- string: a string de texto ou valor da célula da qual você deseja remover as tags HTML.
- text_start: o número da posição em que o primeiro caractere está localizado e que você deseja usar.
- tag_len: o comprimento das tags HTML dentro da string de texto.
Por favor, copie ou insira a seguinte fórmula em uma célula em branco:
Em seguida, arraste a alça de preenchimento para baixo até as células onde deseja aplicar esta fórmula, e todas as tags HTML serão removidas das células, conforme mostrado na captura de tela abaixo:
Explicação da fórmula:
LEN(A2)-7: Esta função LEN é usada para calcular o comprimento da string de texto na célula A2 e subtrai 7 (o número das tags HTML, tanto as tags de início quanto as de fim), o que significa obter o número de caracteres que você deseja extrair, excluindo a tag HTML. O valor retornado será usado como o argumento num_chars dentro da função MID.
MID(A2,4,LEN(A2)-7): Esta função MID é usada para extrair todos os caracteres que começam no quarto caractere, e o comprimento da string é o num-chars retornado pela função LEN.
Remover ou retirar algumas tags HTML complexas com código VBA
Se houver várias tags HTML dentro da string de texto, conforme mostrado na captura de tela abaixo, a fórmula acima pode não funcionar corretamente; neste caso, o seguinte código VBA pode ajudá-lo a lidar com algumas tags HTML complexas em strings de texto.
1. Mantenha pressionadas as teclas Alt + F11 no Excel, e isso abrirá a janela Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o seguinte código VBA na Janela do Módulo.
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. Em seguida, pressione a tecla F5 para executar este código, e uma caixa de prompt será exibida, por favor, selecione as células das quais deseja remover as tags HTML, veja a captura de tela:
4. E então, clique no botão OK, e todas as tags HTML terão sido removidas das células selecionadas, veja a captura de tela:
Funções relacionadas usadas:
- LEN:
- A função LEN retorna o número de caracteres em uma string de texto.
- MID:
- A função MID é usada para encontrar e retornar um número específico de caracteres do meio de uma string de texto fornecida.
Mais artigos:
- Remover Caracteres Indesejados de Células no Excel
- Você pode usar a função SUBSTITUTE para remover quaisquer caracteres indesejados de uma célula específica no Excel.
- Remover Quebras de Linha de Células no Excel
- Este tutorial fornece três fórmulas para ajudá-lo a remover quebras de linha (que ocorrem ao pressionar as teclas Alt + Enter em uma célula) de células específicas no Excel.
- Remover Texto Com Base em Posição Variável no Excel
- Este tutorial explica como remover texto ou caracteres de uma célula quando eles estão em uma posição variável.
- Remover ou Retirar Caracteres Não Numéricos de Strings de Texto
- Às vezes, você pode precisar remover todos os caracteres não numéricos das strings de texto e manter apenas os números, conforme mostrado na captura de tela abaixo. Este artigo introduz algumas fórmulas para resolver essa tarefa no Excel.
As Melhores Ferramentas de Produtividade para o Office
Kutools para Excel - Ajuda Você a Se Destacar na Multidão
Kutools para Excel Conta com Mais de 300 Funcionalidades, Garantindo Que O Que Você Precisa Está Apenas Um Clique de Distância...
Office Tab - Ative a Leitura e Edição com Guias no Microsoft Office (inclui Excel)
- Um segundo para alternar entre dezenas de documentos abertos!
- Reduz centenas de cliques de mouse para você todos os dias, diga adeus à mão do mouse.
- Aumenta sua produtividade em 50% ao visualizar e editar vários documentos.
- Traz Guias Eficientes para o Office (inclui Excel), Assim Como Chrome, Edge e Firefox.