Đọc số bằng chữ dùng Name

hvphong

Thành viên chính thức
Tham gia ngày
28 Tháng chín 2007
Bài viết
56
Được thích
1
Điểm
0
Tuổi
37
cái này có dùng thêm code không bác "anhtuan 1066", sao mình làm trên file mới không được???
 

hvphong

Thành viên chính thức
Tham gia ngày
28 Tháng chín 2007
Bài viết
56
Được thích
1
Điểm
0
Tuổi
37
Cái này có dùng thêm Code không bác "anhtuan 1066", sao mình làm trên file mới không chạy như của bác??
 

khuongdlkn

Thành viên mới
Tham gia ngày
20 Tháng tám 2013
Bài viết
1
Được thích
0
Điểm
0
cái nầy thì hay nhưng đọc không có dấu (,) gì hết bạn ơi
 

KUMI

Bụi phấn
Tham gia ngày
17 Tháng một 2012
Bài viết
560
Được thích
578
Điểm
560
File USD này cũng chung số phận với VND.. nghĩa là ko chạy dc trên Excel2007
Tôi xin lưu ý rằng tôi dùng Portable_Office2007... nhưng ai đã cài đặt bộ Office2007 này đàng hoàng xin thử xem thế nào nhé
Đúng như Thầy nói. File đọc số bằng Names này con đã test trên phiên bản Office 207 ở công ty (có bản quyền _ đàng hoàng) thì không thấy vấn đề gì. Nhưng ở nhà phiên bản crack thì treo luôn.

Hiện Thầy đang dùng file nào thế ạ! Nếu có Thầy Up lên cho con xin nhé! Cả file sử dụng VBA + File sử dụng Name!
Trên diễn đàn giờ nhiều File quá con không biết nên chọn file nào?
Mong thầy giúp đỡ!
Cảm ơn Thầy!
 

intelligent1502

Thành viên mới
Tham gia ngày
30 Tháng tám 2013
Bài viết
37
Được thích
3
Điểm
0
em tò mò quá anh HOÀNG DANH282 ơi , anh phai đặt code vào chỗ nào thi khi nhập =VND nó mới hiện chứ???
 

huỳnh thi tĩnh

Thành viên mới
Tham gia ngày
31 Tháng mười 2013
Bài viết
35
Được thích
1
Điểm
0
cho mình hỏi. mình đã tải xuống rồi nhưng cài công thức cho file excel khác thi bi báo lỗi. còn áp dụng trong file mình tải xuống khi mở rộng ra các sheet vẫn được. không biết mình sai ở điểm nào.
 

leonguyenz

Thành viên mới
Thành viên BQT
Moderator
Tham gia ngày
2 Tháng tám 2010
Bài viết
4,482
Được thích
7,870
Điểm
610
Nơi ở
Bình Dương
cho mình hỏi. mình đã tải xuống rồi nhưng cài công thức cho file excel khác thi bi báo lỗi. còn áp dụng trong file mình tải xuống khi mở rộng ra các sheet vẫn được. không biết mình sai ở điểm nào.
Bạn mở file của bạn và file vừa tải xuống lên cùng lúc, vào file đọc số, nhấn chuột phải vào tên sheet doc so, chọn Move or Coppy > To book: bạn chọn file của bạn (mục đích: chuyển Name qua sheet của bạn). Đứng tại ô cần ra chữ, nhấn Ctrl+F3, sửa Name so : =TRIM(ô chứa số) > Enter > Colse. Gõ công thức tại ô cần ra chữ: =VND
 

moonlight12

Thành viên mới
Tham gia ngày
5 Tháng hai 2013
Bài viết
1
Được thích
0
Điểm
363
Tuổi
34
Mình gửi các bạn file đọc số bằng chữ dùng Name.Ưu điểm của việc dùng Name so với công thức thường là có thể thao tác cùng một lúc cho nhiều cell khác nhau trong cùng một sheet, và chạy nhanh không kèm VBA.Các bạn xem file đã bổ sung ở bài #12 và bài #39
Bạn ơi,Mình đang dùng excel 2013 mình muốn đổi số thành chữ. Khi mình dùng add-im của bạn thì rất ok trong việc đổi số tiền việt nam đồng, nhưng khi mình muốn đổi sang đô la thì như thế nào? Bạn có thể giúp mình về vấn đề này không? VD: 1.234USD--> một ngàn hai trăm ba mươi bốn đô la. Cảm ơn bạn rất nhiều
 

thanhmong2512

