UserForm là một công cụ rất hay trong VBA giúp bạn có thể tự tạo các Form theo ý muốn để nhập dữ liệu. Trong bài viết này, chúng ta cùng tìm hiểu cách tự động định dạng dữ liệu ngày tháng trong UserForm nhé.

Ví dụ chúng ta có 1 UserForm, trong đó Textbox1 là ô nhập Ngày, Textbox2 là ô nhập Tên.

Mục tiêu: Khi nhập ngày vào textbox1 xong (có thể nhập tắt chỉ gồm ngày và tháng) sau đó chuyển sang Textbox2 thì tự động tại Textbox1 sẽ chuyển về dạng ngày tháng năm đầy đủ là dd/mm/yyyy.

Cách thực hiện như sau:

1. Gọi sự kiện After Update cho Textbox1

Vì chỉ khi nhập dữ liệu xong, chuyển qua textbox khác thì việc tự động thay đổi cách hiển thị dữ liệu ngày tháng trong textbox1 mới diễn ra. Do đó đây là sự kiện AfterUpdate. Cần phân biệt sự kiện này với Change (có sự thay đổi) – Change là sự kiện mặc định khi Double click vào Textbox.

2. Code thay đổi cách hiển thị dữ liệu trong Textbox

Trong sự kiện After Update, chúng ta viết đoạn code sau:

TextBox1 = Format(TextBox1, “dd/mm/yyyy”)

Đoạn code trên có ý nghĩa: Textbox1 sẽ nhận 1 giá trị mà giá trị đó chính là giá trị đã nhập vào trong textbox1 nhưng thay đổi định dạng (format) là dạng dd/mm/yyyy.

3. Mở UserForm và kiểm tra kết quả

Bấm nút F5 để mở UserForm, nhập thử ngày vào Textbox1 và xem kết quả:

Rất đơn giản phải không nào. Chúc các bạn ứng dụng thành công!

Ngoài ra bạn có thể tham khảo thêm các bài viết:

Cách tự động định dạng số khi nhập vào textbox trong userform VBA Excel

Tự động tính thành tiền khi thay đổi số lượng hoặc đơn giá trong userform VBA

Hướng dẫn tạo userform tra cứu dữ liệu