Nhờ khắc phục lỗi Run-time error '1004' (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

hiepnh1985

Thành viên chính thức
Tham gia
31/8/10
Bài viết
76
Được thích
48
Em chào các anh chị,

Em có một file quản lý lập trình bằng vba (đang test thử). Khi chạy trên máy của em thì ngon lành cành đào. Nhưng khi up lên mediafire để cho người khác tải về để chạy thì bị báo lỗi. Lỗi này sinh ra khi chuyển từ Sheet "Form1" sang Form2, Form2 sang Form3... và là lỗi Run-time error '1004': application-defined or object-defined error

Em cũng không rõ nguyên nhân nó bị làm sao vì máy mình không bị. Các anh chị tải về rồi xem giúp em có bị lỗi đó không và nguyên nhân cũng như cách khắc phục giúp em với ạ.

Đây là địa chỉ tải file: http://www.mediafire.com/view/p0cucv2gi0wsx2w/Error.xlsm
và có cả hình ảnh lỗi đính kèm

Em chân thành cảm ơn các bác!
 

File đính kèm

  • loi 1.png
    loi 1.png
    19.3 KB · Đọc: 84
Lần chỉnh sửa cuối:
Có thể bạn nhập gì đó vào một sheet nào đó có dùng Protect Sheet.

Nếu bạn muốn nhập thì chạy lệnh UnProtect trước rồi nhập dữ liệu lên sheet, sau đó, cuối dòng của thủ tục thì Protect sheet lại.
 
Upvote 0
Anh ơi đầu tiên em cũng tưởng bị lỗi này nhưng em kiểm tra lại không có Protect Sheet nào cả mà nó vẫn bị chứ. Chỉ có cái Sheet "Setting" là em ẩn nó đi khi gửi cho mọi người thôi (ẩn trong vba và người dùng không unhide được). File em gửi anh mở ra có bị lỗi đó không vậy?
 
Upvote 0
Anh ơi đầu tiên em cũng tưởng bị lỗi này nhưng em kiểm tra lại không có Protect Sheet nào cả mà nó vẫn bị chứ. Chỉ có cái Sheet "Setting" là em ẩn nó đi khi gửi cho mọi người thôi (ẩn trong vba và người dùng không unhide được). File em gửi anh mở ra có bị lỗi đó không vậy?
Tôi vừa tải file đó về, tôi mở file và chẳng thấy lỗi gì cả, sau đó tôi ẩn sheet setting đó, cũng không thấy lỗi nào luôn!
 
Upvote 0
Vậy để em kiểm tra lại trong chương trình chính ở máy của người khác xem nó bị lỗi ở đâu. Em sẽ lưu ý "Có thể bạn nhập gì đó vào một sheet nào đó có dùng Protect Sheet" mà anh đã nói. Nếu vẫn chưa phát hiện được nguyên nhân thì em sẽ nhờ các anh sau vậy. Em cảm ơn anh Nghĩa đã giúp đỡ nhiệt tình }}}}}
 
Upvote 0
Vậy để em kiểm tra lại trong chương trình chính ở máy của người khác xem nó bị lỗi ở đâu. Em sẽ lưu ý "Có thể bạn nhập gì đó vào một sheet nào đó có dùng Protect Sheet" mà anh đã nói. Nếu vẫn chưa phát hiện được nguyên nhân thì em sẽ nhờ các anh sau vậy. Em cảm ơn anh Nghĩa đã giúp đỡ nhiệt tình }}}}}
Đồng thời, khi lỗi hiện lên, bạn nhớ bấm Debug (muốn bấm được chỉ khi bạn đã mở protect VBA) và xem nó tô màu vàng ở dòng code nào nhé!
 
Upvote 0
Em phát hiện ra lỗi rồi bác Nghĩa à. Hôm nay ngồi máy của người khác mới phát hiện ra nó bị lỗi đường dẫn của logo chèn vào trong Header. Tức là máy của em lưu ở một vị trí cố định nên chạy bình thường. Nhưng khi sang máy người khác thì lúc định dạng in ấn tới phần load logo vào Header nó không thấy đường dẫn nên báo lỗi.
 
