Tại sao macro calendar không chạy trong Excel 2010

[quykh]

em có file này các AC viết cho em ở excel 2003, nhưng khi em chuyển qua xài excel 2010 thì macro calendar không chạy nữa khi nhấp vào ô C2 & C3. Mong các AC giúp đỡ. Em gửi file đính kèm.

 

[be_09]

em có file này các AC viết cho em ở excel 2003, nhưng khi em chuyển qua xài excel 2010 thì macro calendar không chạy nữa khi nhấp vào ô C2 & C3. Mong các AC giúp đỡ. Em gửi file đính kèm.

Em thử xem có chạy được trên 2010 không (vì anh không dùng 2010 nên chưa biết).
File đính kèm.
https://www.box.com/s/8sehwvu4ovzv4zsam4ut

 

[quykh]

Anh chưa hiểu ý của em rồi. File đó trên excel 2003 vẫn chạy tốt khi nhấp vào ô C2 & C3 của sheet báo cáo thì nó vẫn mở calendar ra để chọn ngày. Nhưng khi em không xài excel 2003 nữa mà xài excel 2010 thì nhấp vào ô C2 & C3 thì nó báo lỗi Macro. Chứ không phải làm lại như Anh đâu.

 

[ndu96081631]

Anh chưa hiểu ý của em rồi. File đó trên excel 2003 vẫn chạy tốt khi nhấp vào ô C2 & C3 của sheet báo cáo thì nó vẫn mở calendar ra để chọn ngày. Nhưng khi em không xài excel 2003 nữa mà xài excel 2010 thì nhấp vào ô C2 & C3 thì nó báo lỗi Macro. Chứ không phải làm lại như Anh đâu.

Dám cá với bạn là file này dù là chạy trên Excel 2003 cũng không chạy được luôn. Lý do vì: Bạn có vẽ cái Calendar nào lên bảng tính đâu mà chạy

 

[quykh]

Xin lỗi Thầy, Em đính kèm file lộn. File đó nè Thầy. (Mà em nhớ không lầm thì file này Thầy làm cho em đó)

 

[ndu96081631]

Xin lỗi Thầy, Em đính kèm file lộn. File đó nè Thầy. (Mà em nhớ không lầm thì file này Thầy làm cho em đó)

File này thì chạy bình thường (tôi đang dùng Excel 2010 đây)
Có chăng là bạn chưa Enable Macro nên không chạy chăng?

 

[nghiaphuc]

File này thì chạy bình thường (tôi đang dùng Excel 2010 đây)
Có chăng là bạn chưa Enable Macro nên không chạy chăng?

Em cũng đang dùng Excel 2010, nếu để ở chế độ Design mode thì vẫn thấy trên sheet có 1 calendar tên là Calendar1 nhưng mà khi chạy thì nó báo lỗi như vầy:

Thêm nữa, trong code, nếu để Range("C2:C3") thì nó chịu, còn nếu để là [C2:C3] thì VBA báo lỗi tương tự như hộp thoại trên. Nguyên nhân là gì vậy anh? Và cách khắc phục ra sao?

 

[ndu96081631]

Em cũng đang dùng Excel 2010, nếu để ở chế độ Design mode thì vẫn thấy trên sheet có 1 calendar tên là Calendar1 nhưng mà khi chạy thì nó báo lỗi như vầy:

​

Thêm nữa, trong code, nếu để Range("C2:C3") thì nó chịu, còn nếu để là [C2:C3] thì VBA báo lỗi tương tự như hộp thoại trên. Nguyên nhân là gì vậy anh? Và cách khắc phục ra sao?

Tôi thì không bị lỗi gì cả. Tuy nhiên, nếu đã vậy thì ta tập thói quen viết rõ ràng đi
- Thay vì viết With Calendar1 ta viết thành With Me.Calendar1 hoặc With Target.Parent.Canlendar1
- Thay vì viết [C2:C3] ta viết thành Range("C2:C3")
vân vân
Ngoài ra, nếu gặp lỗi kỳ lạ, trước tiên hãy vào Tools\References xem có em nào bị "MISSING.." không

 

[quykh]

Em bị giống như Anh nghiaphuc nói. Để em làm theo cách Thầy Ndu xem sao!!!!

 

[ndu96081631]

Em bị giống như Anh nghiaphuc nói. Để em làm theo cách Thầy Ndu xem sao!!!!

Mình nói thêm: Lỗi này cũng hay xuất hiện khi chạy Office 2010 Portable (trước có bị vài lần)... Vậy bạn quykh và nghiaphuc xem lại mình có thuộc trường hợp này không nha?

 

