Xin hỏi các mem về một file phá protect sheet rồi mà vẫn không được? (1 người xem)

[Trojan]

Tôi có file như đính kèm có bảo vệ protect sheet. Dùng phần mềm phá password bảo vệ sheet rồi, sau khi save lại thì vẫn bị bảo vệ protect sheet. Không hiểu trong file có virus hay là có đoạn mã VBA nào bị ẩn không. Theo những gì tôi kiểm tra được thì chỉ thấy có các đoạn mã về format và một số hàm bìn thường, không hề thấy mã bảo vệ sheet. Có thể họ có cách bảo vệ code ở dạng nào đó mà tôi không rõ. Các mem check giúp cái. Xin cảm ơn.

 

[ndu96081631]

Tôi có file như đính kèm có bảo vệ protect sheet. Dùng phần mềm phá password bảo vệ sheet rồi, sau khi save lại thì vẫn bị bảo vệ protect sheet. Không hiểu trong file có virus hay là có đoạn mã VBA nào bị ẩn không. Theo những gì tôi kiểm tra được thì chỉ thấy có các đoạn mã về format và một số hàm bìn thường, không hề thấy mã bảo vệ sheet. Có thể họ có cách bảo vệ code ở dạng nào đó mà tôi không rõ. Các mem check giúp cái. Xin cảm ơn.

Hãy xóa sheet ẩn, name rác trong file thử xem! Đừng nói là không biết làm à nghen

 

[Luc Van]

Tôi có file như đính kèm có bảo vệ protect sheet. Dùng phần mềm phá password bảo vệ sheet rồi, sau khi save lại thì vẫn bị bảo vệ protect sheet. Không hiểu trong file có virus hay là có đoạn mã VBA nào bị ẩn không. Theo những gì tôi kiểm tra được thì chỉ thấy có các đoạn mã về format và một số hàm bìn thường, không hề thấy mã bảo vệ sheet. Có thể họ có cách bảo vệ code ở dạng nào đó mà tôi không rõ. Các mem check giúp cái. Xin cảm ơn.

Em ngó thử file của bác tí mà ko hiểu sao excel của em bị lỗi luôn.

 

[ndu96081631]

Em ngó thử file của bác tí mà ko hiểu sao excel của em bị lỗi luôn.

Mở bằng Excel 2007 sẽ không lỗi đâu

 

[Trojan]

Nhìn trong file có thấy 1 sheet ẩn. Nhưng không unhide được, Alt+F11 lên thì lại không thấy sheet đấy đâu.
To ndu96081631: Xoá name rác và một số name để chạy macro thì nó không chạy nữa. Tuy nhiên vấn đề tôi muốn tìm hiểu là họ dấu code VBA bằng cách nào mà vào trong module lại không thấy có đoạn code nào để protect sheet.

 

[ndu96081631]

Nhìn trong file có thấy 1 sheet ẩn. Nhưng không unhide được, Alt+F11 lên thì lại không thấy sheet đấy đâu.
To ndu96081631: Xoá name rác và một số name để chạy macro thì nó không chạy nữa. Tuy nhiên vấn đề tôi muốn tìm hiểu là họ dấu code VBA bằng cách nào mà vào trong module lại không thấy có đoạn code nào để protect sheet.

Code macro 4 đương nhiên được viết trên sheet macro 4 rồi (không phải VBA code).
Sheet này thuộc loại MS Excel 4 Macro. Ta sẽ không nhìn thấy nó trong cửa sổ Visual Basic đâu. Chỉ có thể cho hiện bằng cách vào Format\Sheet\Unhide mà thôi
Cũng may là họ chưa dùng tuyệt chiêu siêu ẩn cho sheet này, nếu không thì có vào đâu cũng chả nhìn thấy
Làm cho bạn luôn đây. File từ 2MB, quét dọn lại chỉ còn 250KB
Ẹc... Ẹc...

 

[xmenx56]

