Tôi vẫn chưa hiểu code của bạn lắm nhưng có vẻ có lỗi ở dòng này:Tôi chạy code có báo lỗi, xin hỏi các bạn cách khắc phục:
View attachment 208848
shInfor = Sheets("TU KHOA LAY ")
shInfor = Sheets("TU KHOA LAY MTN")
If Left(.Range("E" & i).Value, Len(shInfor.Range("A" & j).Value)) = shInfor.Range("A" & j).Value Then
If VBA.Left(.Range("E" & i).Value, Len(shInfor.Range("A" & j).Value)) = shInfor.Range("A" & j).Value Then
Dạ! cám ơn bạn, tôi đã sửa thành công.Tôi vẫn chưa hiểu code của bạn lắm nhưng có vẻ có lỗi ở dòng này:
Đúng phải là:PHP:shInfor = Sheets("TU KHOA LAY ")
PHP:shInfor = Sheets("TU KHOA LAY MTN")
Để sửa lỗi mà bạn nói thì bạn thử sửa lại:
Thành:PHP:If Left(.Range("E" & i).Value, Len(shInfor.Range("A" & j).Value)) = shInfor.Range("A" & j).Value Then
PHP:If VBA.Left(.Range("E" & i).Value, Len(shInfor.Range("A" & j).Value)) = shInfor.Range("A" & j).Value Then
Em chào anh, anh ơi cho em hỏi chútTôi vẫn chưa hiểu code của bạn lắm nhưng có vẻ có lỗi ở dòng này:
Đúng phải là:PHP:shInfor = Sheets("TU KHOA LAY ")
PHP:shInfor = Sheets("TU KHOA LAY MTN")
Để sửa lỗi mà bạn nói thì bạn thử sửa lại:
Thành:PHP:If Left(.Range("E" & i).Value, Len(shInfor.Range("A" & j).Value)) = shInfor.Range("A" & j).Value Then
PHP:If VBA.Left(.Range("E" & i).Value, Len(shInfor.Range("A" & j).Value)) = shInfor.Range("A" & j).Value Then
Bạn đưa file lên và nói rõ: không có tác dụng là click không được/click nhưng code không chạy hay sao?Em chào anh, anh ơi cho em hỏi chút
em sử dung Userform thì có báo lỗi và các nút khoanh đỏ không nhấn được ạ(không có tác dụng)
Anh giúp em mới ạ!View attachment 208915
Dạ! code không chạy ạ!Bạn đưa file lên và nói rõ: không có tác dụng là click không được/click nhưng code không chạy hay sao?
Tôi không thể xem để hiểu code được.Dạ! code không chạy ạ!
Em sử dụng code UserForm tên là "bangquanlysheet"
khi chạy code đó báo lỗi, em tải file lên anh giúp em.
Em cám ơn anh ạ!
anh ơi , code trong Userform thôi ạ! đây là 1 add in có trả phí, cái code em thêm vào nhưng khi chạy vẫn báo lỗi, lỗi như hình em đưa trên ý ạ!Tôi không thể xem để hiểu code được.
Có mấy vấn đề đã nhận biết được gửi bạn:
- Button Close vẫn sử dụng được
- Các button còn lại click được nhưng khi chạy code sẽ có báo lỗi do máy của tôi không có mấy file addin: "ToolQL.xlam!LoadExcel", "ToolQL.xlam!ChangeExcelLink2"
File này có cả mâm code thế này nhìn mà thấy sợ.
Nếu muốn sửa lại thì phải viết được yêu cầu người dùng thật chuẩn, sau đó từ từ làm.
Mà những trường hợp viết nhiều thế này thì chắc tôi không đủ khả năng.
StopDạ! code không chạy ạ!
Em sử dụng code UserForm tên là "bangquanlysheet"
khi chạy code đó báo lỗi, em tải file lên anh giúp em.
Em cám ơn anh ạ!
Bác VetMini khắc phục giúp bạn đó điLỗi tiêu đề :
Bạn sửa lại Tiêu đề bài viết thành: "Nhờ sửa code cho Userform"Hê, em loay hoay mãi đó, cũng đang nhờ anh VetMini mà
Vâng, cám ơn anh!Bạn sửa lại Tiêu đề bài viết thành: "Nhờ sửa code cho Userform"
anh ơi vào đâu để sửa được tiêu đề bài đã đăng ạ?Bạn sửa lại Tiêu đề bài viết thành: "Nhờ sửa code cho Userform"
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2