วิธีลบแท็ก HTML ทั้งหมดออกจากสตริงใน Excel
หากคุณมีแผ่นงานที่มีสตริงข้อความที่ล้อมรอบด้วยแท็ก HTML ตอนนี้คุณต้องการลบแท็ก HTML ทั้งหมดออกจากสตริงเพื่อให้เซลล์ชัดเจนและอ่านได้มากขึ้นดังภาพหน้าจอต่อไปนี้ บทความนี้ฉันจะแนะนำวิธีการบางอย่างในการจัดการกับงานนี้ใน Excel
ลบแท็ก HTML ทั้งหมดออกจากสตริงข้อความด้วยคำสั่ง Find and Replace
ลบแท็ก HTML ทั้งหมดออกจากสตริงข้อความด้วยรหัส VBA
ลบแท็ก HTML ทั้งหมดออกจากสตริงข้อความด้วยคำสั่ง Find and Replace
ในความเป็นจริง ค้นหาและแทนที่ ฟังก์ชันใน Excel อาจแก้ปัญหานี้ได้โปรดทำดังนี้:
1. เลือกเซลล์ที่คุณต้องการลบแท็ก HTML
2. ถือ Ctrl + H คีย์เพื่อเปิด ค้นหาและแทนที่ กล่องโต้ตอบในกล่องโต้ตอบในไฟล์ สิ่งที่ค้นหา กล่องข้อความพิมพ์ <*>และออกจากไฟล์ แทนที่ด้วย กล่องข้อความว่างเปล่าดูภาพหน้าจอ:
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 ดูภาพหน้าจอ:
4. จากนั้นคลิก OKแท็ก HTML ทั้งหมดถูกลบออกจากการเลือกพร้อมกัน
ดาวน์โหลด Kutools for Excel ได้ฟรีทันที!
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!