Thành viên mới
Tham gia ngày
27 Tháng năm 2014
Bài viết
2
Được thích
0
Điểm
0
Minh mo ra thi chi thay dong nao cung hien so khong dung thoi ah. Tro giup minh voi
 

thanhmong2512

Thành viên mới
Tham gia ngày
27 Tháng năm 2014
Bài viết
2
Được thích
0
Điểm
0
Nhung ko duoc mo file chi thay hien so khong dung thoi ah. Có thể chỉ rõ hơn cho mình đc ko
 

po_op_po_op

Thành viên mới
Tham gia ngày
9 Tháng mười một 2006
Bài viết
30
Được thích
0
Điểm
663
Tuổi
36
[URL="http://www.giaiphapexcel.com/forum/member.php?29993-hoangdanh282vn"]hoangdanh282vn [/URL]cho mình hỏi về vài điều trong đọc số thành chữ với

- GetRC=SUBSTITUTE(REFTEXT(!$A$1);1;"") mình không hiểu hàm REFTEXT(!$A$1) này? trong excel k thấy hàm REFTEXT và tại sao lại có dấu ! ở công thức GetRow0=ROW(!$A$1) cũng có ?
- VT=GET.CELL(6;INDIRECT(GetRC;FALSE)) sao lại có GET.CELL vậy nhỉ ?
- Và cả hàm GET.NAME nữa


 

Mr.Bum

Để gió cuốn đi...
Tham gia ngày
29 Tháng tư 2014
Bài viết
316
Được thích
299
Điểm
0
hoangdanh282vncho mình hỏi về vài điều trong đọc số thành chữ với

- GetRC=SUBSTITUTE(REFTEXT(!$A$1);1;"") mình không hiểu hàm REFTEXT(!$A$1) này? trong excel k thấy hàm REFTEXT và tại sao lại có dấu ! ở công thức GetRow0=ROW(!$A$1) cũng có ?
- VT=GET.CELL(6;INDIRECT(GetRC;FALSE)) sao lại có GET.CELL vậy nhỉ ?
- Và cả hàm GET.NAME nữa
Bạn gõ từ khóa Excel 4.0 Marco hoặc Marco4.0 để tìm hiểu hoặc vào đây tham khảo:
Hiện nay hiếm thấy ai sử dụng Marco4.0
 

chiengame

Thành viên mới
Tham gia ngày
25 Tháng ba 2011
Bài viết
10
Được thích
1
Điểm
365
Xin lỗi mình gửi lại file này mới đúng
--=0
File này đọc rất hay, nhưng còn một lỗi nhỏ, ai biết thì giúp dùm, Cám ơn mọi người. Ví dụ số: 102.002.002.005
File này đọc : Một trăm lẻ hai tỷ, hai triệu, không trăm lẻ hai ngàn, không trăm lẻ năm đồng
Mình muốn đọc là : Một trăm lẻ hai tỷ, không trăm lẻ hai triệu, không trăm lẻ hai ngàn, không trăm lẻ năm đồng
 
Lần chỉnh sửa cuối:

chiengame

Thành viên mới
Tham gia ngày
25 Tháng ba 2011
Bài viết
10
Được thích
1
Điểm
365
Xin lỗi mình gửi lại file này mới đúng
--=0
File này đọc số rất hay, nhưng còn một lỗi nhỏ, ai biết thì giúp dùm, Cám ơn mọi người. Ví dụ số: 102.002.002.005
File này đọc : Một trăm lẻ hai tỷ, hai triệu, không trăm lẻ hai ngàn, không trăm lẻ năm đồng
-> Mình muốn đọc là : Một trăm lẻ hai tỷ, không trăm lẻ hai triệu, không trăm lẻ hai ngàn, không trăm lẻ năm đồng
 

File đính kèm

Lần chỉnh sửa cuối:

ducanhnguyen2k

Thành viên mới
Tham gia ngày
26 Tháng mười một 2012
Bài viết
3
Được thích
0
Điểm
0
Tuổi
31
iu điểm quá rõ ràng của cách này là
có thể bổ sung hàm chuyển đối số thành chữ vào file excel của ngừi iu qua dropbox, ko cần kêu nàng bật teamview để cài vntool hay vba gì sất
làm nàng bất ngờ chơi :))

quá đỉnh !
 

KHONG_GJ_CA

Thành viên mới
Tham gia ngày
28 Tháng chín 2010
Bài viết
42
Được thích
0
Điểm
363
Tuổi
33
Cám ơn bạn.
Đúng là file đọc số VND mình quên đưa dấu ","vào trong câu. Nhưng trong file USD thì đã có. Nếu bạn quan tâm thì mình sẽ chỉnh tiếp phần này.

