Tạo nút textbox và thông báo khi nhập không đúng ngày tháng. (1 người xem)

[lephongctbghg]

Xin các anh chị chỉ giúp dùm. Cám ơn các anh chị nhiều!

 

[lephongctbghg]

Không ai giúp mình hết vậy!

 

[jack nt]

Không ai giúp mình hết vậy!

trong file đính kèm, bạn chèn cái Object1 là gì tui chưa biết (tui không rành mấy món chèn thêm của Excel)
nếu là một cái Form và mấy cái ô chữ nhật là TextBox thì chỉ cần kiểm tra sự kiện change là được.
chẳng hạn ngày đi là txtNgayDi và ngày đến là txtNgayDen thì làm như sau

Private Sub txtNgayDen_Change()
    If CDate(txtNgayDen) < CDate(txtNgayDi) then
        MsgBox("Invalid date!")
    End If
End Sub

P/S: cũng có thể dùng hàm DateDiff() để kiểm tra
sao bạn sốt ruột vậy. có lẽ file đính kèm của bạn không rõ nên các bạn khác ngại làm.