Tạo nhập liệu ngày tháng bằng lịch (1 người xem)

[tiennam]

Các bác cho mình hỏi, mình có cột D là cột ngày tháng, giờ không muốn nhập, khi di vào ô Dx chẳng hạn, thay vì nhập số thì có cách nào làm nó hiện ra được bảng lịch này để tích vào không? (Giống word)

 

[nghiaphuc]

Các bác cho mình hỏi, mình có cột D là cột ngày tháng, giờ không muốn nhập, khi di vào ô Dx chẳng hạn, thay vì nhập số thì có cách nào làm nó hiện ra được bảng lịch này để tích vào không? (Giống word)

Cái vụ này thì phải dùng đến VBA chứ công thức thì bó tay.
Ví dụ 1 file như vầy, bạn tham khảo và phát triển theo ý của mình nhé.

 

[tiennam]

Đúng cái mình đang cần, cảm ơn bác nghiaphuc nhé, cái này giờ copy vào bảng của mình thì copy ntn bác?

 

[nghiaphuc]

Đúng cái mình đang cần, cảm ơn bác nghiaphuc nhé, cái này giờ copy vào bảng của mình thì copy ntn bác?

Trước hết, bạn chọn tab Developer và nhấn nút Design Mode để chuyển sang chế độ thiết kế. Sau đó bạn copy cái Calendar qua file của bạn (dán vào sheet muốn áp dụng). Sau đó nhấn chuột phải tại tên sheet, chọn View code và copy toàn bộ code ở đó, nhấn đúp vào tên sheet muốn áp dụng code của bạn ở thanh bên trái trong cửa sổ VBA và dán đoạn code vừa copy vào khung bên phải. Tiếp theo, sửa chỗ [B4:B30] trong code thành địa chỉ tương ứng trên file của bạn. Cuối cùng, ra ngoài cửa sổ Excel, tắt chế độ Design Mode để chạy code.

 

[be_09]

Bạn xem hướng dẫn trong File đính kèm để biết cách tạo Calendar cho cột B của sheet Nhập dữ liệu. click vào tên sheet Nhập dữ liệu và click phải chuột chọn View Code (để xem code).

 

[Cá ngừ F1]

Bạn xem hướng dẫn trong File đính kèm để biết cách tạo Calendar cho cột B của sheet Nhập dữ liệu. click vào tên sheet Nhập dữ liệu và click phải chuột chọn View Code (để xem code).

Cho em hỏi thêm chút, do e đag onl bằng điện thoại nên chưa thử được. Việc nhập dữ liệu ngày theo calendar thế này có hạn chế đc việc nhập sai định dạng ko?

 

[be_09]

Cho em hỏi thêm chút, do e đag onl bằng điện thoại nên chưa thử được. Việc nhập dữ liệu ngày theo calendar thế này có hạn chế đc việc nhập sai định dạng ko?

Không bao giờ sai, vì việc định dạng đã đặt sẳn trong Code ờ dòng sau:

ActiveCell.NumberFormat = "dd/mm/yyyy"

Bạn muốn định dạng khác đi thì sửa lại code trên.

 

[Thuyanhanoi]

Bạn xem hướng dẫn trong File đính kèm để biết cách tạo Calendar cho cột B của sheet Nhập dữ liệu. click vào tên sheet Nhập dữ liệu và click phải chuột chọn View Code (để xem code).

- Cho em hỏi với: Sao em tìm trên Excel 2010 không Thấy có mục calender control?.
Không hiểu nó nằm chỗ nào?!.

 

[nghiaphuc]

- Cho em hỏi với: Sao em tìm trên Excel 2010 không Thấy có mục calender control?.
Không hiểu nó nằm chỗ nào?!.

Bạn chọn tab Developer, nhấn nút Insert, nhấn tiếp nút More controls ở nhóm ActiveX Controls. Nếu có thì bạn sẽ nhìn thấy nó ngay, nếu không có thì có thể do bạn cài đặt Office không đầy đủ.

 

[Thuyanhanoi]

Bạn chọn tab Developer, nhấn nút Insert, nhấn tiếp nút More controls ở nhóm ActiveX Controls. Nếu có thì bạn sẽ nhìn thấy nó ngay, nếu không có thì có thể do bạn cài đặt Office không đầy đủ.

- Đã làm theo các bước "Bác hướng dẫn cho em" mà không Thấy!.
- Như vậy phải cài lại để bổ sung thêm hả bác!.

 

[Cá ngừ F1]