To Bác Anhtuan1066 : Bác cứ đưa em lên mây thì e rằng khi xuống chắc là hơi khó khăn đây. Những gì em có được là nhờ học hỏi ở Bác và các Bạn khác trên diễn đàn.Cám ơn Bác và các bạn nhiều lắm.
Mong bác sớm ra bản VND có đưa dấu "," ngăn cách vào câu đọc. Cảm ơn
 

hungmaikt4

Thành viên mới
Tham gia ngày
14 Tháng ba 2012
Bài viết
1
Được thích
0
Điểm
363

Dưới đây nhé các bác, ô H8 là ô cần đọc nhé.

=TRIM(IF(OR(LEN(FLOOR(H8,1))=13,FLOOR(H8,1)<=0),"Out of range",PROPER(SUBSTITUTE(CONCATENATE(CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),1,1)+1,"","một trăm ","hai trăm ","ba trăm ","bốn trăm ","năm trăm ","sáu trăm ","bảy trăm ","tám trăm ","chín trăm "),CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),2,1)+1,"",CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),3,1)+1,"mười","mười một","mười hai","ba mươi","bốn mươi","lăm mươi","sáu mươi","bảy mươi","tám mươi","chín mươi"),"hai mươi","ba mươi","bốn mươi","lăm mươi","sáu mươi","bảy mươi","tám mươi","chín mươi"),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),2,1))>1,CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),3,1)+1,""," một"," hai"," ba"," bốn"," lăm"," sáu"," bảy"," tám"," chín"),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),2,1))=0,CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),3,1)+1,""," một"," hai"," ba"," bốn"," lăm"," sáu"," bảy"," tám"," chín"),"")),IF(H8>=10^9," tỷ ",""),CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),4,1)+1,"","một trăm ","hai trăm ","ba trăm ","bốn trăm ","năm trăm ","sáu trăm ","bảy trăm ","tám trăm ","chín trăm "),CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),5,1)+1,"",CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),6,1)+1,"mười","mười một","mười hai","ba mươi","bốn mươi","lăm mươi","sáu mươi","bảy mươi","tám mươi","chín mươi"),"hai mươi","ba mươi","bốn mươi","lăm mươi","sáu mươi","bảy mươi","tám mươi","chín mươi"),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),5,1))>1,CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),6,1)+1,""," một"," hai"," ba"," bốn"," lăm"," sáu"," bảy"," tám"," chín"),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),5,1))=0,CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),6,1)+1,""," một"," hai"," ba"," bốn"," lăm"," sáu"," bảy"," tám"," chín"),"")),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),4,3))>0," triệu ",""),CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),7,1)+1,"","một trăm ","hai trăm ","ba trăm ","bốn trăm ","năm trăm ","sáu trăm ","bảy trăm ","tám trăm ","chín trăm "),CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),8,1)+1,"",CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),9,1)+1,"mười","mười một","mười hai","ba mươi","bốn mươi","lăm mươi","sáu mươi","bảy mươi","tám mươi","chín mươi"),"hai mươi","ba mươi","bốn mươi","lăm mươi","sáu mươi","bảy mươi","tám mươi","chín mươi"),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),8,1))>1,CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),9,1)+1,""," một"," hai"," ba"," bốn"," lăm"," sáu"," bảy"," tám"," chín"),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),8,1))=0,CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),9,1)+1,""," một"," hai"," ba"," bốn"," lăm"," sáu"," bảy"," tám"," chín"),"")),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),7,3))," nghìn ",""),CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),10,1)+1,"","một trăm ","hai trăm ","ba trăm ","bốn trăm ","năm trăm ","sáu trăm ","bảy trăm ","tám trăm ","chín trăm "),CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),11,1)+1,"",CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),12,1)+1,"mười","mười một","mười hai","ba mươi","bốn mươi","lăm mươi","sáu mươi","bảy mươi","tám mươi","chín mươi"),"hai mươi","ba mươi","bốn mươi","lăm mươi","sáu mươi","bảy mươi","tám mươi","chín mươi"),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),11,1))>1,CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),12,1)+1,""," một"," hai"," ba"," bốn"," lăm"," sáu"," bảy"," tám"," chín"),IF(VALUE(MID(TEXT(INT(H8),REPT(0,12)),11,1))=0,CHOOSE(MID(TEXT(INT(H8),REPT(0,12)),12,1)+1,""," một"," hai"," ba"," bốn"," lăm"," sáu"," bảy"," tám"," chín"),"")))," "," ")&IF(FLOOR(H8,1)>1," đồng"))))
 
Top Bottom