Chào các bạn,
Hôm nay mình muốn chia sẻ một tiện ích nhỏ mà mình tự viết để giúp tự động điền ngày tháng năm vào các ô trong Excel. Cái này rất hữu ích khi các bạn làm báo cáo, nhập liệu hoặc cần theo dõi thời gian.
Vấn đề:
- Mỗi lần nhập liệu, mình phải gõ tay ngày tháng năm, rất tốn thời gian và dễ sai sót.
- Muốn có định dạng ngày tháng năm theo ý muốn (ví dụ: dd/mm/yyyy hoặc mm-dd-yyyy).
Giải pháp:
Mình đã tạo một macro VBA đơn giản để giải quyết vấn đề này. Khi nhấn tổ hợp phím tắt (ví dụ: Ctrl + Shift + D), macro sẽ tự động chèn ngày tháng năm hiện tại vào ô đang chọn, với định dạng đã được thiết lập sẵn.
Cách sử dụng:
- Mở trình soạn thảo VBA (Alt + F11).
- Vào Insert -> Module.
- Dán đoạn code sau vào:
Sub AutoInsertDate()
Dim dateFmt As String
dateFmt = "dd/mm/yyyy" ' Định dạng ngày tháng năm bạn muốn
ActiveCell.Value = Format(Date, dateFmt)
End Sub- Thiết lập phím tắt: Vào View -> Macros -> View Macros, chọn
AutoInsertDate, nhấn Options và gán phím tắt (ví dụ: Ctrl + Shift + D).
Các bạn có thể tùy chỉnh biến dateFmt để có định dạng ngày tháng năm mong muốn.
Hy vọng tiện ích nhỏ này sẽ giúp ích cho các bạn trong công việc!