Cách tạo Date Picker trong Excel (Calendar form)

Hướng dẫn cách tự tạo date picker trong excel hay còn gọi Calendar form
----------
Link tải file thực hành: drive.google.c...
-----------------
Cảm ơn các bạn đã theo dõi. Nhớ đăng ký kênh, chia sẻ để ủng hộ và cập nhật video mới nhất từ Gà Excel nhé
Chúc các bạn học tốt Excel!!!
#Gaexcel "Gà_excel #ExcelChicken #CungHocExcel #ExcelCoBan #ExcelNangCao

[@hennguyenvan444]

rất hay

[@thanhnghiem254]

Hi ga, mình làm đến phần load picture icon, Button netx thì được nhưng Icon Button previous thì báo lỗi, không biết lỗi ở đâu.

[@trantili7094]

ngưỡng mộ !

[@quynhhuong5890]

Em tạo phần userform bị lỗi phông là lỗi gì vậy ạ!

[@haiphu4769]

Gà ơi, hướng dẫn giúp chuyển số thập phân từ textbox sang sheet của Excel

Bạn tham khảo thêm các video khác trên kênh để áp dụng nha. Chúc bạn làm thành công ạ

[@october28scorpio]

Có sử dụng được trên gg sheet không ạ

[@phamngocbao1769]

Hi GÀ, Mình làm theo bạn mà sau khi chọn thì không hiển thị ngày tháng ra ô đã chọn được, cảm ơn bạn video hữu ích !

[@trinhnguyen-ox9jv]

minh cung bị y nhu bạn! tới giờ chưa biết cách khắc phục

[@phamngocbao1769]

@@trinhnguyen-ox9jv mình đã sửa được rồi, b coppy đoạn này paste lại chỗ sub button_select xem sao nhé : Sub button_select(btn As MSForms.CommandButton) If btn.Caption "" Then Me.txt_date_id.Value = Format(DateSerial(Me.cbb_year.Value, Me.cbb_month.Value, btn.Caption), "mm-dd-yyyy") End If '''Unload Me''' End Sub

[@trinhnguyen-ox9jv]

@@phamngocbao1769 sub cua mình cung yk chan bạn luôn! mà có chỗ unload me bỏ trong 2 dấu "" thi ko dc

[@phamngocbao1769]

@@trinhnguyen-ox9jv Thế b copy đoạn function sau vào cuối là được nhé, nhớ xoá cái cũ của bạn đi : Function select_data(target As Object) As String Dim str As String ChonNgay.Show If TypeName(target) = "CommanButton" Or TypeName(target) = "Label" Then target.Caption = Me.txt_date_id.Value ElseIf TypeName(target) = "Range" Or TypeName(target) = "TextBox" Then target.Value = Me.txt_date_id.Value Else select_data = Me.txt_date_id.Value End If End Function

[@trinhnguyen-ox9jv]

@@phamngocbao1769 cam ơn bạn! mih làm dc ùi

[@anhtuannguyen5456]

Máy tính bạn để ngày/tháng/năm hay tháng/ngày năm ạ

Mình để mm/dd/yyyy ạ

[@anhtuannguyen5456]

Bạn ơi máy tính để dd/mm/yyyy, viết code cũng như vậy sao không ra định dạng date nhỉ, chỉ mình với

[@trinhnguyen-ox9jv]

bạn ơi cho minh hỏi! mình làm ok hết r! cuối cùng là chọn ngày mà nó ko hiển thị ra ngoài ô trống là bị gì ạ! minh kiem tra ki rất nhiều lần! ko sai chỗ nào hết. cái txt_date_id thì nó hiện ngày tháng vô, mà sao chọn ngoài ô trống nó ko hiện

[@QuýNguyễn-t8z]

Mình làm được hết từ a tới z mà quên đổi file lưu cuối cùng công công cốc. Đau lòng quá đi

[@TheThuyvkslc]

Muốn ngày hiện tại có màu khác để dễ nhận thì làm thế nào ạ?

[@ltdquangminh3433]

Bạn giản rất hay, cảm ơn bạn

[@MuhammadShahAlam99]

Your link does not work?

[@itvanphong9322]

dạ em làm theo anh gà đc hết rùi ạ!!!a Gà cò thể hướng dẫn thêm tạo menu ribbon cho cái addin này k anh gà ơi!

[@trinhang2211]

Xuất sắc nè!

Hihi, Gà cảm ơn nha

[@HuyềnTâmLêthị]

Cho mình button với

[@ngoctrongnguyen4986]

