Lỗi run time error 91 object variable or with block variable not set (1 người xem)

[conmuaxanh01]

File này hôm trước em vẫn chạy bình thường kg thấy có lỗi đó hôm nay mở sheet THEKHO lên chạy là bị báo lỗi như vậy em kg bít là bị lỗi gì các bác giúp em với nhé!
Còn 1 vấn đề nữa em cũng có 1 file như vậy nhưng đổi tên khác khi mở nó chạy 1 mình thì vẫn chạy bình thường nhưng khi chạy song song với file này thì nó cũng bị lỗi y chang như vậy. hay là do máy tính em bị virus??? Các bác giúp em đang cần gấp!!!

 

[SA_DQ]

Bạn thử mở cửa số VBE;
Vô menu Tool -> Reference & thấy có dòng nào đó như là "MISSING: Redit Control" thì bỏ chọn nó đi, coi thử?

 

[conmuaxanh01]

Cảm ơn bạn đã trả lời nhưng mình đã vào rồi nhưng kg thấy dòng nào như bạn nói cả. Có bác nào xem giúp em được kg ạ

 

[nghiaphuc]

File này hôm trước em vẫn chạy bình thường kg thấy có lỗi đó hôm nay mở sheet THEKHO lên chạy là bị báo lỗi như vậy em kg bít là bị lỗi gì các bác giúp em với nhé!
Còn 1 vấn đề nữa em cũng có 1 file như vậy nhưng đổi tên khác khi mở nó chạy 1 mình thì vẫn chạy bình thường nhưng khi chạy song song với file này thì nó cũng bị lỗi y chang như vậy. hay là do máy tính em bị virus??? Các bác giúp em đang cần gấp!!!

Vấn đề nằm ở chỗ dòng lệnh:

Loop While Not sRng Is Nothing And sRng.Address <> fAdd

Bởi vì khi gặp tình huống thực sự sRng Is Nothing thì không thể có sRng.Address được, dẫn đến phát sinh lỗi như bạn đã gặp.

Bạn tách nó thành 2 câu lệnh sau có vẻ ổn:

If sRng Is Nothing Then Exit Do
Loop While sRng.Address <> fAdd

 

[conmuaxanh01]

Vấn đề nằm ở chỗ dòng lệnh:

Loop While Not sRng Is Nothing And sRng.Address <> fAdd

Bởi vì khi gặp tình huống thực sự sRng Is Nothing thì không thể có sRng.Address được, dẫn đến phát sinh lỗi như bạn đã gặp.

Bạn tách nó thành 2 câu lệnh sau có vẻ ổn:

If sRng Is Nothing Then Exit Do
Loop While sRng.Address <> fAdd

Mình đã tách ra như bạn nói nhưng nó chỉ xuất được dòng đầu tiên thôi còn mấy dòng sau nó kg chạy tiếp đươc nữa, mình gửi thêm 1 file cho bạn xem thử cũng đoạn code đó nhưng nó lại chạy được, mình cũng chưa hiểu tại sao cùng 1 đoạn code mà nó lại bị lỗi như vậy