Virus NEGS.xls và macro foxz

[trungce]

Chào mọi người,

File excel của mình bị nhiễm virus NEGS và mã code foxz này gây lỗi data. Mình đã quét bằng BKAV tool và KIS nhưng không triệt để. Có cách nào loại bỏ code foxz gây lỗi này ko?

Xin cảm ơn!

 

[vova2209]

Diệt được macro NEG nhưng không xóa được các sheet ẩn fox đó bạn.
Mình phải vào xóa tay bằng 1 đoạn code VBA của anh Quang Hải mới được, híc.
View attachment 274399
Tức thiệt.

gửi file đây mình diệt cho

 

[xuongrongdat]

gửi file đây mình diệt cho

Mình biết gửi file nào cho bạn giờ.
File nào mở lên mình Alt F11 kiểm tra mà xuất hiện sheet ẩn foxz thì mình tự xóa tay được rồi. Cảm ơn bạn nhiều nhé!
Mà giờ mỗi lần mở file Excel bất kỳ thì nó sẽ chạy cái add-in NDT hay gì á, mất 1 nhịp !

 

[vova2209]

Mình biết gửi file nào cho bạn giờ.
File nào mở lên mình Alt F11 kiểm tra mà xuất hiện sheet ẩn foxz thì mình tự xóa tay được rồi. Cảm ơn bạn nhiều nhé!
Mà giờ mỗi lần mở file Excel bất kỳ thì nó sẽ chạy cái add-in NDT hay gì á, mất 1 nhịp !

file của bạn chứa nhiều name lỗi quá đấy nên nặng file. Mình xóa tay trước xong mới cho chạy NDT thì file sạch sẽ.. chỉ làm 1 lần thôi bạn ạ.

 

[xuongrongdat]

file của bạn chứa nhiều name lỗi quá đấy nên nặng file. Mình xóa tay trước xong mới cho chạy NDT thì file sạch sẽ.. chỉ làm 1 lần thôi bạn ạ.

Bây giờ mình mở file nào lên mà có 2 con NEG với foxz đều bị tiêu diệu hết rồi. Cảm ơn bạn nhiều nhé!

 

[xuongrongdat]

file của bạn chứa nhiều name lỗi quá đấy nên nặng file. Mình xóa tay trước xong mới cho chạy NDT thì file sạch sẽ.. chỉ làm 1 lần thôi bạn ạ.

Giờ nó có hiện tượng này bạn. File nào mà có chứa Macro, sau khi mở lên, cái pm của NDT liền cảnh báo và xóa đi. Nhưng sau đó các file excel này đều tự sinh ra cái file .bak này nè. Ngộ ghê ! File sinh ra dung lượng còn nặng hơn file gốc nữa bạn.

 

[Maika8008]

Thuốc chưa đủ vị nên bịnh vẫn còn.

Mà sao vẫn còn dùng file .xls nhiều vậy bạn?

 

[xuongrongdat]

Thuốc chưa đủ vị nên bịnh vẫn còn.

Mà sao vẫn còn dùng file .xls nhiều vậy bạn?

Em tổng hợp nhiều loại thông tin từ hơn 50 Cửa hàng gửi về, họ làm bằng xls nhiều lắm anh, híc.

 

[Maika8008]

Em tổng hợp nhiều loại thông tin từ hơn 50 Cửa hàng gửi về, họ làm bằng xls nhiều lắm anh, híc.

Họ vẫn dùng Excel 2003 hay theo thói quen vẫn lưu dạng .xls?

 

[xuongrongdat]

Họ vẫn dùng Excel 2003 hay theo thói quen vẫn lưu dạng .xls?

Dạ Excel 2k3 đó anh.
Em phải nói điều này với IT và nhờ họ nâng cấp Office cho toàn bộ Cửa hàng mới được.

 

[vova2209]

Giờ nó có hiện tượng này bạn. File nào mà có chứa Macro, sau khi mở lên, cái pm của NDT liền cảnh báo và xóa đi. Nhưng sau đó các file excel này đều tự sinh ra cái file .bak này nè. Ngộ ghê ! File sinh ra dung lượng còn nặng hơn file gốc nữa bạn.
View attachment 274621

