Làm mất dấu liên quan đến từng bảng mã như Unicode, VNI, ABC, ... không đơn giản.ThuNghi đã viết:Các bạn cho tôi 1 function matdau làm mất dấu tiếng Việt và cắt blank, cụ thể như sau:
Matdau("Nguyễn Văn ăn") = NguyenVanAn
Matdau("Số chứng từ") = SoChungTu
Xin cám ơn!
Tôi đã viết xong 3 hàm để loại bỏ dấu:ThuNghi đã viết:Thấy Unikey chỉ cần copy, ctr Sh F6 và paste cũng nhanh.
Thấy thuật tóan là find và thay thế thì hơi chậm.
Do tôi muốn tạo Name tự động theo tiêu đề của bảng. Vậy làm gia công hiệu quả hơn.
Tôi đã viết xong 3 hàm để loại bỏ dấu:
LoaiDauUni: Loại dấu tíếng Việt cho Unicode
LoaiDauVni: Loại dấu tíếng Việt cho VNI Windows
LoaiDauVn3: Loại dấu tíếng Việt cho ABC-TCVN3
Tôi đã viết xong 3 hàm để loại bỏ dấu:
LoaiDauUni: Loại dấu tíếng Việt cho Unicode
LoaiDauVni: Loại dấu tíếng Việt cho VNI Windows
LoaiDauVn3: Loại dấu tíếng Việt cho ABC-TCVN3
Và hàm để cắt tất cả khoảng trắng trong chuỗi AllTrim.
Bạn tải HotrotiengVietVBA (tập tin dạng AddIns) và HuongDan.xls là danh sách các hàm hỗ trợ.
Bác Long đã mất rồi bạn ạ! Bạn nêu rõ yêu cầu và nhờ các thành viên khác nhé!Gửi anh Phạm Duy Long và anh em trên diễn đàn,
Mình cũng dùng code của anh Long nhưng không thể xử lý triệt để được. Mong anh giúp đỡ thêm.
Dữ liệu như đính kèm (dữ liệu này được extract từ phần mềm ERP tên là "Exact Globe").
Dấu của bạn là sử dụng bảng mã unicode tổ hợp nên hàm bị sai là phải rồi.Gửi anh Phạm Duy Long và anh em trên diễn đàn,
Mình cũng dùng code của anh Long nhưng không thể xử lý triệt để được. Mong anh giúp đỡ thêm.
Dữ liệu như đính kèm (dữ liệu này được extract từ phần mềm ERP tên là "Exact Globe").
Gửi anh Phạm Duy Long và anh em trên diễn đàn,
Mình cũng dùng code của anh Long nhưng không thể xử lý triệt để được. Mong anh giúp đỡ thêm.
Dữ liệu như đính kèm (dữ liệu này được extract từ phần mềm ERP tên là "Exact Globe").