ไปยังเนื้อหาหลัก

วิธีลบแท็ก HTML ทั้งหมดออกจากสตริงใน Excel

หากคุณมีแผ่นงานที่มีสตริงข้อความที่ล้อมรอบด้วยแท็ก HTML ตอนนี้คุณต้องการลบแท็ก HTML ทั้งหมดออกจากสตริงเพื่อให้เซลล์ชัดเจนและอ่านได้มากขึ้นดังภาพหน้าจอต่อไปนี้ บทความนี้ฉันจะแนะนำวิธีการบางอย่างในการจัดการกับงานนี้ใน Excel

doc ลบแท็ก html 1
1
doc ลบแท็ก html 2

ลบแท็ก HTML ทั้งหมดออกจากสตริงข้อความด้วยคำสั่ง Find and Replace

ลบแท็ก HTML ทั้งหมดออกจากสตริงข้อความด้วยรหัส VBA


ลูกศรสีฟ้าฟองขวา ลบแท็ก HTML ทั้งหมดออกจากสตริงข้อความด้วยคำสั่ง Find and Replace

ในความเป็นจริง ค้นหาและแทนที่ ฟังก์ชันใน Excel อาจแก้ปัญหานี้ได้โปรดทำดังนี้:

1. เลือกเซลล์ที่คุณต้องการลบแท็ก HTML

2. ถือ Ctrl + H คีย์เพื่อเปิด ค้นหาและแทนที่ กล่องโต้ตอบในกล่องโต้ตอบในไฟล์ สิ่งที่ค้นหา กล่องข้อความพิมพ์ <*>และออกจากไฟล์ แทนที่ด้วย กล่องข้อความว่างเปล่าดูภาพหน้าจอ:

doc ลบแท็ก html 3

3. จากนั้นคลิก แทนที่ทั้งหมด แท็ก HTML ทั้งหมดจะถูกลบออกพร้อมกัน


ลูกศรสีฟ้าฟองขวา ลบแท็ก HTML ทั้งหมดออกจากสตริงข้อความด้วยรหัส VBA

โค้ด VBA ต่อไปนี้สามารถช่วยคุณลบแท็ก HTML ออกจากการเลือกได้โปรดดำเนินการดังนี้:

1. กด Alt + F11 ใน Excel และจะเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัส VBA ต่อไปนี้ในไฟล์ โมดูล หน้าต่าง.

รหัส VBA: ลบแท็ก HTML ทั้งหมดออกจากสตริงข้อความ

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 ดูภาพหน้าจอ:

doc ลบแท็ก html 4

4. จากนั้นคลิก OKแท็ก HTML ทั้งหมดถูกลบออกจากการเลือกพร้อมกัน

ดาวน์โหลด Kutools for Excel ได้ฟรีทันที!

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

🤖 Kutools AI ผู้ช่วย: ปฏิวัติการวิเคราะห์ข้อมูลโดยยึดตาม: การดำเนินการที่ชาญฉลาด   |  สร้างรหัส  |  สร้างสูตรที่กำหนดเอง  |  วิเคราะห์ข้อมูลและสร้างแผนภูมิ  |  เรียกใช้ฟังก์ชัน Kutools...
คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์    VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่    สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์    ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

รายละเอียด


แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Formatting is also removed, as it is with the Find and Replace.

Thanks for the code and tips.
This comment was minimized by the moderator on the site
Вариант с <*> просто великолепен.
Спасибо Вам
This comment was minimized by the moderator on the site
I have some text that is in bullet points, when i run this program it strips this out. how can i select which html tags to remove and which to keep?
This comment was minimized by the moderator on the site
xAddress is never used
This comment was minimized by the moderator on the site
Thank you .. The VBA instructions worked!
This comment was minimized by the moderator on the site
Thank you! I was able to clean up a large excel file with VBA with your simple instructions
This comment was minimized by the moderator on the site
Thank you for the code to remove all HTML tags from text string using VBA. I am going to pass your site along to my co-workers.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations