Wie konvertiere ich HTML in Text in Zellen in Excel?
Wie im folgenden Screenshot gezeigt, können Sie die Anzahl der in Ihren Arbeitsblattzellen vorhandenen HTML-Tags in Excel in einfachen Text konvertieren. Dieser Artikel zeigt Ihnen zwei Methoden zum Entfernen aller HTML-Tags aus Zellen in Excel.
Konvertieren Sie HTML in Text in ausgewählten Zellen mit der Funktion Suchen und Ersetzen
Konvertieren Sie HTML in Text im gesamten Arbeitsblatt mit VBA
Konvertieren Sie HTML in Text in Zellen mit der Funktion Suchen und Ersetzen
Sie können alle HTML-Dateien in Texte in Zellen mit dem konvertieren Suchen und Ersetzen Funktion in Excel. Bitte gehen Sie wie folgt vor.
1. Wählen Sie die Zellen aus, in die Sie alle HTML-Dateien in Texte konvertieren möchten, und drücken Sie die Taste Ctrl + F Schlüssel zum Öffnen der Suchen und Ersetzen Dialogbox.
2. In dem Suchen und Ersetzen Dialogfeld, gehen Sie zu Ersetzen Registerkarte eingeben <*> in die Finden Sie, was Box, behalten Sie die Ersetzen durch Feld leer und klicken Sie auf Alle ersetzen Taste. Siehe Screenshot:
3. Dann a Microsoft Excel Das Dialogfeld zeigt an, wie viele HTML-Tags ersetzt wurden. Klicken Sie auf OK Taste und schließen Sie die Suchen und Ersetzen Dialogbox.
Dann können Sie sehen, dass alle HTML-Tags aus ausgewählten Zellen entfernt werden (siehe Abbildung unten).
Konvertieren Sie HTML in Text im gesamten Arbeitsblatt mit VBA
Außerdem können Sie mit dem folgenden VBA-Code alle HTML-Dateien gleichzeitig in Text im gesamten Arbeitsblatt konvertieren.
1. Öffnen Sie das Arbeitsblatt mit HTML, das Sie in Text konvertieren möchten, und drücken Sie dann die Taste Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. In dem Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > ModulKopieren Sie dann den folgenden VBA-Code in das Modulfenster.
VBA-Code: Konvertieren Sie HTML in Text im gesamten Arbeitsblatt
Sub RemoveHTMLTags()
'Update by Extendoffice 20180703
Dim xRg As Range
Dim xCell As Range
Dim xStr As String
Dim xRegEx As RegExp
Dim xMatch As Match
Dim xMatches As MatchCollection
Set xRegEx = New RegExp
Application.EnableEvents = False
Set xRg = Cells.SpecialCells(xlCellTypeConstants)
With xRegEx
.Global = True
.Pattern = "<(""[^""]*""|'[^']*'|[^'"">])*>"
End With
For Each xCell In xRg
xStr = xCell.Value
Set xMatches = xRegEx.Execute(xCell.Text)
For Each xMatch In xMatches
xStr = Replace(xStr, xMatch.Value, "")
Next
xCell.Value = xStr
Next
Application.EnableEvents = True
End Sub3. Immer noch in der Microsoft Visual Basic für Applikationen Fenster, bitte klicken Tools > Bibliographie, Überprüf den Regulärer Ausdruck von Microsoft VBScript 5.5 Option in der Referenzen-VBAProject Dialogfeld, und klicken Sie dann auf OK .
4. Drücken Sie die Taste F5 Geben Sie die Taste ein oder klicken Sie auf die Schaltfläche Ausführen, um den Code auszuführen.
Dann werden alle HTML-Tags sofort aus dem gesamten Arbeitsblatt entfernt.
In Verbindung stehende Artikel:
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