Nếu mình tích chọn vào 1 ô và nó hiện ngày tháng của hiện tại có được không, khi học sinh đóng học phí, mình mở ds lên và chỉ tích hoặc chọn vào là hiển thị lên ngày tháng của ngày hôm nay là được

[@cannguyen7877]

bạn dùng tổ hợp phím Ctrl + ; để hiện ngày, Ctrl + Shilt + ; để hiện giờ nhé

[@ngoctrongnguyen4986]

@@cannguyen7877 cảm ơn bạn rất nhiều, nếu trên đt thì làm sao bạn

[@cannguyen7877]

@@ngoctrongnguyen4986 excel trên điện thoại chủ yếu hỗ trợ xem, còn mấy chức năng khác thiếu rất nhiều nên không có chức năng nhập ngày tháng như bạn đang cần nhé

[@ngoctrongnguyen4986]

@@cannguyen7877 cảm ơn bạn rất nhiều

[@chebiencatravietnam2075]

Xin chào Gà Excel ... mình cám ơn rất nhiều các chia sẽ của Gà Excel...." Date Picker" mình tạo xong chạy rất OK nhưng bị thiếu ngày 31 giờ khg biết sữa làm sao Gà Giúp mình sửa nhé...Tks Gà

[@kieuxuananh336]

Anh ơi, cho em hoi tai sao lai co tên Me cua UserForm vậy ạ.

Cú pháp quy định thế ạ

[@huynhngocbich532]

link button đưa vào image kg đc bạn ơi, kg biết làm sao luôn

[@phuongvu8091]

Hay

Hihi, Gà cảm ơn nha

[@HieuNguyen-hm2tt]

gà ơi cho mình hỏi là sao image của mình k thấy event Click z ạ?

[@TuấnTúPhạm-v2t]

không hiện ngày a ơi. Xin lỗi khắc phục

[@phamanhtien3356]

ANH GÀ CHO MÌNH HỎI, CHỖ HYBERLINK, MÌNH MUỐN LINK ĐẾN 1 Ô CỐ ĐỊNH, KHI CHÈN BAO NHIÊU DÒNG THÌ NÓ VẪN LINK CHÍNH XÁC ĐẾN Ô ĐÃ CHỌN BAN ĐẦU THÌ CÓ CÁCH NÀO KHÔNG?

Chào bạn, trên kênh có 1 số bài về hyperlink rồi đó ạ và bài 50 thủ thuật excel để tham khảo về hyperlink và áp dụng nha. Chúc bạn thành công ạ

[@phamanhtien3356]

Anh gà chưa hiểu ý mình rồi

[@ucnguyenvan855]

Mình muốn viết code các ngày Chủ nhật đổi màu và Fonts cũng đổi màu theo minh viết code như thế này : If CInt(Weekday(DateSerial(Me.ComboBox2.Value, Me.ComboBox1.Value, Me.Controls("CommandButton" & i).Caption))) = 1 Then Me.Controls("CommandButton" & i).ForeColor = RGB(255, 0, 0) nhưng VBA không hiểu, bạn có thể giúp mình được không

[@QuyenNguyen-sp9ru]

Gà ơi khi mình làm đến gán lệnh cho Img(Next) thì chương trình hiện : Private Sub img_next_BeforeDragOver(ByVal Cancel As MSForms.ReturnBoolean, ByVal Data As MSForms.DataObject, ByVal X As Single, ByVal Y As Single, ByVal DragState As MSForms.fmDragState, ByVal Effect As MSForms.ReturnEffect, ByVal Shift As Integer) On Error Resume Next như vậy khi viết lệnh thêm không dc , xin Gà chỉ cách khắc phục nhé, cám ơn Gà nhìu nha....

[@nguyenphuc1386]

Tks gà. Gà cho mình hỏi có cách gì để nó hiện Userform ra ở vị trí màn hình bảng tính theo ý mình ko.

[@linhaothithuy5737]

Bạn cài thêm phần developer cho ribbon, tạo command button rồi gán macro của userform cho button nhé

[@nhale2191]

Gà ơi giúp mình với trên 1 file excel mình lập 2 bảng mà khoảng cách các cột hàng nó khác nhau lập bảng trên dc xuống bảng dưới mà chỉnh là cái trên nó chạy theo làm cách nào giúp với thankiu gà

[@kishikuun]

hay quá anh ơi, đún cái em cần, mà anh ơi, ở khúc 1:04:59 anh nói là làm cho kỹ để sau này cần dùng Date Picker thì mình sẽ dùng nó luôn thì thì làm sao được v anh, anh có thể làm video hướng dẫn ko ạ.

Đoạn cuối Gà có nói cách dùng đó ạ

