Đọc số thành chữ trong office 2007

[vanle33]

Mấy bạn ơi giúp mình chút về mấy cái tool đổi số sang chữ này với, cái tool này mình gặp khó khăn là mình muốn không có dấu "," và chữ "chẵn" trong chữ được đổi ra.VD kết quả là: "Ba ngàn, hai trăm mười bốn đồng chẵn", mình chỉ cần là "Ba ngàn hai trăm mười bốn đồng".M Mong mấy anh chị và các bạn giúp mình, cám ơn các mọi người thật nhiều.

Bạn có thể tìm tiện ích đổi số thành chữ của a Nguyễn duy tuân trên diễn đàn
sau khi tải về bạn sẽ có thể chỉnh sửa đuoc như bạn muốn.

 

[Good-Luck]

Mấy bạn ơi giúp mình chút về mấy cái tool đổi số sang chữ này với, cái tool này mình gặp khó khăn là mình muốn không có dấu "," và chữ "chẵn" trong chữ được đổi ra.VD kết quả là: "Ba ngàn, hai trăm mười bốn đồng chẵn", mình chỉ cần là "Ba ngàn hai trăm mười bốn đồng".M Mong mấy anh chị và các bạn giúp mình, cám ơn các mọi người thật nhiều.

BẠN có thể tham khảo trang này, các phần chữ màu xanh bạn có thể thây đổi theo ý muốn

http://www.giaiphapexcel.com/forum/showthread.php?65-Hàm-chuyển-số-thành-chữ&p=428415#post428415
muốn bỏ "," bạn thây những chữ này: nghìn triệu tỷ có dấu "," bạn bỏ nó đi

"nghìn," ="nghìn"
"triệu,"="triệu"
"tỷ,"="tỷ"
[GPECODE=vb] Dv = Array("", "möôi", "traêm", "nghìn,", "möôi", "traêm", "trieäu,", "möôi", "traêm", "tyû,", "möôi", "traêm", "nghìn", "möôi", "traêm")[/GPECODE]