dịch số ra chữ số
Còn đây là một file dịch số ra chữ số tiếng việt rất đơn giản chỉ có 24 KB thôi ( dược sử dụng trong ngân hàng đó) ,bạn chỉ cần download về và copy nó vào office của bạn là xong, ở ô bất kỳ để hiện chữ số thì bạn gõ là = "số tiền bằng chữ: "&dichvn(*) là xong * là tại vị trí ô có con số muốn dịch ra chữ số ví dụ ô A1 Còn bạn muốn làm cách khác thủ công hơn thì xem cái công thức ở dưới tôi viết nè nhưng theo tôi cách dưới ko nên làm vì rất dài trong khi có nhiều code chuyển số ra chữ đơn giản hơn đã được giới thiệu ở trên, xài cái file tui gửi đính kèm đó
Hoặc cách thủ công nhất mình đã làm, bạn cứ theo số ô trên excel mà làm thử xem, đây không phải đoạn code chỉ là cách dùng công thức thô sơ nhất, mình chỉ viết tới 100 tỷ đồng thôi tức là 12 con số, còn bạn nếu cần nhiều hơn cứ việc tương tự theo đó mà nghiên cứu thêm và gõ lệnh tạo thêm theo ý bạn
Công thức này chỉ coi chơi thôi nhé
A1: NƠI ĐÁNH Ô SỐ CÓ ĐƯỢC.
A2: NƠI QUY ĐỔI CON SỐ RA CHỮ SỐ.
B1: =IF(LEN($A$1)<>0,VALUE(RIGHT(A1,3)),"")
B2: Nhóm: từ 1đến 5
B3: Nhóm: từ 6 đến 0
B4: TH: "một","mốt".
B5: TH: "lăm","năm".
B6: Ghép trọng số
B7: Ghép toàn bộ 3 cột
B8: =IF(LEN($A$1)>3,VALUE(RIGHT((A1-B1)/1000,3)),"")
B9: Nhóm: từ 1 đến 6
B10: Nhóm: từ 6 đến 0
B11: TH: "một","mốt".
B12: TH: "lăm","năm".
B13: Ghép trọng số.
B14: Ghép toàn bộ 3 cột.
B15: =IF(LEN($A$1)>6,VALUE(RIGHT(($A$1-RIGHT(A1,6))/1000000,3)),"")
B16: Nhóm: từ 1 đến 7
B17: Nhóm: từ 6 đến 1
B18: TH: "một","mốt".
B19: TH: "lăm","năm".
B20: Ghép trọng số.
B21: Ghép toàn bộ 3 cột
B22: =IF(LEN($A$1)>9,VALUE(RIGHT(($A$1-RIGHT($A$1,9))/1000000000,3)),"")
B23: Nhóm: từ 1 đến 8
B24: Nhóm: từ 6 đến 2
B25: TH: "một","mốt".
B26: TH: "lăm","năm".
B27: Ghép trọng số.
B28: Ghép toàn bộ 3 cột
C1: =IF(LEN(B1)=3,VALUE(MID(B1,1,1)),"")
C2: =IF(C1=1,"một ",IF(C1=2,"hai ",IF(C1=3,"ba ",IF(C1=4,"bốn ",IF(C1=5,"năm ",C3)))))
C3: =IF(C1=6,"sáu ",IF(C1=7,"bảy ",IF(C1=8,"tám ",IF(C1=9,"chín ",IF(C1=0,"không ","")))))
C4: =C2
C5: =C4
C6: =IF(AND(C1<>"",C1<>0),CONCATENATE(C5,"trăm "),"")
C7: =CONCATENATE(C6,D6,E6)
C8: =IF(LEN(B8)=3,VALUE(MID(B8,1,1)),"")
C9: =IF(C8=1,"một ",IF(C8=2,"hai ",IF(C8=3,"ba ",IF(C8=4,"bốn ",IF(C8=5,"năm ",C10)))))
C10: =IF(C8=6,"sáu ",IF(C8=7,"bảy ",IF(C8=8,"tám ",IF(C8=9,"chín ",IF(C8=0,"không ","")))))
C11: =C9
C12: =C11
C13: =IF(AND(C8<>"",C8<>0),CONCATENATE(C12,"trăm ",),"")
C14: =CONCATENATE(C13,D13,E13)
C15: =IF(LEN(B15)=3,VALUE(MID(B15,1,1)),"")
C16: =IF(C15=1,"một ",IF(C15=2,"hai ",IF(C15=3,"ba ",IF(C15=4,"bốn ",IF(C15=5,"năm ",C17)))))
C17: =IF(C15=6,"sáu ",IF(C15=7,"bảy ",IF(C15=8,"tám ",IF(C15=9,"chín ",IF(C15=0,"không ","")))))
C18: =C16
C19: =C18
C20: =IF(AND(C15<>"",C15<>0),CONCATENATE(C19,"trăm "),"")
C21: =CONCATENATE(C20,D20,E20)
C22: =IF(LEN(B22)=3,VALUE(MID(B22,1,1)),"")
C23: =IF(C22=1,"một ",IF(C22=2,"hai ",IF(C22=3,"ba ",IF(C22=4,"bốn ",IF(C22=5,"năm ",C24)))))
C24: =IF(C22=6,"sáu ",IF(C22=7,"bảy ",IF(C22=8,"tám ",IF(C22=9,"chín ",IF(C22=0,"không ","")))))
C25: =C23
C26: =C25
C27: =IF(AND(C22<>"",C22<>0),CONCATENATE(C26,"trăm "),"")
C28: =CONCATENATE(C27,D27,E27)
D1: =IF(LEN(B1)=3,VALUE(MID(B1,2,1)),IF(LEN(B1)=2,VALUE(MID(B1,1,1)),""))
D2: =IF(D1=1,"mười ",IF(D1=2,"hai ",IF(D1=3,"ba ",IF(D1=4,"bốn ",IF(D1=5,"năm ",D3)))))
D3: =IF(D1=6,"sáu ",IF(D1=7,"bảy ",IF(D1=8,"tám ",IF(D1=9,"chín ",IF(D1=0,"lẻ ","")))))
D4: =IF(D1=0,IF(E1<>0,D2,""),D2)
D5: =D4
D6: =IF(D1<>"",IF(AND(D1<>0,D1<>1),CONCATENATE(D5,"mươi "),D5),"")
D7: *
D8: =IF(LEN(B8)=3,VALUE(MID(B8,2,1)),IF(LEN(B8)=2,VALUE(MID(B8,1,1)),""))
D9: =IF(D8=1,"mười ",IF(D8=2,"hai ",IF(D8=3,"ba ",IF(D8=4,"bốn ",IF(D8=5,"năm ",D10)))))
D10: =IF(D8=6,"sáu ",IF(D8=7,"bảy ",IF(D8=8,"tám ",IF(D8=9,"chín ",IF(D8=0,"lẻ ","")))))
D11: =IF(D8=0,IF(E8<>0,D9,""),D9)
D12: =D11
D13: =IF(D8<>"",IF(AND(D8<>0,D8<>1),CONCATENATE(D12,"mươi "),D12),"")
D14: *
D15: =IF(LEN(B15)=3,VALUE(MID(B15,2,1)),IF(LEN(B15)=2,VALUE(MID(B15,1,1)),""))
D16: =IF(D15=1,"mười ",IF(D15=2,"hai ",IF(D15=3,"ba ",IF(D15=4,"bốn ",IF(D15=5,"năm ",D17)))))
D17: =IF(D15=6,"sáu ",IF(D15=7,"bảy ",IF(D15=8,"tám ",IF(D15=9,"chín ",IF(D15=0,"lẻ ","")))))
D18: =IF(D15=0,IF(E15<>0,D16,""),D16)
D19: =D18
D20: =IF(D15<>"",IF(AND(D15<>0,D15<>1),CONCATENATE(D19,"mươi "),D19),"")
D21: *
D22: =IF(LEN(B22)=3,VALUE(MID(B22,2,1)),IF(LEN(B22)=2,VALUE(MID(B22,1,1)),""))
D23: =IF(D22=1,"mười ",IF(D22=2,"hai ",IF(D22=3,"ba ",IF(D22=4,"bốn ",IF(D22=5,"năm ",D24)))))
D24: =IF(D22=6,"sáu ",IF(D22=7,"bảy ",IF(D22=8,"tám ",IF(D22=9,"chín ",IF(D22=0,"lẻ ","")))))
D25: =IF(D22=0,IF(E22<>0,D23,""),D23)
D26: =D25
D27: =IF(D22<>"",IF(AND(D22<>0,D22<>1),CONCATENATE(D26,"mươi "),D26),"")
D28: *
E1: =IF(LEN(B1)=3,VALUE(MID(B1,3,1)),IF(LEN(B1)=2,VALUE(MID(B1,2,1)),IF(LEN(B1)=1,B1,"")))
E2: =IF(E1=1,"một ",IF(E1=2,"hai ",IF(E1=3,"ba ",IF(E1=4,"bốn ",IF(E1=5,"lăm ",E3)))))
E3: =IF(E1=6,"sáu ",IF(E1=7,"bảy ",IF(E1=8,"tám ",IF(E1=9,"chín ",IF(E1=0,"","")))))
E4: =IF(E1=1,IF(D1<>"",IF(AND(D1<>0,D1<>1),"mốt ","một "),"một "),E2)
E5: =IF(E1=5,IF(D1=0,"năm ",IF(D1="","năm ",E4)),E4)
E6: =IF($A$1=0,"không đồng. ",IF(E1<>"",CONCATENATE(E5,"đồng chẵn. "),""))
E7: *
E8: =IF(LEN(B8)=3,VALUE(MID(B8,3,1)),IF(LEN(B8)=2,VALUE(MID(B8,2,1)),IF(LEN(B8)=1,B8,"")))
E9: =IF(E8=1,"một ",IF(E8=2,"hai ",IF(E8=3,"ba ",IF(E8=4,"bốn ",IF(E8=5,"lăm ",E10)))))
E10: =IF(E8=6,"sáu ",IF(E8=7,"bảy ",IF(E8=8,"tám ",IF(E8=9,"chín ",IF(E8=0,"","")))))
E11: =IF(E8=1,IF(D8<>"",IF(AND(D8<>0,D8<>1),"mốt ","một "),"một "),E9)
E12: =IF(E8=5,IF(D8=0,"năm ",IF(D8="","năm ",E11)),E11)
E13: =IF(D8="",IF(AND(E8<>0,E8<>""),CONCATENATE(E12,"ngàn "),""),CONCATENATE(E12,"ngàn "))
E14: *
E15: =IF(LEN(B15)=3,VALUE(MID(B15,3,1)),IF(LEN(B15)=2,VALUE(MID(B15,2,1)),IF(LEN(B15)=1,B15,"")))
E16: =IF(E15=1,"một ",IF(E15=2,"hai ",IF(E15=3,"ba ",IF(E15=4,"bốn ",IF(E15=5,"lăm ",E17)))))
E17: =IF(E15=6,"sáu ",IF(E15=7,"bảy ",IF(E15=8,"tám ",IF(E15=9,"chín ",IF(E15=0,"","")))))
E18: =IF(E15=1,IF(D15<>"",IF(AND(D15<>0,D15<>1),"mốt ","một "),"một "),E16)
E19: =IF(E15=5,IF(D15=0,"năm ",IF(D15="","năm ",E18)),E18)
E20: =IF(D15="",IF(AND(E15<>0,E15<>""),CONCATENATE(E19,"triệu "),""),CONCATENATE(E19,"triệu "))
E21: *
E22: =IF(LEN(B22)=3,VALUE(MID(B22,3,1)),IF(LEN(B22)=2,VALUE(MID(B22,2,1)),IF(LEN(B22)=1,B22,"")))
E23: =IF(E22=1,"một ",IF(E22=2,"hai ",IF(E22=3,"ba ",IF(E22=4,"bốn ",IF(E22=5,"lăm ",E24)))))
E24: =IF(E22=6,"sáu ",IF(E22=7,"bảy ",IF(E22=8,"tám ",IF(E22=9,"chín ",IF(E22=0,"","")))))
E25: =IF(E22=1,IF(D22<>"",IF(AND(D22<>0,D22<>1),"mốt ","một "),"một "),E23)
E26: =IF(E22=5,IF(D22=0,"năm ",IF(D22="","năm ",E25)),E25)
E27: =IF(D22="",IF(AND(E22<>0,E22<>""),CONCATENATE(E26,"tỉ "),""),CONCATENATE(E26,"tỉ "))
E28: *