Elimina o rimuovi i tag HTML dalle stringhe di testo

Se sono presenti più stringhe di testo racchiuse tra tag HTML, i metodi illustrati in questo articolo ti aiuteranno a rimuoverli tutti.

• Elimina o rimuovi tutti i tag HTML semplice con una formula
• Elimina o rimuovi alcuni tag HTML complessi con codice VBA

Elimina o rimuovi tutti i tag HTML semplice con una formula

Se le tue stringhe di testo sono racchiuse tra semplici tag HTML, la funzione MID in Excel può aiutarti a eseguire questa operazione. La sintassi generica è:

• string: la stringa di testo o il valore della cella da cui desideri rimuovere i tag HTML.
• text_start: la posizione del primo carattere da utilizzare.
• tag_lenla lunghezza dei tag HTML presenti nella stringa di testo.

Copia o inserisci la seguente formula in una cella vuota:

Successivamente, trascina il quadratino di riempimento verso il basso fino alle celle a cui desideri applicare questa formula; tutti i tag HTML saranno stati rimossi dalle celle, come mostrato nello screenshot seguente:

Spiegazione della formula:

LEN(A2)-7: questa funzione LEN calcola la lunghezza della stringa di testo nella cella A2 e sottrae 7 (il numero di caratteri corrispondenti ai tag HTML, inclusi sia il tag di apertura che quello di chiusura), per ottenere così il numero di caratteri da estrarre escludendo i tag HTML. Il risultato verrà utilizzato come argomento num_chars nella funzione MID.

MID(A2,4,LEN(A2)-7): questa funzione MID estrae tutti i caratteri a partire dal quarto, con una lunghezza pari al numero restituito dalla funzione LEN.

Elimina o rimuovi alcuni tag HTML complessi con codice VBA

Se nella stringa di testo sono presenti più tag HTML, come mostrato nello screenshot seguente, la formula precedente potrebbe non funzionare correttamente. In tal caso, il codice VBA seguente ti aiuterà a gestire in modo efficace tag HTML complessi all'interno delle stringhe di testo.

1. Tieni premuti i tasti Alt + F11 in Excel per aprire la finestra di Microsoft Visual Basic for Applications.

2. Fai clic su Inserisci > Modulo, quindi incolla il seguente codice VBA nella finestra del modulo.

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. Premi quindi il tasto F5 per eseguire il codice: apparirà una finestra di dialogo. Seleziona le celle da cui desideri rimuovere i tag HTML, come mostrato nello screenshot:

4. Clicca quindi sul pulsante OK e tutti i tag HTML verranno rimossi dalle celle selezionate, come mostrato nello screenshot:

Funzioni correlate utilizzate:

Altri articoli: