Hiển thị ngày hiện tại trong textbox trên form

[dqt_nt]

Nhờ sự giúp đỡ của anh/chị, tôi đã tạo được 1 cái form nho nhỏ phục vụ cho công việc. Tuy nhiên có 1 vướng muốn anh/chị giúp sức:
- Tôi muốn trong cái combobox ngày nghỉ hiển thị ngày hiện tại của hệ thống (giống hàm = now()) theo định dạng dd/mm/yy (như hình vẽ)

- Nếu như textbox thì có làm được vậy không?

Mong anh/chị giúp!
Cảm ơn tất cả.

 

[ndu96081631]

Đi vào sâu sát thì mới phát hiện phát sinh vấn đề mới:
- Hiện tại file này chỉ dùng cho 1 năm, bởi nếu như thống kê tất cả (không giới hạn năm) thì khi lọc ra nó lại lọc theo tháng. Ví dụ: cần lọc tháng 5 --> hiển thị những người nghỉ tháng 5/2009 và tháng 5/2008. Em chỉ muốn lọc tháng của năm hiện tại. (ở file dùng công thức em đã tránh trường hợp này rồi)
- File có một số lỗi: Ví dụ: Chọn Vỏ 1, hay Vỏ 2, hay Phòng TCLĐTL nó không hiển thị ở cột phân xưởng.

Em lại phải phiền các anh rồi!!!

Quá dể luôn!
Bạn thay đoạn:

With Sheet3.Range("A1").CurrentRegion
    .Offset(, 4).Resize(, 1).NumberFormat = "m"
     .AutoFilter 5, CDbl(Target)

thành:

With Sheet3.Range("A1").CurrentRegion
     .Offset(, 4).Resize(, 1).NumberFormat = "myyyy"
     .AutoFilter 5, Target & Year(Now)

Cái vụ Vỏ 1, Vỏ 2 thì thế này!
Thay đoạn:

.Offset(, 3) = Range("DONVI").Find(.Offset(, 2)).Offset(, 1)

thành:

.Offset(, 3) = Range("DONVI").Find(.Offset(, 2), LookAt:=xlWhole).Offset(, 1)

Còn lổi gì nữa, chúng ta tiếp tục nhé
Ẹc... Ẹc...

 

[tranchautrungduong]

chào các anh

sẵn cho em hỏi cái, sao cái textbox ngày của em khi cho hiện thông tin lên và sửa nó bị mã hoá ngày chứ k hiện ngày ạ!