Convert sang mã HTML giá trị 1 ô trong Excel

[phuvdc]

Chào các bạn,
Mình hiện gặp vấn đề sau:
Mình đang làm bài toán chuyển đổi 1 giá trị text trong excel thành mã HTML tương ứng để import vào cơ sở dữ liệu. Trong file excel giá trị của trường là text: Table(2,5) of 5(apple) and 2(orange) and 3(lemon) (một bảng kích thước 2x5, các dữ liệu của ô lần lượt theo các dòng là 5 "apple" rồi đến 2 "orange" rồi 3 "lemon" thì sẽ chuyển thành mã HTML tương ứng là:
<Table>
<row>
<td>"apple"</td> <td>"apple"</td> <td>"apple"</td> <td>"apple"</td> <td>"apple"</td>
</row>
<row>
<td>"orange"</td> <td>"orange"</td> <td>"lemon"</td> <td>"lemon"</td> <td>"lemon"</td>
<row>
</Table>
Mã HTML ở trên có xuống dòng và thụt vào nhưng thực ra cũng không cần thiết.
Mình viết 1 hàm trong vba nhưng mãi vẫn k được, chủ yếu do chưa thành thạo các phương thức liên quan tới xử lý chuỗi (hàm thì thạo nhưng phương thức như find chẳng hạn lại báo lỗi tùm lum). Ai giải quyết giúp mình với. Cám ơn nhiều lắm.