Trợ giúp về lọc dữ liệu ngày sinh

[ndu96081631]

Không biết trong excel có cách nào tạo lịch như hình bên dưới em đính kèm không? ý em là khi click vào 1 ô định sẵn sẽ có một cửa sổ hiện ra là tờ lịch và mình chỉ chọn ngày cho phù hợp.
Anh/chị nào biết mách em với.
P/S: GPE dạo này làm sao mà tạo đề tài mới không được!!!

Đương nhiên là được ---> Gữi bạn 1 ví dụ đơn giãn nhất!

 

[dqt_nt]

Đương nhiên là được ---> Gữi bạn 1 ví dụ đơn giãn nhất!

Em muốn nó xuất hiện ở tất cả các dòng của 1 cột nào đó, dạng list trong validation ấy, được không anh?

Bái phục anh ndu96081631, cái gì cũng làm được!!!

 

[ndu96081631]

Em muốn nó xuất hiện ở tất cả các dòng của 1 cột nào đó, dạng list trong validation ấy, được không anh?

Bái phục anh ndu96081631, cái gì cũng làm được!!!

Vì bạn không biết tự sửa code nên tốt nhất bạn nên đưa dử liệu lên đây, nói cho tôi biết bạn muốn Calendar xuất hiện khi click vào đâu ---> Làm luôn 1 lần cho gọn!

 

[dqt_nt]

Vì bạn không biết tự sửa code nên tốt nhất bạn nên đưa dử liệu lên đây, nói cho tôi biết bạn muốn Calendar xuất hiện khi click vào đâu ---> Làm luôn 1 lần cho gọn!

Em gửi qua mail cho anh nha. Thank anh!

 

[dqt_nt]

Thank anh đã giúp. Em có 1 câu hỏi: Vậy về nguyên tắc, nếu khi dữ liệu quá 2500 người thì mình thay đổi cái này phải không ạ?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Union([D42500], [J4:J2500], [AB4:AB2500], [AD4:AD2500], [AU4:AV2500]), Target) Is Nothing Then
Calendar1.Visible = True
With Target
Calendar1.Top = .Top
Calendar1.Left = .Offset(, 1).Left
End With
Else:
Calendar1.Visible = False
End If
End Sub
Private Sub Calendar1_Click()
With ActiveCell
.Value = Calendar1
.NumberFormat = "dd/mm/yyyy"
End With
'Calendar1.Visible = False
End Sub

 

[ndu96081631]

Thank anh đã giúp. Em có 1 câu hỏi: Vậy về nguyên tắc, nếu khi dữ liệu quá 2500 người thì mình thay đổi cái này phải không ạ?

Chính xác (mấy cái tô đỏ ấy)
Vậy là bạn có thể "nhập môn VBA" được rồi đấy
Từ việc chú ý Quan sát ---> Suy luận ---> Phán đoán ---> Thí nghiệm... bạn có thể từng bước hiểu dần code (bạn có thể thí nghiệm bằng cách thay số 2500 thành 20 xem lúc ấy ta chọn dòng 21 cái Calendar có chạy ra không)
Chúc bạn thành công!