Xoá dữ liệu trong hộp Name

  • Thread starter nmh_phocu
  • Ngày gửi
N

nmh_phocu

User đã bị cấm truy cập
20/12/05
244
0
0
Hà nội
Cứu mình với
Hộp Define/Name trong Insert ở Excel có rất rất nhiều tên của dãy linh tinh, xoá từng cái mất rất nhiều thời gian, mình cũng chẳng hiểu từ đâu nó có. Giúp mình với : - Xoá tất cả đi để mình lập cái mới.
- Lý do gì mà nhiều cái tinh linh thế, do minh ấn phím lăng nhăng à
Giúp khẩn cấp
Cảm ơn nhiều mũ n lần ( n= vô cùng)
 
Khóa học Quản trị dòng tiền
adam_tran

adam_tran

Guitar inspiration
17/5/05
1,374
36
48
46
Goooogle
Bạn có thể vào đây để download Add-In NameManager về để dùng.

http://webketoan.com/thuvien/index.php?subcat=23&PHPSESSID=300f68170b3fcccc347a8e8b24d9776a

Hoặc bạn có thể chạy macro sau:

Sub DelAllName()
Dim nName As Name
On Error Resume Next
If MsgBox("Ban muon xoa het Name khong?", vbYesNo) = vbYes Then
For Each nName In ActiveWorkbook.Names
nName.Delete
Next nName
End If
End Sub

Bạn lưu ý là file xuất hiện những Name lạ, tên như chữ ả rập v...v thì coi chừng file đã bị virus.
Chúc thành công!
 
Sửa lần cuối:
N

nmh_phocu

User đã bị cấm truy cập
20/12/05
244
0
0
Hà nội
adam_tran nói:
Bạn có thể vào đây để download Add-In NameManager về để dùng.

http://webketoan.com/thuvien/index.php?subcat=23&PHPSESSID=300f68170b3fcccc347a8e8b24d9776a

Hoặc bạn có thể chạy macro sau:

Sub DelAllName()
Dim nName As Name
On Error Resume Next
If MsgBox("Ban muon xoa het Name khong?", vbYesNo) = vbYes Then
For Each nName In ActiveWorkbook.Names
nName.Delete
Next nName
End If
End Sub

Bạn lưu ý là file xuất hiện những Name lạ, tên như chữ ả rập v...v thì coi chừng file đã bị virus.
Chúc thành công!
Vâng, có thể file của em đã bị nhiễm vi rút, em không diệt được con này, em đã phải sống chung với lũ lâu lắm rồi.
Em đã thử xoá một vài cái nhưng không xoá được.
Lại đành phải sống chung với lũ thôi
Cảm ơn bác nhiều nhiều nha
Em của bác
 

Xem nhiều

Webketoan Zalo OA