Không delete được Name lạ

Liên hệ QC

mymichau

Thành viên hoạt động
Tham gia
28/11/06
Bài viết
172
Được thích
114
Trong tập tin Excel của em hiện nay, khi được Open thì chương trình WarningMacro báo có 5 Name lạ ( trong Define Name thì không thấy ):
1/ "Ten sheet 1!" Fỉlte DataBase
2/ "Ten sheet 2!" Fỉlte DataBase
3/ "Ten sheet 1!" OLE_link1
4/ "Ten sheet 1!" OLE_link2
5/ "Ten sheet 2!" Print_Tiles
Sau đó em đã xóa chúng, nhưng Open lại vẫn thấy 5 name trên. Vậy có phải là do Virus tạo ra không, và có cách nào diệt được.
 
Đúng là do virus rồi. Bạn gửi file lên đây đế mọi người giúp bạn.
 
Trong tập tin Excel của em hiện nay, khi được Open thì chương trình WarningMacro báo có 5 Name lạ ( trong Define Name thì không thấy ):
1/ "Ten sheet 1!" Fỉlte DataBase
2/ "Ten sheet 2!" Fỉlte DataBase
3/ "Ten sheet 1!" OLE_link1
4/ "Ten sheet 1!" OLE_link2
5/ "Ten sheet 2!" Print_Tiles
Sau đó em đã xóa chúng, nhưng Open lại vẫn thấy 5 name trên. Vậy có phải là do Virus tạo ra không, và có cách nào diệt được.

Chưa hẳn là do virus đâu
Cũng có thể đây là name do VBA có trong file tạo ra vì 1 mục đích nào đó mà bạn chưa khám phá ra
Post file lên thì anh em mwí có thể nghiên cứu và nói chính xác được
 
File thuộc dạng bảo mật nên không gởi lên diễn đàn được. Các anh nào có kinh nghiệm hay chương trình gì mách bảo giúp. Xim cảm ơn nhiều.
 
Vậy chỉ có cách là bạn gửi file này cho thành viên nào bạn tinh tưởng và nghĩ rằng có thể giải quyết được tình huống này thôi!
 
Lần chỉnh sửa cuối:
File thuộc dạng bảo mật nên không gởi lên diễn đàn được. Các anh nào có kinh nghiệm hay chương trình gì mách bảo giúp. Xim cảm ơn nhiều.

Bạn xóa dữ liệu mật đi, ghi dữ liệu dổm vào, có ảnh hưởng gì đâu, ai biết mà sợ lộ

Lưu thành file mới để gửi, file gốc bạn cất đi
 
Nhìn chung là file này có vấn đề rồi, khả năng virus rất cao.
 
Em xin gởi file lên, nhờ các anh xem và xử lý giúp
 

File đính kèm

  • Name .zip
    78.1 KB · Đọc: 27

File đính kèm

  • Copy of Name .rar
    55.8 KB · Đọc: 10
Bạn xem lại file đính kèm. Các Name lạ mà bạn nói hình như bị #REF hết rồi. Mình Dùng Excel 2007 để xóa các name đó, vì trong Excel 2003 không thấy!

Vì đó là các Name Sheet (Name cục bộ, chỉ sử dụng cho 1 Sheet thôi), vì vậy chỉ khi Sheet đó Active thì mới thấy.

VD : Xóa tất cả các name:

PHP:
Sub DeleteAllName()
    On Error Resume Next
    Dim i As Long, SoName As Long, Tyle As Long
    Dim OldStatus As Boolean
    Dim Sh As Worksheet
    Dim NSh As Name
    Application.ReferenceStyle = xlR1C1
    For Each NSh In ActiveWorkbook.Names
            NSh.Delete
    Next
    For Each Sh In ActiveWorkbook.Sheets
        Sh.Select
        For Each NSh In Sh.Names
            NSh.Delete
        Next
    Next
    Application.ReferenceStyle = xlA1
End Sub

Thân!
 
Web KT
Back
Top Bottom