Đổi ngày tháng năm dạng số sang dạng chữ

Liên hệ QC

Đỗ Văn Thành

Thành viên mới
Tham gia
26/9/20
Bài viết
2
Được thích
0
Chào các bạn. Mình muốn chuyển đổi ngày tháng năm bằng chữ dạng 22/12/2020 thành => Ngày hai mươi hai, tháng mười hai, năm hai nghìn không trăm hai mươi. Bạn nào biết chỉ giúp mình.
 
Chào các bạn. Mình muốn chuyển đổi ngày tháng năm bằng chữ dạng 22/12/2020 thành => Ngày hai mươi hai, tháng mười hai, năm hai nghìn không trăm hai mươi. Bạn nào biết chỉ giúp mình.
Ví dụ ngày: 22/1/2020, bạn muốn đọc là:

1. Ngày hai mươi hai, tháng một, năm hai nghìn không trăm hai mươi.

hay:

2. Ngày hai mươi hai, tháng giêng, năm hai nghìn không trăm hai mươi.?
 
Ví dụ ngày: 22/1/2020, bạn muốn đọc là:

1. Ngày hai mươi hai, tháng một, năm hai nghìn không trăm hai mươi.

hay:

2. Ngày hai mươi hai, tháng giêng, năm hai nghìn không trăm hai mươi.?
Nếu là tôi thì khi 12 gọi là tháng mười hai thì 1 phải gọi là tháng một. Hoặc 12 - 1 là tháng mười hai - tháng một, hoặc 12 - 1 là tháng Chạp - tháng Giêng. Trước sau phải như một.
 
Nếu là tôi thì khi 12 gọi là tháng mười hai thì 1 phải gọi là tháng một. Hoặc 12 - 1 là tháng mười hai - tháng một, hoặc 12 - 1 là tháng Chạp - tháng Giêng. Trước sau phải như một.
Tôi nhớ mang máng ( không chắc nha! ) hồi nhỏ thày dạy 12 tháng gồm: Tháng Giêng, Tháng Hai, Tháng Ba... Tháng Mười, Tháng Một, Tháng Chạp)
 
Lập ra 2 cái bảng.

Bảng thứ nhất chứa 1 đến 31. Và 31 câu chữ. Như vậy ngày tháng sẽ dò được là (N là ngày cần dò):
="Ngày " & VLookup(Day(N), Bang1, 2, 0) & ", tháng " & VLookup(Month(N), Bang1, 2, 0)

Bảng thứ hai chứa những năm cần tra. Dò tìm tương tự như trên.
(Cỡ hơn trăm dòng tôi gõ xong trước khi nhận được giải pháp xịn ở đây)
 
Ví dụ ngày: 22/1/2020, bạn muốn đọc là:

1. Ngày hai mươi hai, tháng một, năm hai nghìn không trăm hai mươi.

hay:

2. Ngày hai mươi hai, tháng giêng, năm hai nghìn không trăm hai mươi.?
Mình muốn là tháng một
Bài đã được tự động gộp:

Mình muốn là tháng một
Tính theo tháng dương lịch
 
Mình muốn là tháng một
Tính theo tháng dương lịch
Bạn có thể dùng UDF DocSoV() của tác giả Huuthang_bd ,


rồi sử dụng công thức:

="Ngày " &LOWER(docsov(DAY(A1))) &", tháng "&LOWER(docsov(MONTH(A1))) &", năm "&LOWER(SUBSTITUTE(docsov(YEAR(A1)),",",""))
 

File đính kèm

  • DocNgayThang.xlsm
    22.2 KB · Đọc: 20
Web KT
Back
Top Bottom