Làm thế nào để xóa được các sheet ảo?

[duynhat84]

không biết tại sao khi mở vi vi sual basic editor Tại cửa sổ Project- vabeprofect lại có một số sheet lạ VD (sheet 10(starup-9) làm cho số thứ tự của các sheet thay đổi làm cho các code xác định sai sheet nguồn hoạc sheet đích.
làm cách nào để xóa các sheet đó đi được
em gửi hình hèm theo nhờ các bác chỉ giùm.
Em xin cảm ơn nhiều.

 

[nghiaphuc]

không biết tại sao khi mở vi vi sual basic editor Tại cửa sổ Project- vabeprofect lại có một số sheet lạ VD (sheet 10(starup-9) làm cho số thứ tự của các sheet thay đổi làm cho các code xác định sai sheet nguồn hoạc sheet đích.
làm cách nào để xóa các sheet đó đi được
em gửi hình hèm theo nhờ các bác chỉ giùm.
Em xin cảm ơn nhiều.

Các sheet như vậy thường là do virus macro tạo ra, và nếu bạn để ý thì ở khung thuộc tính phía dưới (Properties), thuộc tính Visible của các sheet này thường là 0-xlSheetHidden hoặc 2-xlSheetVeryHidden, bạn chỉ cần đổi nó thành -1-xlSheetVisible là có thể nhìn thấy nó ở ngoài Excel.
Hoặc bạn cũng có thể sử dụng code sau để hiển thị tất cả các sheet, từ đó có thể xóa hay làm gì tùy thích:

Sub ShowAllSheets()
    Dim Ws As Worksheet
    For Each Ws In ThisWorkbook.Sheets
        Ws.Visible = -1
    Next
End Sub

 

[vu_tuan_manh_linh]

Sheet ảo thường do virut tạo lên, và thường ở dạng veryhidden. Mình thường dùng đoạn code sau để cho hiện toàn bộ sheet

Sub Visible_All_Sheets()
Dim Sh As Worksheet
For Each Sh In ActiveWorkbook.Worksheets
        Sh.Visible = xlSheetVisible
Next
End Sub

Sau đó tìm sheet cần xóa thì xóa nó đi (đôi khi sheet ẩn là do mình tạo ra nên xóa toàn bộ sheet ẩn bằng code có khi toi luôn!).

 

[ndu96081631]

không biết tại sao khi mở vi vi sual basic editor Tại cửa sổ Project- vabeprofect lại có một số sheet lạ VD (sheet 10(starup-9) làm cho số thứ tự của các sheet thay đổi làm cho các code xác định sai sheet nguồn hoạc sheet đích.
làm cách nào để xóa các sheet đó đi được
em gửi hình hèm theo nhờ các bác chỉ giùm.
Em xin cảm ơn nhiều.

Trong Excel chẳng có sheet nào gọi là ẢO cả, có chăng là nó trong trạng thái ẩn hay hiện mà thôi
Theo như hình chụp thì 99.99% file đã bị nhiểm virus (con StartUp)

 

[duynhat84]

Cảm ơn các Bác em làm theo hướng dẫn đã diệt được chúng rồi