Note: The other languages of the website are Google-translated. Back to English

Retire ou remova marcas html de strings de texto

Se houver várias cadeias de texto circundadas por tags html, para remover todas as tags html, os métodos neste artigo podem lhe fazer um favor.


Retire ou remova todas as tags html simples com fórmula

Se as suas cadeias de texto estiverem rodeadas por algumas tags html simples, a função MID do Excel pode ajudá-lo a resolver esse trabalho. A sintaxe genérica é:

=MID(string,text_start,LEN(string)-tag_len)
  • string: a string de texto ou valor de célula da qual você deseja remover as tags html.
  • text_start: o número da posição que o primeiro caractere localizado que você deseja usar.
  • tag_len: o comprimento das tags html dentro da string de texto.

Copie ou insira a seguinte fórmula em uma célula em branco:

=MID(A2,4,LEN(A2)-7)

Em seguida, arraste a alça de preenchimento para baixo até as células às quais deseja aplicar esta fórmula, e todas as tags html foram removidas das células, conforme mostrado 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 subtrair 7 (o número das marcas html, tanto as marcas de início como de fim) significa obter o número de caracteres que você deseja extrair e excluir a tag html. O valor retornado será usado como o argumento num_chars na 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.


Retire ou remova algumas tags html complexas com código VBA

Se houver várias tags html dentro da string de texto conforme a captura de tela abaixo mostrada, a fórmula acima pode não funcionar corretamente, neste caso, o código VBA a seguir pode ajudá-lo a lidar com algumas tags html complexas em strings de texto.

1. Segure o Alt + F11 chaves no Excel, e abre o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe 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. Então aperte F5 para executar este código e uma caixa de prompt for exibida, selecione as células das quais deseja remover as tags html, consulte a captura de tela:

4. E então, clique OK botão, e todas as tags html foram removidas das células selecionadas, consulte a captura de tela:


Funções relativas 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 determinada sequência de texto.

Mais artigos:

  • 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 pressionando as teclas Alt + Enter em uma célula) de células específicas no Excel.

As melhores ferramentas de produtividade para escritório

Kutools for Excel - ajuda você a se destacar da multidão

Você gostaria de completar seu trabalho diário de forma rápida e perfeita? O Kutools for Excel traz 300 recursos avançados poderosos (combinar pastas de trabalho, somar por cor, dividir o conteúdo da célula, converter data e assim por diante ...) e economizar 80% do tempo para você.

  • Projetado para 1500 cenários de trabalho, ajuda você a resolver 80% dos problemas do Excel.
  • Reduza milhares de cliques de teclado e mouse todos os dias, alivie seus olhos e mãos cansados.
  • Torne-se um especialista em Excel em 3 minutos. Não é mais necessário se lembrar de fórmulas dolorosas e códigos VBA.
  • Avaliação gratuita ilimitada de 30 dias. Garantia de devolução do dinheiro em 60 dias. Atualização e suporte gratuitos por 2 anos.
Faixa de opções do Excel (com Kutools para Excel instalado)

Guia Office - Habilitar leitura e edição com guias no Microsoft Office (incluindo Excel)

  • Um segundo para alternar entre dezenas de documentos abertos!
  • Reduza centenas de cliques do 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 (incluindo Excel), assim como o Chrome, Firefox e o novo Internet Explorer.
Captura de tela do Excel (com guia Office instalado)
Comentários (0)
Ainda não há classificações. Seja o primeiro a avaliar!
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0   Personagens
Locais sugeridos

Siga-nos

Copyright © 2009 - www.extendoffice.com. | Todos os direitos reservados. Distribuído por ExtendOffice. | | | Mapa do site
Microsoft e o logotipo do Office são marcas comerciais ou marcas registradas da Microsoft Corporation nos Estados Unidos e / ou em outros países.
Protegido por Sectigo SSL