Note: The other languages of the website are Google-translated. Back to English
登入  \/ 
x
or
x
註冊  \/ 
x

or

從文本字符串中刪除或刪除html標籤

如果html標記周圍有多個文本字符串,則要刪除所有html標記,本文中的方法可能會對您有所幫助。


用公式剝離或刪除所有簡單的html標籤

如果您的文本字符串被一些簡單的html標記包圍,則Excel中的MID函數可以幫助您解決此問題。 通用語法為:

=MID(string,text_start,LEN(string)-tag_len)
  • string:您要從中刪除html標籤的文本字符串或單元格值。
  • text_start:您要使用的第一個字符所在的位置編號。
  • tag_len:文本字符串中html標籤的長度。

請將以下公式複製或輸入到空白單元格中:

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

然後,將填充手柄向下拖動到要應用此公式的單元格上,並且所有html標籤都已從單元格中刪除,如下圖所示:


公式說明:

LEN(A2)-7:此LEN函數用於計算單元格A2中文本字符串的長度,並減去7(html標記的數量,包括開始和結束標記)意味著獲取要提取的字符數,其中不包括html標記。 返回的值將用作MID函數中的num_chars參數。

MID(A2,4,LEN(A2)-7):此MID函數用於提取所有從第四個字符開始的字符,並且字符串的長度是LEN函數返回的num-chars。


使用VBA代碼剝離或刪除一些複雜的html標籤

如果文本字符串中包含多個html標籤,如下面的屏幕截圖所示,則上述公式可能無法正常工作,在這種情況下,以下VBA代碼可以幫助您處理文本字符串中的某些複雜html標籤。

1。 按住 Alt + F11鍵 鍵,然後打開 Microsoft Visual Basic for Applications 窗口。

2。 點擊 插入 > 模塊,然後將以下VBA代碼粘貼到“模塊窗口”中。

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。 然後按 F5 鍵運行此代碼,並彈出一個提示框,請選擇要刪除html標籤的單元格,請參見屏幕截圖:

4。 然後,單擊 OK 按鈕,並且所有html標籤都已從所選單元格中刪除,請參見屏幕截圖:


使用的相對功能:

  • LEN:
  • LEN函數返回文本字符串中的字符數。
  • MID:
  • MID函數用於從給定文本字符串的中間查找並返回特定數量的字符。

更多文章:


最佳辦公效率工具

Kutools for Excel-幫助您從人群中脫穎而出

您想快速而完美地完成您的日常工作嗎? Kutools for Excel 帶來了 300 個強大的高級功能(合併工作簿、按顏色求和、拆分單元格內容、轉換日期等...)並為您節省 80% 的時間。

  • 專為 1500 個工作場景而設計,幫助您解決 80% 的 Excel 問題。
  • 每天減少數千次鍵盤和鼠標的點擊,減輕您疲倦的眼睛和手的疲勞。
  • 在3分鐘內成為Excel專家。 不再需要記住任何痛苦的公式和VBA代碼。
  • 30天無限制免費試用。 60天退款保證。 免費升級和支持2年。
Excel功能區(已安裝Kutools for Excel)

Office選項卡-在Microsoft Office(包括Excel)中啟用選項卡式閱讀和編輯

  • 一秒鐘即可在數十個打開的文檔之間切換!
  • 每天為您減少數百次鼠標單擊,告別鼠標手。
  • 查看和編輯多個文檔時,將您的工作效率提高 50%。
  • 像Chrome,Firefox和新的Internet Explorer一樣,為Office(包括Excel)帶來高效選項卡。
Excel的屏幕截圖(已安裝Office選項卡)
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.