Tạo Form Làm việc trong exel

  • Thread starter Thread starter Jenhcv
  • Ngày gửi Ngày gửi
Liên hệ QC
Mình làm trực tiếp trên bảng tính luôn, khỏi Form chi cho mệt!
Bạn xem file nha!
Thân.
 

File đính kèm

Lần chỉnh sửa cuối:
Upvote 0
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Nó bị báo lỗi phần này bạn ơi
 
Upvote 0
Báo lỗi gì đâu? Mình chạy thử trơn tru cả mà? Mà nếu có lỗi thì lỗi gì được nhỉ?
Thân.
 
Upvote 0
mình xin lỗi xem hok kỹ, tại mình thiếu thư viện. Bạn cho mình xin cái link down cái thư viẹn đi, cám ơn bạn nhiều
 
Upvote 0
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Nó bị báo lỗi phần này bạn ơi
Báo lỗi gì đâu? Mình chạy thử trơn tru cả mà? Mà nếu có lỗi thì lỗi gì được nhỉ?
Thân.
Mình chạy file này cũng báo lổi ---> Nó lổi ở những chổ mà Range được viết theo kiểu [A1] ---> Nếu sửa lại thành kiểu Range("A1") thì hết lổi
==> Chưa tìm ra được nguyên nhân, nhưng nếu copy dử liệu và code sang 1 file mới tinh thì chạy bình thường
 

File đính kèm

Upvote 0
mình xin lỗi xem hok kỹ, tại mình thiếu thư viện. Bạn cho mình xin cái link down cái thư viẹn đi, cám ơn bạn nhiều
Ah... Bạn nói thể khiến tôi nhớ ra... Thì ra là THỪA chứ không phải thiếu (tác giả khuyến mãi thêm)
Ẹc... Ẹc...
Giờ bạn mở file lên, bấm Alt + F11 vào cửa sổ VBE, sau đó vào menu Tools\Refenrences, thấy mục nào có chử MISSING, hãy bỏ dấu check mục đó là xong
Lạ thật!
 
Upvote 0
vẫn bị lỗi :((

Calendar1.Visible = (Target.Address = "$B$4")


help em để em chạy file máy anh ơi
 
Lần chỉnh sửa cuối:
Upvote 0
vẫn bị lỗi :((

Calendar1.Visible = (Target.Address = "$B$4")


help em để em chạy file máy anh ơi
Bạn cho hỏi: Version Office của bạn là gì? 2000? 2002 hay 2003 vậy?
Office 2003 thì đương nhiên nó có Calendar Control rồi.. sao lại lổi được nhỉ
Bạn vào lại menu Tools\References xem thử còn cái nào MISSING nữa không?
 
Upvote 0
của mình là 2003 và đã chỉnh missing như bạn chỉ, nhưng vẫn hok được
 
Upvote 0
câu hỏi này tìm trong thư viên nhiều lắm
 
Upvote 0
chi tiền theo mệnh giá

các bạn giúp mình công thức này với.
Cho mệnh giá cần chi lúc đó số tiền sẽ được chia cho mệnh giá đó, số tiền còn lại sẽ chia tiếp cho mệnh giá còn lại. các bạn có thể xem file của mình để hiểu hơn.
 

File đính kèm

Upvote 0
vẫn bị lỗi :((

Calendar1.Visible = (Target.Address = "$B$4")


help em để em chạy file máy anh ơi
Nguồn: Internet
Re: Adding Missing Controls... (Calendar Control -
You'll also need to register the calendar control with windows before you can reference it in Excel. So steps are:

1. Copy MSCAL.OCX to the SYSTEM32 directory (e.g. "C:\WINNT\SYSTEM32")
2. Goto Start menu, select Run... and enter the RegSvr32 command to register the control with windows (e.g. "regsvr32 C:\WINNT\SYSTEM32\MSCAL.OCX"). You should get a message saying "DllRegisterServer in C:\WINNT\SYSTEM32\MSCAL.OCX succeeded.".
3. Open up Excel, go to your toolbox and then click on the more controls icon, or in VBA right click on the Toolbox toolbar and click on the Additional Controls... menu item, and you will now see Calendar Control listed there for you to select.

You can register any .OCX in this way and it won't cause any harm registering them again and again.

Hope that helps

Hôm nay máy mình cũng bị lỗi như trên và làm theo hướng dẫn từ trang này thì thấy hết lỗi
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom