Click vào 1 cell sẽ hiện lên cái lịch

[phungnt]

Chào mọi người!
Hiện nay do nhu cầu công việc cần tạo 1 cái lịch thay vì anh dung vadilation -> List nó dài. Bây giờ chuyển sang VBA khi click vào cell nó hiện lên cái lich và chỉ việc click chon ngày và nó fill ngày được chọn vào Cell đó.

Thanks
Phụng NT

 

[be09]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Chào mọi người!
Hiện nay do nhu cầu công việc cần tạo 1 cái lịch thay vì anh dung vadilation -> List nó dài. Bây giờ chuyển sang VBA khi click vào cell nó hiện lên cái lich và chỉ việc click chon ngày và nó fill ngày được chọn vào Cell đó.

Thanks
Phụng NT

Để nhập 1 ngày vào bất kỳ ô nào bạn chọn vào ô muốn nhập và click vào Mở lịch chọn 1 ngày, nó sẽ hiện lịch ra, bạn chọn ngày nó sẽ tự nhập ngày đó vào ô bạn vừa chọn. Tên sheet bạn sửa lại theo nhu cầu công việc. Mạng chậm quá nên tôi chưa UpLoad File lên được, bạn nêu địa chỉ Mail lên tôi gửi qua cho.

 

[phungnt]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Cảm ơn Anh
Email: phungnt1984@gmail.com.

Để nhập 1 ngày vào bất kỳ ô nào bạn chọn vào ô muốn nhập và click vào Mở lịch chọn 1 ngày, nó sẽ hiện lịch ra, bạn chọn ngày nó sẽ tự nhập ngày đó vào ô bạn vừa chọn. Tên sheet bạn sửa lại theo nhu cầu công việc. Mạng chậm quá nên tôi chưa UpLoad File lên được, bạn nêu địa chỉ Mail lên tôi gửi qua cho.

 

[be09]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Cảm ơn Anh
Email: phungnt1984@gmail.com.

Cách nhập 1 ngày vào bất kỳ 1 ô (Cell)

Để nhập 1 ngày vào bất kỳ ô nào bạn chọn vào ô muốn nhập và click vào Shapes Mở lịch chọn 1 ngày, nó sẽ hiện lịch ra, bạn click chọn ngày cần nhập nó sẽ tự nhập ngày đó vào ô bạn vừa chọn. Tên sheet bạn sửa lại theo nhu cầu công việc.
Nếu bạn insert 1 sheet mới (tạo 1 sheet mới) thì Click chọn vào ô muốn nhập 1 ngày, trên menu chọn Tools > Macro > Macro và nhấn nút Run nó sẽ hiện lịch ra, bạn click chọn ngày cần nhập nó sẽ tự nhập ngày đó vào ô bạn vừa chọn. Tên sheet bạn sửa lại theo nhu cầu công việc. Tải File theo Link:
https://www.box.com/s/3dea02d8da568189442a

 

[phungnt]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Thanks Anh
Nhưng sao dấu pass vậy Anh? Cho em xin cái pass nha để nghiên cứu VBA luôn

Cách nhập 1 ngày vào bất kỳ 1 ô (Cell)

Để nhập 1 ngày vào bất kỳ ô nào bạn chọn vào ô muốn nhập và click vào Shapes Mở lịch chọn 1 ngày, nó sẽ hiện lịch ra, bạn click chọn ngày cần nhập nó sẽ tự nhập ngày đó vào ô bạn vừa chọn. Tên sheet bạn sửa lại theo nhu cầu công việc.
Nếu bạn insert 1 sheet mới (tạo 1 sheet mới) thì Click chọn vào ô muốn nhập 1 ngày, trên menu chọn Tools > Macro > Macro và nhấn nút Run nó sẽ hiện lịch ra, bạn click chọn ngày cần nhập nó sẽ tự nhập ngày đó vào ô bạn vừa chọn. Tên sheet bạn sửa lại theo nhu cầu công việc. Tải File theo Link:
https://www.box.com/s/3dea02d8da568189442a

 

[be09]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Anh đã xóa Pasword và gửi mail cho em rồi đó.

 

[phungnt]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Thanks Anh Bé rất nhiều.
Cho em hỏi anh Bé năm nay bao nhiêu tuổi và Anh ở đâu.
Em tên Phụng sn; 1984 đang làm tại masan.

 

[be09]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Thanks Anh Bé rất nhiều.
Cho em hỏi anh Bé năm nay bao nhiêu tuổi và Anh ở đâu.
Em tên Phụng sn; 1984 đang làm tại masan.

Hiện nay anh đang công tác tại Sở Tài nguyên và Môi trường tỉnh Đồng Nai, trước tiên tham gia diễn đàn để giết thời gian trong những lúc rảnh, thứ 2 xem có giúp ích gì cho anh em trên diễn đàn không.
Anh hiện nay 55 tuổi rồi em ạ.

 

[phungnt]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Em đã áp dụng vào cái file của em rồi quá ok nhưng em vẫn chưa hiểu tại vị trí chọn năm và chọn tháng anh dùng cái nào trên toolbar để thiết kế vậy? Hiện giờ em copy của anh qua thôi

Hiện nay anh đang công tác tại Sở Tài nguyên và Môi trường tỉnh Đồng Nai, trước tiên tham gia diễn đàn để giết thời gian trong những lúc rảnh, thứ 2 xem có giúp ích gì cho anh em trên diễn đàn không.
Anh hiện nay 55 tuổi rồi em ạ.

 

[be09]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Em đã áp dụng vào cái file của em rồi quá ok nhưng em vẫn chưa hiểu tại vị trí chọn năm và chọn tháng anh dùng cái nào trên toolbar để thiết kế vậy? Hiện giờ em copy của anh qua thôi

Trong cửa sổ VBE Click phải chuột vào Controls Toolbox, chọn Additional Controls ….Làm xuất hiện cửa sổ Additional Controls, trong khung Available Control đánh dấu chọn vào Calendar Control 11.0 (Excel 2003), đối với Excel 2007 số sau là 12.0, xong nhấn nút OK. Lúc này vào Controls Toolbox nhấn vào Calendar và click chọn trên Form rê và thả chuột trái thì nó hiện Calendar như đã thấy trên Form của anh

 

[longtuyen857]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Dạ, chú Bé ơi ! Gửi qua mail dùm cháu được không ạ.
đc mail là : thanhtuyentnkh@gmail.com
Cảm ơn ạ

 

[phungnt]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Anh Bé Ơi
Sao em click vào controls toolbox nó hiện additional controls em chọn vào nó mà nó chẳn hiện ra của sổ additional controls nên ko làm được như anh.

Thanks Anh Bé

Trong cửa sổ VBE Click phải chuột vào Controls Toolbox, chọn Additional Controls ….Làm xuất hiện cửa sổ Additional Controls, trong khung Available Control đánh dấu chọn vào Calendar Control 11.0 (Excel 2003), đối với Excel 2007 số sau là 12.0, xong nhấn nút OK. Lúc này vào Controls Toolbox nhấn vào Calendar và click chọn trên Form rê và thả chuột trái thì nó hiện Calendar như đã thấy trên Form của anh

 

[be09]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Nhớ nhấn nút OK chứ.
Em đọc chưa kỹ câu này "hiện ra cửa sổ Additional Controls, trong khung Available Control đánh dấu chọn vào Calendar Control 11.0 (Excel 2003), xong nhấn nút OK (đối với Excel 2007 Calendar Control là 12.0)".

 

[phungnt]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Dear Anh Bé
Em hiện trong Excel em làm như cách anh ko được. em dùng máy khác làm như anh sau đó export file sau đó em qua máy em Import file thì lúc đó em mới làm được. Cảm ơn anh rất nhiều.

Nhớ nhấn nút OK chứ.
Em đọc chưa kỹ câu này "hiện ra cửa sổ Additional Controls, trong khung Available Control đánh dấu chọn vào Calendar Control 11.0 (Excel 2003), xong nhấn nút OK (đối với Excel 2007 Calendar Control là 12.0)".

 

[be09]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Vậy là bộ Office của em khi cài để rút ngắn thời gian cài đặt , người cài không chọn hết nên khi vào cửa sổ Additional Controls không thấy Calendar đâu cả.

 

[huuduy.duy]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Anh Bé ơi, gởi cho em xin 1 cái pass VBA để mở xin code với nhe anh. Mail của em là huuduy.duy@gmail.com
Trân trọng cảm ơn anh nhiều

 

[chua123]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

Chú "be09"oi, cho cháu xin luôn pass vba lịch của chú nha. mail cháu là: ngocvien1009@yahoo.com.
Con cám ơn chú nhiều!

 

[be09]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

chú "be09"oi, cho cháu xin luôn pass vba lịch của chú nha. Mail cháu là: ngocvien1009@yahoo.com.
Con cám ơn chú nhiều!

chú đã gửi file qua mail.

 

[chua123]

Ðề: Click vào 1 cell sẽ hiện lên cái lịch

COn cám ơn chú nhiều lắm
.

chú đã gửi file qua mail.

 

[lexuantruong2004]

Bác "be09" oi, bác có thể cho cháu xin pass vba lịch của chú dc k?. mail cháu là: lexuantruong2004@gmail.com
Cháu cám ơn bác nhiều!