문서 검사기에서 통합 문서에서 숨겨진 이름을 찾았습니다. 이러한 이름은 해 찾기 시나리오에 대한 숨겨진 정보를 저장할 수 있습니다. 예를 들어 해 찾기 추가 기능을 사용하여 시나리오를 실행하는 경우 계산 매개 변수 및 기타 중요한 데이터에 대한 정보를 통합 문서에 숨겨진 이름으로 저장할 수 있습니다.
중요: Microsoft는 명시적이거나 묵시적인 보증 없이 설명용으로만 프로그래밍 예제를 제공합니다. 여기에는 상품성 또는 특정 목적에의 적합성에 대한 묵시적 보증이 포함되지만 이에 국한되지 않습니다. 이 문서에서는 설명 중인 프로그래밍 언어와 프로시저를 만들고 디버깅하는 데 사용되는 도구에 대해 잘 알고 있다고 가정합니다. Microsoft 지원 엔지니어는 사용자에게 도움이 되도록 특정 프로시저에 대한 기능을 설명할 수 있지만 사용자의 특정 요구 사항에 맞도록 예제를 수정하여 추가 기능을 제공하거나 프로시저를 구성하지는 않습니다.
문제
문서 검사기에서 이러한 숨겨진 이름을 제거할 수 없습니다.
권장 해결 방법
다음 매크로를 실행하여 숨겨진 이름을 제거합니다. 매크로는 세 개의 항목을 나열하는 메시지 상자를 표시합니다. (1) 정의된 이름이 표시되는지 숨겨지는지 여부, (2) 정의된 이름 및 (3) 해당 이름이 참조하는 항목(통합 문서 셀 참조). 예 또는 아니요를 선택하여 삭제하거나 정의된 각 이름을 유지할 수 있습니다.
참고: 이 매크로를 사용하여 숨겨진 이름을 제거하는 경우 추가 기능(예: 해 찾기) 또는 매크로가 예상대로 작동하지 않을 수 있으며 연결된 숨겨진 데이터가 손실될 수 있습니다. 이 매크로는 해 찾기에서 추가한 이름뿐만 아니라 숨겨진 정의된 이름에도 영향을 줍니다.
주의: 시트 이름에 공백이 포함된 경우 정의된 이름을 삭제하려고 할 때 오류가 발생할 수 있습니다.
숨겨진 이름 제거
' Module to remove all hidden names on active workbook
Sub Remove_Hidden_Names()
' Dimension variables.
Dim xName As Variant
Dim Result As Variant
Dim Vis As Variant
' Loop once for each name in the workbook.
For Each xName In ActiveWorkbook.Names
'If a name is not visible (it is hidden)...
If xName.Visible = True Then
Vis = "Visible"
Else
Vis = "Hidden"
End If
' ...ask whether or not to delete the name.
Result = MsgBox(prompt:="Delete " & Vis & " Name " & _
Chr(10) & xName.Name & "?" & Chr(10) & _
"Which refers to: " & Chr(10) & xName.RefersTo, _
Buttons:=vbYesNo)
' If the result is true, then delete the name.
If Result = vbYes Then xName.Delete
' Loop to the next name.
Next xName
End Sub