[@kishikuun]

@ dạ cảm ơn anh gà nhưng em muốn hỏi là mình chuyển cả code lẫn user form từ file excel đó sang file excel khác thì làm như thế nào v ạ, cho đỡ tốn thg khi mình phải làm lại bên file khác v anh. Mong anh làm video hướng dẫn về vấn đề này

[@HungNguyen-hs9vg]

Hay quá!thank gà exel

Hihi, Gà cảm ơn ạ

Gà Excel có thể hướng dẫn thêm nút "Today" để khi mình đang kéo xem lịch ở những tháng năm nào đó (không phải là tháng năm hiện tại), khi đó muốn lấy ngày tháng hiện tại thì ta chỉ cần click vào "Today" nó sẽ chọn luôn ngày hiện tại được không?

Hihi, đoạn này Gà lại ko nghĩ ra chứ lị. Bạn có thể thêm 1 lênh trọng vòng lặp của i từ 1 đến 42 rồi so sánh với today, nếu trùng thì tô màu j đó nha. Chúc bạn thành công ạ

@ ý mình là, nó sẽ trả luôn ngày hiện tại "Today" vào ô trên bảng tính, chứ ko phải tô màu trên userform. Ví dụ: mình đang kéo lịch đến tận ngày 27 tháng 12 năm 2100 để xem, bây giờ tự dưng muốn chọn ngày hiện tại "Today" (Ngày 10 tháng 9 năm 2020) để nó đổ vào ô trên bảng tính, thì lại mất thêm thao tác chọn lại năm, tháng (hoặc kéo mũi tên sang trái để trở về). Thay vì như thế mình có nút "Today", khi nhấn vào đó thì nó sẽ trả luôn giá trị ngày hiện tại (Ngày 10 tháng 9 năm 2020) vào ô trên bảng tình, cho bớt thao tác :)

[@hoangmaipham9526]

Cảm ơn Gà Excel, video rất hữu ích👍

[@sonphanuc2321]

Anh ơi cho e hỏi biến Additem mình khai báo sao ạ? Đến đoạn code này nó báo lỗi a ơi.

[@ngocdung1286]

Cho e xin file với

Bạn theo dõi và thực hành đẻ học VBA nha

[@hieumaivan9589]

Mình muốn sau khi hiện lịch chọn ngày thì có thể kích chọn nhiều ngày trên nhiêu Ô khác nhau, sau đó bấm mới nhấn nút dấu X ở góc bên phải mới thoát thì phải làm thế nào ạ. Xin cảm ơn Gà!

[@paulnguyenv]

Hi, bác gà. E có hỏi ở bài tự viết hàm my-vlookup bằng vba như sau: thay vì nhiều kết quả trả về cách nhau bằng dấu phẩy, ta có thể viết sao cho mỗi giá trị trả về sẽ nhảy vào các cell kế tiếp nhau dc ko ạ. Mong bác hồi đáp. Cám ơn bác ạ:)

Được chứ ạ. Bạn học thêm về VBA để làm nha. cũng dễ thôi ạ. Chúc bạn thành công nha

[@nguyenhoanglong1604]

Sau khi mình làm xong chạy Ok, chép toàn bộ qua file khác, khi chạy phần ghi vào textbox thì báo lỗi ở câu lệnh Call ChonNgay.select_date(“textbox”)