lúc hiện lên bảng nó có mục tạo file backup đó bạn, bỏ ô tích đó đi là được. tất cả các file nên xóa hết các name lỗi đi cho nhẹ, máy sạch sẽ.

 

[timhocexcel]

Thử chạy code này rồi khởi động lại Excel xem thử hết không bạn.

Sub KillFoxz()
Dim WB As Workbook
On Error Resume Next
Application.DisplayAlerts = False
Application.EnableEvents = False
For Each WB In Workbooks
    WB.Sheets("foxz").Delete
Next
With Workbooks("NEGS.XLS")
    .ChangeFileAccess xlReadOnly
    Kill .FullName
    .Close False
End With
Application.EnableEvents = True
Application.DisplayAlerts = True
End Sub

Code này là là để vào modun rồi chỉ chạy 1 lần là được hay mỗi lần mở file đều tạo 1 modun riêng cho file đó vậy bạn, vì mình tạo file mới vẫn bị

 

[huuthang_bd]

Code này là là để vào modun rồi chỉ chạy 1 lần là được hay mỗi lần mở file đều tạo 1 modun riêng cho file đó vậy bạn, vì mình tạo file mới vẫn bị

Cài addin này nha bạn

Add-in DeleteVirusMacro - Xóa và ngăn chặn virus macro

Virus macro tuy rất đơn giản nhưng nhiều người vẫn chưa biết cách phòng ngừa và xử lý khi máy tính bị nhiễm. Vì vậy tôi viết tặng mọi người add-in này, chức năng duy nhất của add-in này là xóa và ngăn chặn các loại virus macro. Lưu ý: Add-in sẽ xóa tất cả các sheet Macro4, sheet International...

www.giaiphapexcel.com

 

[timhocexcel]

Cài addin này nha bạn

Add-in DeleteVirusMacro - Xóa và ngăn chặn virus macro

Virus macro tuy rất đơn giản nhưng nhiều người vẫn chưa biết cách phòng ngừa và xử lý khi máy tính bị nhiễm. Vì vậy tôi viết tặng mọi người add-in này, chức năng duy nhất của add-in này là xóa và ngăn chặn các loại virus macro. Lưu ý: Add-in sẽ xóa tất cả các sheet Macro4, sheet International...

www.giaiphapexcel.com

Vâng, cảm ơn bạn nhe.

 

[vanchieugtvt]

Cài addin này nha bạn

Add-in DeleteVirusMacro - Xóa và ngăn chặn virus macro

Virus macro tuy rất đơn giản nhưng nhiều người vẫn chưa biết cách phòng ngừa và xử lý khi máy tính bị nhiễm. Vì vậy tôi viết tặng mọi người add-in này, chức năng duy nhất của add-in này là xóa và ngăn chặn các loại virus macro. Lưu ý: Add-in sẽ xóa tất cả các sheet Macro4, sheet International...

www.giaiphapexcel.com

Nếu mình không muốn chạy tự động với tất cả các file khi khởi động excel thì làm thế nào ạ. E muốn chạy addin với file bị nhiễm virus thôi ạ.

 

[huuthang_bd]

Nếu mình không muốn chạy tự động với tất cả các file khi khởi động excel thì làm thế nào ạ. E muốn chạy addin với file bị nhiễm virus thôi ạ.

Là bạn biết file nào bị nhiễm rồi đúng không. Nếu vậy thì đừng cài Addin, chỉ mở addin lên sau đó mở file bị nhiễm virus. Làm xong thì đóng Excel.

 

[vanchieugtvt]

Là bạn biết file nào bị nhiễm rồi đúng không. Nếu vậy thì đừng cài Addin, chỉ mở addin lên sau đó mở file bị nhiễm virus. Làm xong thì đóng Excel.

Dạ. Cảm ơn anh ạ.

 

[danh hien]

Thử chạy code này rồi khởi động lại Excel xem thử hết không bạn.

Sub KillFoxz()
Dim WB As Workbook
On Error Resume Next
Application.DisplayAlerts = False
Application.EnableEvents = False
For Each WB In Workbooks
    WB.Sheets("foxz").Delete
Next
With Workbooks("NEGS.XLS")
    .ChangeFileAccess xlReadOnly
    Kill .FullName
    .Close False
End With
Application.EnableEvents = True
Application.DisplayAlerts = True
End Sub

Tuyệt vời, chạy 1 phát hết liền !