Chức năng này chuyển đổi một chuỗi được mã hóa HTML thành biểu diễn văn bản thông thường mà không phải cài đặt plugin của bên thứ ba
Public Function HtmlDecode[StringToDecode As Variant] As String Set oMSHTML = CreateObject["htmlfile"] Set e = oMSHTML.createElement["T"] e.innerHTML = StringToDecode HtmlDecode = e.innerText End Function
Để thêm nó vào Excel
1. Nhập ALT+F11
2. Trong menu Tệp, đi Chèn > Mô-đun
3. Dán chức năng từ trên – lưu nó – [CTRL+S ]
4. Chuyển về Excel thì dùng làm hàm trong Excel như vậy
Hướng dẫn đầy đủ để đặt chức năng được đặt tại đây. https. //ủng hộ. Microsoft. com/en-us/office/create-custom-functions-in-excel-2f06c10b-3622-40d6-a1b2-b6748ae8231f