Microsoft Office Excel 2003 - Define name
Posted: Tue, 30/12/2014 9:54 AM
Xoá tất cả các Define name (Từ menu Insert -> Name -> Define trong MS - Excel 2003). Từ Menu thanh công cụ vào Tools -> Marco -> Microsoft Visual Basic tạo Module mới với lệnh như dưới đây rồi chạy Run là OK
Sub DeleteDeadNames()
Dim nName As Name
For Each nName In Names
If InStr(1, nName.RefersTo, "#REF!") > 0 Then
nName.Delete
End If
Next nName
End Sub
Sub DeleteDeadNames()
Dim nName As Name
For Each nName In Names
If InStr(1, nName.RefersTo, "#REF!") > 0 Then
nName.Delete
End If
Next nName
End Sub