Xin hỏi thêm về hàm chuyển số thành chữ

Liên hệ QC

thong_xanh2003

Thành viên chính thức
Tham gia
24/5/07
Bài viết
56
Được thích
14
Tôi đã dùng hàm chuyển số thành chữ của chị Handung cung cấp và thấy hiệu quả rất tốt. Tôi muốn công thức này có thể hoàn thiện hơn nữa để phù hợp hơn với yêu cầu công việc ,nhưng kiến thức về lập trình của tôi không cho phép. Mong các tiền bối ra tay giúp đỡ,ví dụ như sau:
Tại ô A4 có giá trị số đã nhập vào là:120.000
tại ô A5 khi nhập công thức:= chuyển số thành chữ (A4) _ giá tri ô A5 được trả về là : một trăm hai mươi ngàn
Vậy có cách nào sửa lại đoạn cốt của chị Handung để giá trị ô A5 trả về là : (Một trăm hai mươi ngàn đồng chẵn)
Mong nhận được hồi âm từ diễn đàn!

From ChiBi: Nếu không muốn sửa code thì dùng
="("&chuyen so thanh chu (A4)&" đồng chẵn)"​

Cảm ơn chibi , tôi đã làm theo hướng dẫn của bạn và đã có kết quả như ý. Nhưng còn một điểm nữa tôi muốn hoàn thiện thêm , sau khi làm theo cách của bạn Gtrị ô (A5) ở Vdụ trên được trả về là :(một trăm hai mươi ngàn đồng chẵn). Có cách nào cho GTrị ô (A5) trả về là :(Một trăm hai mươi ngàn đồng chẵn) không ? bạn chỉ giúp với. Cảm ơn bạn nhiều!
 
+ Bạn đã chắc chắn giá trị trong A4 là chẵn không? Giá trị đó chỉ là thời điểm này.
Bạn hãy kiểm tra nếu A4 là chẵn thì "chẵn", trường hợp khác "lẻ"
+ Hàm Upper chuyển chữ thường thành chữ hoa (chỉ đúng với font Unicode)

Khắc phục tạm thời khi tác giả chưa sửa, công thức đầy đủ là:

=Upper(Left(SoThanhChu(A4),1)) & Mid(SoThanhChu(A4),1,LEN(SoThanhChu(A4))-1) & If(Mod(A4,1)=0," chẵn", " lẻ")
 
Lần chỉnh sửa cuối:
Cái này thì ok zồi, đúng như ý bạn luôn !!!

- Có 3 hàm tất cả ( USD , VND , USVN )
- VD : ô A1 = 123.123 -- B1 = 123
---------------------------------------------------
+ =USD(A1) --> One hundred twenty three dollars and twelve cents
+ =USD(B1) --> One hundred twenty three dollars only
---------------------------------------------------
+ =VND(A1) --> Một trăm hai mươi ba đồng mười hai
+ =VND(B1) --> Một trăm hai mươi ba đồng chẵn
---------------------------------------------------
+ =USVN(A1) --> Một trăm hai mươi ba đôla mười hai cent
+ =USVN(B1) --> Một trăm hai mươi ba đôla chẵn

---- Chý ú : Chỉ đọc 2 số cuối thôi nhé 123.12345 ---



View attachment n2tEV.zip
 
Lần chỉnh sửa cuối:
Chào tedaynui,

Mình là thành viên mới, mình cũng đang tìm công cụ chuyển số thành chữ bằng tiếng Anh. Mình đã tải num2text về rồi nhưng chưa biết cách sử dụng. Bạn làm ơn chỉ giúp được ko?

Xin cảm ơn rất nhiều.

RB.
 
Roadbrowser đã viết:
Chào tedaynui,

Mình là thành viên mới, mình cũng đang tìm công cụ chuyển số thành chữ bằng tiếng Anh. Mình đã tải num2text về rồi nhưng chưa biết cách sử dụng. Bạn làm ơn chỉ giúp được ko?
Chào bạn
Cú pháp hàm : Num2Text(Number,type)
Number : là số hoặc địa chỉ ô có chứa số
Type : Nếu là 0 thì chỉ đọc số. Nếu là 1 thì đọc số theo tiền tệ (USD)
Ví dụ : ô A1 chứa số 345.25
Thì công thức ở ô A2:=Num2Text(A1,0)

TDN
 
chibi đã viết:
Nếu không muốn sửa code thì dùng
="("&chuyen so thanh chu (A4)&" đồng chẵn)"
Quá hay, đơn giản mà thực dụng. Cám ơn nhìu
 
Cảm ơn tedaynui,

Nhưng hình như file num2text mình tải về là một file excel. Nó có phải là một add-Ins ko?
Mình đã hiểu cấu trúc của hàm nhưng làm sao để có thể dùng được nó?

RB.
 
Roadbrowser đã viết:
Nhưng hình như file num2text mình tải về là một file excel. Nó có phải là một add-Ins ko?
Mình đã hiểu cấu trúc của hàm nhưng làm sao để có thể dùng được nó?
Chào bạn
1/ Bạn có thể Save As tạo thành file *.XLA để tạo add-in
2/ Bạn copy Module chứa hàm Num2Text vào file *.XLS của bạn. Cách này bạn có thể mở file XLS của bạn ở máy nào cũng được (Không bị báo lỗi)

TDN
 
- Có 3 hàm tất cả ( USD , VND , USVN )
- VD : ô A1 = 123.123 -- B1 = 123
---------------------------------------------------
+ =USD(A1) --> One hundred twenty three dollars and twelve cents
+ =USD(B1) --> One hundred twenty three dollars only
---------------------------------------------------
+ =VND(A1) --> Một trăm hai mươi ba đồng mười hai
+ =VND(B1) --> Một trăm hai mươi ba đồng chẵn
---------------------------------------------------
+ =USVN(A1) --> Một trăm hai mươi ba đôla mười hai cent
+ =USVN(B1) --> Một trăm hai mươi ba đôla chẵn

---- Chý ú : Chỉ đọc 2 số cuối thôi nhé 123.12345 ---
-------------------------------------

Hàm ở trên đã rất hay, nhưng có hạn chế là đôi khi tiền không phải là đô la hay đồng mà lại là EURO hay YEN thi sao? Các bạn có biết hàm nào cho tùy chọn tên loại tiền không. Cám ơn nhiều!
 
Xem ở đây, bài 27, 28, 29 đọc số tiếng việt font vni-***, đọc số tiếng Anh (mọi font, dĩ nhiên)
http://www.giaiphapexcel.com/forum/showthread.php?p=48670
Xem ở đây, đọc số tiếng Pháp
http://www.giaiphapexcel.com/forum/showthread.php?t=7201http://www.giaiphapexcel.com/forum/s...9907#post49907

Đơn vị tính tiền Việt, USD, EUR và tùy chọn kể cả mét, lít, có cả đơn vị xu, cent, và tùy chọn như centimét cho phần thập phân làm tròn 2 số .
 
Lần chỉnh sửa cuối:
sao file Doiso.xla của mình không đọc được tiền Đô bằng tiếng việt vậy. Mình đã dùng đúng lệnh mà chỉ thấy #num?
 
Web KT
Back
Top Bottom