Hồi trưa em có vào topic này xem có tải về máy xem thử. Nhưng cuối cùng lại bị không hên. Hihi. Bây giờ mở file excell mới thì bị lổi và bị khóa luôn các sheet, mặt dù gỡ bỏ office và cài lại vẫn vũ như cẩn. Rất mong nhận được sự giúp đỡ của các bác

 

[Trojan]

Code macro 4 đương nhiên được viết trên sheet macro 4 rồi (không phải VBA code).
Sheet này thuộc loại MS Excel 4 Macro. Ta sẽ không nhìn thấy nó trong cửa sổ Visual Basic đâu. Chỉ có thể cho hiện bằng cách vào Format\Sheet\Unhide mà thôi
Cũng may là họ chưa dùng tuyệt chiêu siêu ẩn cho sheet này, nếu không thì có vào đâu cũng chả nhìn thấy
Làm cho bạn luôn đây. File từ 2MB, quét dọn lại chỉ còn 250KB
Ẹc... Ẹc...

Bác có thể chỉ giúp xem code của Macro 4 bằng cách nào không? Tôi thấy có sheet Hatinh mà không unhide được vào cửa sổ lập trình VBA cũng không thấy.

 

[Luc Van]

Hồi trưa em có vào topic này xem có tải về máy xem thử. Nhưng cuối cùng lại bị không hên. Hihi. Bây giờ mở file excell mới thì bị lổi và bị khóa luôn các sheet, mặt dù gỡ bỏ office và cài lại vẫn vũ như cẩn. Rất mong nhận được sự giúp đỡ của các bác

Bạn thử vào C:\Program Files\Microsoft Office\OFFICE11\XLSTART ,nếu xuất hiện cái book nào thì xoá cái book đó xem nào

 

[huuthang_bd]

Bác có thể chỉ giúp xem code của Macro 4 bằng cách nào không? Tôi thấy có sheet Hatinh mà không unhide được vào cửa sổ lập trình VBA cũng không thấy.

Bạn tải file này về xem. Đã Unhide rồi, bằng Macro mới được nhé.

 

[xmenx56]

Bạn thử vào C:\Program Files\Microsoft Office\OFFICE11\XLSTART ,nếu xuất hiện cái book nào thì xoá cái book đó xem nào

Dạ. Cảm ơn anh, bị nặng lắm anh ơi, thấy lâu quá chưa ai giúp, em đã ghost máy lại luôn rồi cho chắc ăn.

 

[Trojan]

File của huuthang_bd mở ra lại bị protect. File này có đoạn mã chạy protect sheet ở dạng auto_open rồi.
Xin hỏi các mem là đối với cụ thể file này thì dọn dẹp như thế nào để dung lượng file giảm xuống. Tôi đã làm theo cách sau nhưng không giảm được là bao:
- Unprotect sheet
- Xoá name rác
- Xoá sheet Hatis gì đó đi
-> Kết quả giảm được mấy chục KB.

 

[huuthang_bd]

File của huuthang_bd mở ra lại bị protect. File này có đoạn mã chạy protect sheet ở dạng auto_open rồi.
Xin hỏi các mem là đối với cụ thể file này thì dọn dẹp như thế nào để dung lượng file giảm xuống. Tôi đã làm theo cách sau nhưng không giảm được là bao:
- Unprotect sheet
- Xoá name rác
- Xoá sheet Hatis gì đó đi
-> Kết quả giảm được mấy chục KB.

Bạn cần làm thêm một bước nữa: Clear những vùng không có dữ liệu ở tất cả các sheet.

 

[Trojan]

Sau khi tìm hiểu mới biết file của tôi bị dính virus macro. Xin gửi anh em file diệt virus macro mà tôi download được trên mạng để anh em nào bị thì dùng.

 

[Trojan]

File này chính thức là một loại virus các bác à. Cơ chế lây nhiễm rất đơn giản. Khi ta mở file bị nhiễm song song với file chưa bị, chỉ cần kích chuột vào file bị nhiễm một cơ chế copy sheet wHaTisname sẽ được copy sang file mới. Thế là người dùng save file mới vào sẽ bị nhiễm ngay. Thấy cũng hay anh em thử kiểm tra lại code file wHaTisname xem có gì hay học tập được hay không.
Đôi điều chia sẽ với các mem.

 

