Header Ads

Xóa file mypersonnel.xls (Virus Kangatang)

Cách 1: Xóa tệp tự động bằng BuilderTV Add-in

Bước 1: Tải và cài đặt Add-in BuilderTV tại: https://hoangtuan.net/buildertv

Bước 2: Vào mục "Tiện ích khác" và chọn "Xóa file mypersonnel.xls (Virus Kangatang)"

Cách 2: Xóa bằng đoạn mã VBA

Để thực hiện đoạn mã VBA này, bạn cần làm theo các bước sau:

  1. Nhấn Alt+F11 để mở cửa sổ VBA.
  2. Chuột phải vào một dự án và tạo một Module mới.
  3. Chép đoạn mã dưới đây vào module mới tạo.
  4. Trỏ chuột vào đoạn mã và nhấn F5 để chạy.

Đoạn mã VBA



Sub OpenAllSTARTUP()

    On Error Resume Next

    Dim s$: s = "mypersonnel.xls"

    Worksheets(s).Close False

    Application.Wait Now + TimeSerial(0, 0, 2)

    Kill Application.StartupPath & "\" & s

    Kill Replace(Application.StartupPath, "Excel\XLSTART", "AddIns") & "\" & s

    Kill Replace(Application.StartupPath, "Excel\XLSTART", "Bo" & ChrW(770) & ChrW(777) & " tro" & ChrW(795) & ChrW(803)) & "\" & s

    Kill Application.Path & "\STARTUP" & "\" & s

    Kill Application.Path & "\XLSTART" & "\" & s

End Sub

    
----- Cách đơn giản hơn: Cài đặt Add-in BuilderTV và vào tính năng diệt Virus Kangatang!

No comments

Powered by Blogger.