Nhập dữ liệu ngày bằng Calendar và những vấn để liên quan (1 người xem)

[huy vu]

Hôm qua có để tài này hay (http://www.giaiphapexcel.com/forum/showthread.php?98188-Tạo-nhập-liệu-ngày-tháng-bằng-lịch/page3), chưa thấy câu trả lời nên em hỏi thêm một số nội dung sau, mong mọi người giúp đỡ.
Hỏi về Calendar:
- Đối với những ô đã có dữ liệu ngày thì khi click chuột vào thì Calendar chỉ luôn ngày đó (Mục đích là xem ngày đó là thứ mấy luôn)
- Đối với những ô chưa có dữ liệu ngày, khi click để nhập ngày thì nó mặc định là Today.
Hỏi về sự kiện Selection_Change:
- Code ở sự kiện Selection_Change cần thay đổi gì khi mà em không copy/paste được.
Hỏi về hàm Sort1DArray: (em tham khảo của thầy NDU)
- Không hiểu sao mà dữ liệu dạng số mà đưa và validation nó sắp xếp thành: 1, 10 ,15, 2, 3....

Em gửi file đính kèm, Em xin chân thành cảm ơn!

 

[huy vu]

Anh NghiaPhuc đã trả lời cho e câu 1, rất chính xác ạ, em cảm ơn:

Bạn thêm câu lệnh này vào trong câu lệnh With Calendar1 ở Sub Worksheet_SelectionChange là được:

.Value = IIf(IsDate(Target), Target, Date)

 

[Cá ngừ F1]

Hôm qua có để tài này hay (http://www.giaiphapexcel.com/forum/showthread.php?98188-Tạo-nhập-liệu-ngày-tháng-bằng-lịch/page3), chưa thấy câu trả lời nên em hỏi thêm một số nội dung sau, mong mọi người giúp đỡ.
Hỏi về Calendar:
- Đối với những ô đã có dữ liệu ngày thì khi click chuột vào thì Calendar chỉ luôn ngày đó (Mục đích là xem ngày đó là thứ mấy luôn)
- Đối với những ô chưa có dữ liệu ngày, khi click để nhập ngày thì nó mặc định là Today.
Hỏi về sự kiện Selection_Change:
- Code ở sự kiện Selection_Change cần thay đổi gì khi mà em không copy/paste được.
Hỏi về hàm Sort1DArray: (em tham khảo của thầy NDU)
- Không hiểu sao mà dữ liệu dạng số mà đưa và validation nó sắp xếp thành: 1, 10 ,15, 2, 3....

Em gửi file đính kèm, Em xin chân thành cảm ơn!

Trả lời ý 2: Tôi dùng bản office2013 không thấy vấn đề gì, copy/paste dữ liệu bình thường. Không biết phiên bản off khác có bị tình trạng giống bạn không.