[huuthang_bd]

File này chính thức là một loại virus các bác à. Cơ chế lây nhiễm rất đơn giản. Khi ta mở file bị nhiễm song song với file chưa bị, chỉ cần kích chuột vào file bị nhiễm một cơ chế copy sheet wHaTisname sẽ được copy sang file mới. Thế là người dùng save file mới vào sẽ bị nhiễm ngay. Thấy cũng hay anh em thử kiểm tra lại code file wHaTisname xem có gì hay học tập được hay không.
Đôi điều chia sẽ với các mem.

Cách tốt nhất là khi mở một file lạ, nếu có Macro bạn cần phải kiểm tra kỹ trước khi Enable Macro.

 

[ndu96081631]

Cách tốt nhất là khi mở một file lạ, nếu có Macro bạn cần phải kiểm tra kỹ trước khi Enable Macro.

Virus Excel file thường được viết bằng macro 4 (ít thấy virus viết bằng VBA)
Mà với macro 4 thì dù có Enable macros hay Disable macros thì cũng chẳng ăn thua gì ---> Ngoài cảnh báo thông thường (dành cho file có chứa VBA code) thì đối với file chứa macro 4, nó còn có 1 cảnh báo chỉ có 2 nút Yes và No
- Nếu chọn Yes: Mở được file và chấp nhận nhiễm virus
- Nếu chọn No: không bị nhiễm virus nhưng đồng thời cũng không mở được file
Chính vậy mà không có cơ sở nào để kiểm tra file sắp mở là an toàn hay không!
Vậy chỉ có cách:
- Dùng các tool diệt virus để quét trước
- "Liều" mở file nếu tự tin là mình có thể diệt được mấy con này
Nếu có kinh nghiệm làm việc với Excel thì mấy chú virus macro cũng chẳng phải là cái gì ghê gớm

 

[huuthang_bd]

Virus Excel file thường được viết bằng macro 4 (ít thấy virus viết bằng VBA)
Mà với macro 4 thì dù có Enable macros hay Disable macros thì cũng chẳng ăn thua gì ---> Ngoài cảnh báo thông thường (dành cho file có chứa VBA code) thì đối với file chứa macro 4, nó còn có 1 cảnh báo chỉ có 2 nút Yes và No
- Nếu chọn Yes: Mở được file và chấp nhận nhiễm virus
- Nếu chọn No: không bị nhiễm virus nhưng đồng thời cũng không mở được file
Chính vậy mà không có cơ sở nào để kiểm tra file sắp mở là an toàn hay không!
Vậy chỉ có cách:
- Dùng các tool diệt virus để quét trước
- "Liều" mở file nếu tự tin là mình có thể diệt được mấy con này
Nếu có kinh nghiệm làm việc với Excel thì mấy chú virus macro cũng chẳng phải là cái gì ghê gớm

Chắc tại anh dùng Excel 2003. Tôi dùng Excel 2007 và vẫn mở file bình thường mà không cần phải Enable Macro.

 

[thuag9x]

mình thấy ai chơi không chúng ta rồi. chạy file excel thì chuong trinh duyet virut báo liền. dangerous

 

[nguyenmanhnam]

Hãy xóa sheet ẩn, name rác trong file thử xem! Đừng nói là không biết làm à nghen

File này em dùng chương trình DelName&Style trong bài http://www.giaiphapexcel.com/forum/...h-khi-cài-Phần-mềm-nó-cài-vào-ổ-D-thay-vì-ổ-C của thày diệt nhưng nó báo lỗi Erro 1004 ah. Mong thày chỉ cho nguyên nhân và cách làm.

 

[ndu96081631]