- Cho em hỏi với: Sao em tìm trên Excel 2010 không Thấy có mục calender control?.
Không hiểu nó nằm chỗ nào?!.

Bạn tham khảo Topic này xem sao: http://www.giaiphapexcel.com/forum/...Excel-2010-(32bit)-không-có-controls-Calendar

 

[Cá ngừ F1]

Bạn chọn tab Developer, nhấn nút Insert, nhấn tiếp nút More controls ở nhóm ActiveX Controls. Nếu có thì bạn sẽ nhìn thấy nó ngay, nếu không có thì có thể do bạn cài đặt Office không đầy đủ.

Em đang dùng Win8.1 64bit, bộ Office 2013 32bit, tìm hoài trong More Control mà ko thấy cái Calendar đâu? ko biết tìm bộ cài ở đâu được?

 

[tiennam]

Trước hết, bạn chọn tab Developer và nhấn nút Design Mode để chuyển sang chế độ thiết kế. Sau đó bạn copy cái Calendar qua file của bạn (dán vào sheet muốn áp dụng). Sau đó nhấn chuột phải tại tên sheet, chọn View code và copy toàn bộ code ở đó, nhấn đúp vào tên sheet muốn áp dụng code của bạn ở thanh bên trái trong cửa sổ VBA và dán đoạn code vừa copy vào khung bên phải. Tiếp theo, sửa chỗ [B4:B30] trong code thành địa chỉ tương ứng trên file của bạn. Cuối cùng, ra ngoài cửa sổ Excel, tắt chế độ Design Mode để chạy code.

Bác cho e hỏi thêm là trong bảng của em, ngoài cột B ra thì các cột E, G chẳng hạn cũng muốn như thế, thì e chèn vào kiểu gì?

 

[ndu96081631]

Em đang dùng Win8.1 64bit, bộ Office 2013 32bit, tìm hoài trong More Control mà ko thấy cái Calendar đâu? ko biết tìm bộ cài ở đâu được?

Bài 11 chú vừa chỉ người ta xong, sao giờ lại hỏi?

 

[Cá ngừ F1]

Bài 11 chú vừa chỉ người ta xong, sao giờ lại hỏi?

Vì e áp dụng như topic đó mà ko được.

 

[Quang_Hải]

Vì e áp dụng như topic đó mà ko được.

Win 64 thì phải làm khác tí tẹo mới được nhé. Mình đã từng bị vì cái vụ 32 và 64 đấy.
Win 64 thì phải thế này cơ C:\Windows\SysWoW64

 

[Cá ngừ F1]

Win 64 thì phải làm khác tí tẹo mới được nhé. Mình đã từng bị vì cái vụ 32 và 64 đấy.
Win 64 thì phải thế này cơ C:\Windows\SysWoW64

Em vẫn chưa làm được anh Hải ạ,
Em đã giải nén copy 2 file này vào C:\Windows\SysWoW64\
Rồi Run: Regsvr32 MSCAL.OCX và Regsvr32 mscomct2.ocx
Đều bào lỗi.

 

[Quang_Hải]

Em vẫn chưa làm được anh Hải ạ,
Em đã giải nén copy 2 file này vào C:\Windows\SysWoW64\
Rồi Run: Regsvr32 MSCAL.OCX và Regsvr32 mscomct2.ocx
Đều bào lỗi.

Lúc trước mình có làm và ghi lại thế này. Mình xài Win7 64 bit

- Copy 2 file MSCAL.HLP va2 MSCAL.OCX vào thư mục C:\Windows\SysWoW64
- tại khung search nhập vào CMD > Enter
-Tại dòng CMD line nhập: cd\windows\syswow64 > Enter
- nhập tiếp: regsvr32 mscal.ocx > Enter > xong

 

[Cá ngừ F1]

Lúc trước mình có làm và ghi lại thế này. Mình xài Win7 64 bit

- Copy 2 file MSCAL.HLP va2 MSCAL.OCX vào thư mục C:\Windows\SysWoW64
- tại khung search nhập vào CMD > Enter
-Tại dòng CMD line nhập: cd\windows\syswow64 > Enter
- nhập tiếp: regsvr32 mscal.ocx > Enter > xong

MSCAL.HLP lấy ở đâu anh nhỉ?
Em có vào Program File của office tìm kiếm thì không thấy file này.
Lỗi khi làm theo bài #18

 

[Quang_Hải]

MSCAL.HLP lấy ở đâu anh nhỉ?
Em có vào Program File của office tìm kiếm thì không thấy file này.

Cái này hình như lúc trước tải từ link anh NDU cho đấy.