Bạn kéo cả user của file cũ vào file mới (mở 2 file rồi vào VBA. Giữ Ctrl rồi kéo user từ file này sang file kia

[@nguyenhoanglong1604]

Gà Excel cảm ơn bạn nhiều!

[@thanhthuytran5152]

ANH VIẾT HAY QÁ,VIẾT CHƯƠNG TRÌNH NÀY MÌNH CHẮC PẢI HỌC QA CĂN BẢN PHẢI KHÔNG A?, GÀ MỜ NHÌN VÔ HỒI RỐI LUÔN HIHI

[@ThanhLe-vd3yn]

Làm như nào để mình có thể chọn danh sách nó hiện cả mã và tên hàng đơn vị tính vậy gà. Nó giống như kiểu kick vào ô rồi hiện ra 1 cái bảng gõ tên muốn tìm xong nó hiện ra ấy

[@vanhoatran8337]

BAC GA OI CHO XIN SDT ZALO VOI

[@dubv36]

Xin chào Thầy, em đã làm được như hướng dẫn nhưng muốn áp dụng bảng Date picker này cho các file excel khác thì chưa biết làm thế nào. Xin thầy chỉ giúp. Cảm ơn Thầy.

[@NguyenPhong86]

Để áp dụng ứng dụng date picker này cho những bảng tính còn lại, bạn chỉ việc Import hoặc copy ứng dụng này trong sang bảng tính khác trong cửa sổ VBA thôi.

[@tienmanhnguyen2221]

Cảm ơn anh Gà nhiều. Còn trường hợp mình muốn nó hiện luôn để mình thao tác nhập liên tục vào nhiều cell trong sheet thì làm như nào anh. Vì có trường hợp 1 tuần nhập phiếu 1 lần ra cả 100 hàng thì như này hơi bất tiện anh.

[@meo658]

Rất hay, mong anh ra nhiều bài hướng dẫn chi tiết như vậy.

Gà cảm ơn nha

[@gocbep3tymuoi119]

Bạn ơi ! có thể hướng dẫn dùm , đến phần chọn button next thì lại báo là " invalid picture" , xin bạn chỉ giúp , cám ơn nhiều

[@HungTran-tw6uv]

Bạn đổi đuôi thành jpg là dc

[@phongang3719]

A làm vba cho người mới bắt đầu đi

Có video đó rồi ạ. Bạn theo dõi bài này nha. kzbin.info/www/bejne/eoWTgoKlgduAZ5I

[@ThanhVuHai]

Hướng dẫn đánh dấu ngày hiện tại và các ngày đặc biệt trên lịch. Cám ơn !

Cái này thêm 1 vài lênh là sẽ làm được thôi ạ. Bạn thử xem nha. Chúc bạn thành công ạ

[@trangluu120]

Hay quá,đúng cái em đang cần ạ😍😍😍

Hihi, Gà chúc bạn thành công nha

[@phuochiep7265]

Minh vô trễ rồi

Hihi, Gà cảm ơn bạn nhiều nha

[@TheHeocon77]

Bài giảng hay tuy nhiên bạn nên giải thích cách làm sơ quá trước chứ hơi khó hiểu hjhj

Hihi, Gà cảm ơn và sẽ lưu ý ạ

[@SuperNguyentuan]

hơi nhức đầu , mà hay quá đi , mình cũng đang tạo lịch để xếp ngày trực ,nhưng dùng của wincalendar thôi ,Thanks !

[@covid19vietnames97]

Gà ơi. Hãy làm Dashbroad Excel nhé.

[@nguyenthanhnghia3879]

Gà excel có những tuyệt chiêu rất hay và hửu ích, tôi luôn theo dõi các bài của bạn. Rất hoan nghênh bạn làm những bài không dùng Visual Basic mà vẫn chạy được, những bài này chắc chắn tôi và rất nhiều người khác giống như "Thầy bói xem voi" thôi, không ứng dụng cho trường hợp khác cho phù hợp của từng người mà không biết VB.

Hihi, Gà cảm ơn bạn đã ủng hộ ạ. Gà sẽ làm song song bài không VBA và có VBA để ai cũng có thể học ạ. Cảm ơn bạn rất nhiều.

[@HoDienAn]

Mình không có hàm Caption luôn :(

[@miumiu3275]

😚😚

Tks bạn nhé

[@HoangTran-lp8tc]

Anh Gà Excel ơi, anh tạo Folder gì để có thể mở link ảnh vào VB đc vậy ạ? Em làm thử và bị vướng chỗ này. Mong anh giúp đỡ. Cảm ơn anh

Hic hic, Gà ko hiểu ý bạn ạ. Để chèn ảnh vào image thì trong phần properties bạn chọn mục picture rồi trỏ đến file ảnh là được ạ

[@HoangTran-lp8tc]

Em thực hiện như anh nhưng đến phần chèn image button vào thì không đc ạ

[@manhinh879]

Mạc dù nhiều module có sẵn của date picker nhưng mà vẫn thích tự làm. Thanks anh Gà!

[@cuongnguyenhung7245]

Rằng: Tôi yêu ông. Có gì thì tính sau. Tôi yêu ông nhất trên đời. Và chỉ mình ông thôi. Ế ồ ồ ế ô. ....

Hihi, Gà cảm ơn nha. cũng ko hiểu bạn muốn nói j lắm ạ

[@cuongnguyenhung7245]

Tôi học hỏi được rất nhiều điều từ bạn. Cảm ơn bạn nhiều lắm.

[@Kimcangvlog668]

Anh Gà ơi, anh làm bảng tính lương cho công nhân đi anh, chấm công bằng thủ công. Chúc anh nhiều sức khoẻ.

[@ntt5700]

Rất hay mong a ra tiếp tục nhiều clip nữa có những hàm mới a nhé. Tks a