Nhờ các bác giúp em addin chuyển đổi số tấn thành chữ (1 người xem)

[hâkhnh]

Em đã xem trong diễn đàn có bác hướng dẫn chuyển đổi số tấn thành chữ, nhưng không thực hiện được. Bác nào có addon hoặc công thức hướng dẫn giúp em.
Số của em muốn chuyển đổi sạng như sau
Ví dụ Em có số: 1.646,23 tấn thì em muốn ghi là Một nghìn, sáu trăm bốn mươi sáu, phẩy hai mươi ba tấn
Rất mong bác nào có thể giúp được em
Em xin cảm ơn

 

[HeSanbi]

Dưới đây là một hàm UDF để đọc số thành chữ

=SpellNumVN("1.646,23 tấn",snNumberIndexs(0),snSpellPercent(),snReplaceNumbers(),snCaseThousands())

Nếu bạn có một mảng số, chỉ cần nhập mảng cần đọc thành chữ. ví dụ nhập A1:A100:

=SpellNumVN(A1:A100,snNumberIndexs(0),snSpellPercent(),snReplaceNumbers(),snCaseThousands())

Bạn tham khảo thêm tại bài viết:

Hàm SpellNumVN - Đọc số thành chữ, chuyển chữ thành số, kể cả số thập phân

*****CẬP NHẬT: 19/07/2024 ***** Hôm nay tôi mang đến cho các bạn một giải pháp đọc số thành chữ tối ưu, và đa dạng tùy chọn kiểu trả về kết quả để phù hợp với nhu cầu từng trường hợp cho văn bản hay biên bản, hàm mới này thay vì chỉ đọc duy nhất số thì hàm có thể đọc được số trong chuỗi chứa...

www.giaiphapexcel.com

 

[HeSanbi]

@hâkhnh bạn tải lại tệp. Mình đã sửa một lỗi.

 

[hâkhnh]

@hâkhnh bạn tải lại tệp. Mình đã sửa một lỗi.

Thực sự món Excel mình hơi kém, mình gửi File của mình, bạn có thể đặt công thức giúp anh chỗ ô bôi vàng nhé. Mình cảm ơn bạn nhiều

 

[HeSanbi]

Bạn cần chép mã vào tệp của bạn mới có thể làm được.
Mở VBA với phím ALT+F11, chọn dự án của bạn, chuột phải để tạo một Module để chép mã, hoặc kéo module ở tệp tải về vào dự án của bạn.
Và lưu tệp với xlsm hoặc xlsb

 

[Nguyễn Duy Tuân]

Nếu bạn dùng Bluesofts AccHelper thì công thức như sau:
=SUBSTITUTE( VND(F3,," ","tấn",,TRUE), " và", ", phẩy")
(F3 trong công thức là tham chiếu chứa số cần đọc)