Upvote 0
Em phát hiện ra lỗi rồi bác Nghĩa à. Hôm nay ngồi máy của người khác mới phát hiện ra nó bị lỗi đường dẫn của logo chèn vào trong Header. Tức là máy của em lưu ở một vị trí cố định nên chạy bình thường. Nhưng khi sang máy người khác thì lúc định dạng in ấn tới phần load logo vào Header nó không thấy đường dẫn nên báo lỗi.
OK, như thế thì bạn tự biết phải làm sao rồi chứ!?;;;;;;;;;;;
 
Upvote 0
Upvote 0
Em cũng tìm hiểu kỹ câu lệnh activate đó và thấy không bị sai. Nhưng đây là lỗi xuất hiện theo thứ tự sau:
1. Khi em tải từ mediafire về và mở ra thì nó hiện hình như sau
Screenshot 2014-10-01 06.51.24.jpg
2. Sau khi cho phép chạy file thì hình sau
Screenshot 2014-10-01 06.51.27.jpg
3. Nó báo lỗi này
Screenshot 2014-10-01 06.51.32.jpg
4. Sau đó em tắt đi mở lại thì không bị lỗi đó nữa và mở ra nó vẫn activate sheet1. Có nghĩa là cứ tải từ mediafire về và mở lần đầu tiên thì nó bị. Em cũng không hiểu tại sao bị như vậy nữa mặc dù câu lệnh em chưa thấy nó sai.
 
Upvote 0
Em cũng tìm hiểu kỹ câu lệnh activate đó và thấy không bị sai. Nhưng đây là lỗi xuất hiện theo thứ tự sau:
1. Khi em tải từ mediafire về và mở ra thì nó hiện hình như sau
View attachment 129950
2. Sau khi cho phép chạy file thì hình sau
View attachment 129951
3. Nó báo lỗi này
View attachment 129952
4. Sau đó em tắt đi mở lại thì không bị lỗi đó nữa và mở ra nó vẫn activate sheet1. Có nghĩa là cứ tải từ mediafire về và mở lần đầu tiên thì nó bị. Em cũng không hiểu tại sao bị như vậy nữa mặc dù câu lệnh em chưa thấy nó sai.
Máy bạn như thế nào tôi không biết, nhưng khi tôi tải về, mở ra bình thường, không có hiện tượng lỗi như bạn nói.
 
Upvote 0
Có thể bạn nhập gì đó vào một sheet nào đó có dùng Protect Sheet.

Nếu bạn muốn nhập thì chạy lệnh UnProtect trước rồi nhập dữ liệu lên sheet, sau đó, cuối dòng của thủ tục thì Protect sheet lại.
Bác viết cụ thể đoạn code mở khóa và đóng khóa ra giúp em được không ạ?
 
Upvote 0
/-(iện chưa có B. Nghĩa thì bạn có thể nhờ đến bộ thu macro mà, thử đi nha!
Em đã "ghi" macro rùi, nhưng ko thấy nó điền " mật khẩu" mà mình đã điền vào thì sửa code như nào ạ
PHP:
Sub Macro1()   ActiveSheet.Unprotect'............    ActiveSheet.ProtectEnd Sub
 
Upvote 0
Em đã "ghi" macro rùi, nhưng ko thấy nó điền " mật khẩu" mà mình đã điền vào thì sửa code như nào ạ

Bạn ghi tuần tự 2 macro;
1 cái ghi động tác khóa workbook với mật khẩu bạn nghỉ ra, như "GPE"

Cái thứ hai: Ghi quá trình mở khóa (với mật khảu bạn chọn).

Sau đó nếu không biết sửa làm sao thì đưa lên diễn đàn; Sẽ có người giúp bạn khâu bạn chưa thể làm được!
 
Upvote 0
Bạn ghi tuần tự 2 macro;
1 cái ghi động tác khóa workbook với mật khẩu bạn nghỉ ra, như "GPE"

Cái thứ hai: Ghi quá trình mở khóa (với mật khảu bạn chọn).

Sau đó nếu không biết sửa làm sao thì đưa lên diễn đàn; Sẽ có người giúp bạn khâu bạn chưa thể làm được!
File em gửi nó bị lỗi : Run time error '1004' khi file được chia sẻ cho nhiều người dùng thì sửa code này như nào ạ
 

File đính kèm

Upvote 0
Web KT

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

Back
Top Bottom