File này em dùng chương trình DelName&Style trong bài http://www.giaiphapexcel.com/forum/...h-khi-cài-Phần-mềm-nó-cài-vào-ổ-D-thay-vì-ổ-C của thày diệt nhưng nó báo lỗi Erro 1004 ah. Mong thày chỉ cho nguyên nhân và cách làm.

Bạn mở file rồi lưu nó thành định dạng xlsx (hoặc xlsm) trước chứ, xong hẳn chạy tool xóa name, style rác

 

[nguyenmanhnam]

Sao em xóa triệt để vấn còn 454kb

Em xóa hết rồi vẫn còn 454 kb, không triệt để được như thày mặc dù em đã xuất ra file xlsx rồi

 

[vu_tuan_manh_linh]

Đoạn code này hiện lên các sheet ẩn:

Sub UnHide_All_Sheets()
Dim Sh As Worksheet
For Each Sh In ActiveWorkbook.Worksheets
    If Sh.Visible = xlSheetHidden Or Sh.Visible = xlSheetVeryHidden Then Sh.Visible = xlSheetVisible
Next
End Sub

Sau khi hiện lên, xóa sheet có tên là một loạt số 00000, sau đó xóa name rác. Cần thiết thì xóa style rác nữa!! Mấy vụ xóa name với style này thì bác NDU nói nhiều quá rồi!

 

[nghiaphuc]

Đoạn code này hiện lên các sheet ẩn:

Sub UnHide_All_Sheets()
Dim Sh As Worksheet
For Each Sh In ActiveWorkbook.Worksheets
    If Sh.Visible = xlSheetHidden Or Sh.Visible = xlSheetVeryHidden Then Sh.Visible = xlSheetVisible
Next
End Sub

Sau khi hiện lên, xóa sheet có tên là một loạt số 00000, sau đó xóa name rác. Cần thiết thì xóa style rác nữa!! Mấy vụ xóa name với style này thì bác NDU nói nhiều quá rồi!

"Bắt giò" bạn hiền một chút: Đã muốn hiện tất cả sheet thì If làm gì cho mất công, cứ Sh.Visible = xlSheetVisible là được rồi. Hoặc như muốn If thì thế này sẽ gọn hơn một chút: If Sh.Visible <> -1 Then Sh.Visible = -1

 

[ndu96081631]

Em xóa hết rồi vẫn còn 454 kb, không triệt để được như thày mặc dù em đã xuất ra file xlsx rồi

Chịu cực clear dữ liệu nữa mới sạch:
- Clear sạch từ sau cột cuối cùng có dữ liệu đến cột cuối của bạn tính
- Clear sạch từ sau dòng cuối cùng có dữ liệu đến dòng cuối của bạn tính
- Làm vậy cho cả 2 sheet
- Lưu lại rồi kiểm tra dung lượng
-------------------------

"Bắt giò" bạn hiền một chút: Đã muốn hiện tất cả sheet thì If làm gì cho mất công, cứ Sh.Visible = xlSheetVisible là được rồi.

Công việc kiểm tra bao giờ cũng NHẸ NHÀNG hơn thực thi công việc mà. Tức nếu có 100 sheet, trong đó chỉ có 2 sheet ẩn thì làm như bài 23 sẽ nhanh hơn
Đương nhiên đó là lý thuyết, còn tùy thực tế mà "hành" cho hợp lý (chỉ vài sheet thì chẳng if làm quái gì)

 

[nghiaphuc]

Em xóa hết rồi vẫn còn 454 kb, không triệt để được như thày mặc dù em đã xuất ra file xlsx rồi

Chịu cực clear dữ liệu nữa mới sạch:
- Clear sạch từ sau cột cuối cùng có dữ liệu đến cột cuối của bạn tính
- Clear sạch từ sau dòng cuối cùng có dữ liệu đến dòng cuối của bạn tính
- Làm vậy cho cả 2 sheet
- Lưu lại rồi kiểm tra dung lượng

Để tham khảo code cho việc trên, bạn nguyenmanhnam có thể đọc tại topic này: Làm giảm dung lượng tập tin Excel