[ocbuu2008]

Luôn tiện đây cho em hỏi cách làm cái lịch như thế này như thế nào ạ?
Ví dụ em có một CSDL trong đó có trường NGÀY BẮT ĐẦU, em muốn trường này có một khung lịch như vậy để khi nhập vào trường này ta chỉ click chọn thay vì phải nhập vào ngày tháng.

 

[Hong.Van]

Xin lỗi Thầy, Em đính kèm file lộn. File đó nè Thầy. (Mà em nhớ không lầm thì file này Thầy làm cho em đó)

Mình s/d Win XP & 2 Office 2003 & 2010, thì mở file bình thường
------------------------

Luôn tiện đây cho em hỏi cách làm cái lịch như thế này như thế nào ạ?
Ví dụ em có một CSDL trong đó có trường NGÀY BẮT ĐẦU, em muốn trường này có một khung lịch như vậy để khi nhập vào trường này ta chỉ click chọn thay vì phải nhập vào ngày tháng.

Bạn lấy bài #2 của anh be09 dùng luôn, hoặc bạn đưa File lên nhá

 

[quykh]

Không biết Anh nghiaphuc sao rồi, chứ em làm theo bài #8 của Thầy Ndu vẫn không được. Mong Thầy chỉ giáo.(excel 2010 của em không phải là portable)Của em nó hiện ra bảng này:

 

[ndu96081631]

Không biết Anh nghiaphuc sao rồi, chứ em làm theo bài #8 của Thầy Ndu vẫn không được. Mong Thầy chỉ giáo.(excel 2010 của em không phải là portable)Của em nó hiện ra bảng này:

Rất có thể máy bạn chưa cài Calendar chăng? Bạn có thể thí nghiệm bằng cách mở file mới, vào tab Developer, bấm nút Insert, chọn More Controls xem thử trong cửa sổ More Controls này có Calendar không? Nếu không tìm thấy có nghĩa là máy bạn chưa cái Calendar, bằng ngược lại thì.. tôi bó tay

 

[nghiaphuc]

Không biết Anh nghiaphuc sao rồi, chứ em làm theo bài #8 của Thầy Ndu vẫn không được. Mong Thầy chỉ giáo.(excel 2010 của em không phải là portable)Của em nó hiện ra bảng này:

Bạn thử làm theo bài này của anh ndu xem có được không. Mình đã làm theo bài này và đã chạy được rồi.

 

[quykh]

Trong Developer - Insert-More Controls thì em không thấy có calendar, nhưng trong tool->Preferences thì có calendar 8.0 như hình đính kèm.Mong Thầy coi dùm.

 

[quykh]

Em đã làm theo bài #15 của anh nghiaphuc nhưng nó báo như thế này(mặc dù em làm theo chỉ dẫn và em là admin và đã dicsable uac) Em xài win7 64 bit

 

[nghiaphuc]

Em đã làm theo bài #15 của anh nghiaphuc nhưng nó báo như thế này(mặc dù em làm theo chỉ dẫn và em là admin và đã dicsable uac) Em xài win7 64 bit

Bạn thử đọc bài này xem có giải quyết được vấn đề không. Mình không có điều kiện thử vì mình xài Win7 32 bit.

FOR 64-BIT WINDOWS 7, HERE'S HOW:
(1) First, you must perform this on EVERY computer that has 2010
(2) Obtain MSCAL.OCX and the Help file. It's easy to find on the Web.
(3) Copy both files to the following directory: C:\Windows\SysWoW64
(4) Click the Windows 7 Start Button and in the Search area, type "command"
(5) The search will bring up a number of items, including "Command Prompt" at the top
(6) Right click the "Command Prompt" banner, and select "Run as Administrator"
(7) At the command prompt, enter: %systemroot%\SysWoW64\regsvr32.exe mscal.ocx
(8) This should successfully register your legacy MSCAL.OCX.
(9) This worked for me on a Vanilla install of 64-Bit Windows 7 and Excel 2010

 

[quykh]

Sao em làm hoài mà không được. Chắc phải bỏ cái calendar mà gỏ ngày trực tiếp vào quá. Nhân dịp này em xin chúc mừng sinh nhật Thầy Ndu(vì em mới biêt).

 

[ndu96081631]

Sao em làm hoài mà không được. Chắc phải bỏ cái calendar mà gỏ ngày trực tiếp vào quá. .

Cũng đúng thôi, vì số người xài Win 64 bit rất ít, vậy nên bạn khó mà nhận được sự trợ giúp chính xác. Có chăng bạn lên google search thử xem