"Ngày Tháng Năm" khi nhắc tới cụm từ này nó luôn tạo cho mình một cảm giác gì đó thật đặc biệt, nó có thể là một dòng đầu trong 1 tờ hóa đơn, hay là một dòng cuối của một biên bản nào đó như điều chỉnh hóa đơn chẳng hạn, và ở bài viết này mình sẽ hướng dẫn các bạn cách chuyển ngày tháng năm ở dạng dd/MM/yyyy thành dạng đọc là Ngày dd Tháng MM năm yyyy, chi tiết các bạn theo dõi ở bên dưới.
Có thể mở đầu của mình hơi mông lung cho các bạn phải không nào, vậy mình sẽ nói rõ đó là mình có một ngày tháng cụ thể như là 09/09/2019 và mình chuyển nó thành đọc chữ Ngày 09 Tháng 09 Năm 2019, các bạn hiểu rồi chứ, bây giờ chúng ta bắt đầu.
Mình sẽ giới thiệu với các bạn 3 cách để chuyển ngày tháng sang dạng chữ từ đơn giản đến vô cùng đơn giản.
1. Sử Dụng Format Cell.
Đầu tiên các bạn click phải vào ô bất kỳ rồi chọn Format Cells hoặc nhất phím tắt excel là Ctrl + 1
Ở hộp thoại Format Cells các bạn chọn thẻ Number - Custom và ở ô Type các bạn gõ:
"Ngày "dd" Tháng "mm" Năm "yyyy
Hãy chú ý dấu cách nhé, sau đó nhấn OK
Quay trở lại và hãy gõ công thức =D2 vào ô mà bạn mới định dạng lại xem sao nhé
Kết quả
2. Sử Dụng Công Thức Excel.
Với cách này thì chúng ta kết hợp các hàm DAY, MONTH, YEAR lại với nhau để thực hiện chuyển ngày tháng sang dạng chữ.
Ở ô E2 hãy sử dụng công thức như sau:
="Ngày "&DAY(D2)&" Tháng "&MONTH(D2)&" Năm "&YEAR(D2)
Hãy chú ý gõ dấu cách cho chính xác nhé, nếu không nó sẽ dính chữ, nếu bị dính chữ thì bạn có thể gõ khoảng cách phù hợp là được.
Và đây là kết quả
3. Sử Dụng VBA Excel.
Với cách này thì chúng ta sẽ sử dụng code VBA để tạo ra hàm tự định nghĩa, thật ra thì không cần dùng cách này đâu, nhưng mình cũng muốn giới thiệu để các bạn hiểu hơn về ứng dụng của VBA trong Excel.
Như thường lệ, hãy nhấn Alt + F11 sau đó chọn Insert - Module
Copy và dán đoạn code sau vào khung soạn thảo sau đó tắt chúng đi.
Function NgayThanhChu(ByVal bDate As Date) As String
Dim NGAY As Byte, THANG As Byte
Dim NAM As Integer
NGAY = Day(bDate)
THANG = Month(bDate)
NAM = Year(bDate)
NgayThanhChu = "Ngày " & NGAY & " Tháng " & THANG & " N" & ChrW$(259) & "m " & NAM
End Function
Như hình
Bây giờ các bạn gõ =NgayThanhChu(D2) và nhấn Enter
Kết quả chúng ta có được giống như những cách đầu tiên.
Nếu các bạn muốn tạo luôn 1 Add-ins cho tiện sử dụng thì một lời khuyên là cứ tạo nếu muốn nhé.
Vậy là mình vừa giới thiệu với các bạn 3 cách để chuyển ngày tháng sang dạng chữ rồi, nếu thấy hay hãy chia sẽ tới mọi người cùng biết nhé. Chúc các bạn thành công.
