Sửa lỗi Expected Endsub_ lỗi VBA

[Núi Ngàn Cân]

Anh chị cho em hỏi với ạ, Excel của em mở lên File nào cũng hiện lỗi như hình. Ai có thể fix lỗi này với được ko ạ. E ko biết gì về excel. e cảm ơn

 

[ongke0711]

Thiếu mất từ "End Sub".
Bạn code đoạn code thiếu hoặc lỡ tay xoá mất từ "End sub" ở cuối đoạn code.
Vd:

Private Sub abc() 

...

...

End Sub

hoặc

Sub abc()
...
End Sub

 

[Núi Ngàn Cân]

Anh chị cho em hỏi với ạ, Excel của em mở lên File nào cũng hiện lỗi như hình. Ai có thể fix lỗi này với được ko ạ. E ko biết gì về excel. e cảm ơn

Anh/chị có thể ultraview giúp em sửa lỗi này được không ạ, ngoài cái này em còn gặp runtime 91,1004 ạ

 

[befaint]

Bạn code đoạn code thiếu

Đấy là virus anh ơi.

 

[Núi Ngàn Cân]

Đấy là virus anh ơi.

Thế là máy em bị Virus ạ?

 

[batman1]

Thế là máy em bị Virus ạ?

Trong ảnh mà bạn đính kèm bạn nhìn lên tiêu đề cửa sổ, hoặc nhìn trong code thấy có từ "foxz".

Công cụ tìm kiếm của GPE ở góc trên bên phải -> nhập từ khóa foxz -> đọc mệt nghỉ.

 

[Núi Ngàn Cân]

Trong ảnh mà bạn đính kèm bạn nhìn lên tiêu đề cửa sổ, hoặc nhìn trong code thấy có từ "foxz".

Công cụ tìm kiếm của GPE ở góc trên bên phải -> nhập từ khóa foxz -> đọc mệt nghỉ.

Anh/chị có giải pháp nào giúp em với ạ, hay em phải đi cài lại win ạ?

 

[SA_DQ]

1 giải pháp nữa đây:
Bạn gởi file đang lỗi lên diễ đàn; may ra có người dũng cảm, không sợ hi sinh nào đó dẽ giúp bạn; & điều chắc chắn là không phải mình

 

[quanluu]

Đầu tiên bạn xóa module foxz đi. Sau đó vào thư mục START của ofice xóa file NEGS.XLS đi xem.