Excel скрытые имена что это

Ребята, я только что тоже потестировал.  
Выяснил, что скрытые имена, оканчивающиеся на !_FilterDatabase , удалять нельзя — перестают работать установленные автофильтры.  
А не скрытое имя области печати — Print_Area — тоже удалять не стоит, наверное.  
Поэтому я слепил такой макрос:  

  Sub EraseNames()   ‘ очистка списка имен диапазонов  
  Dim nM As Name  
  For Each nM In ActiveWorkbook.Names  
     If Not nM.Visible Then  
        If Not nM.Name Like «*!_FilterDatabase» Then nM.Delete ‘ удалить все скрытые имена диапазонов кроме фильтров  
     Else  
        If Not nM.Name Like «*!Print_Area» Then  
           Select Case MsgBox(«Удалить имя диапазона:» & vbCrLf & vbCrLf _  
                              & nM.Name & nM.RefersTo, vbYesNoCancel + vbQuestion)  
              Case vbYes: nM.Delete  
              Case vbCancel: Exit Sub  
           End Select  
        End If  
     End If  
  Next nM  
End Sub

Привет. Рад представить вам подробные инструкции по удалению скрытых имен в Excel. Возможно, вы столкнулись с ситуацией, когда при копировании листа в книгу Excel произошла ошибка, в которой говорилось, что имя уже существует и вам нужно выбрать новое или использовать его. Хорошо, если таких ошибок будет 2-3, а если их несколько сотен или тысяч, терпения не хватит, чтобы нажать ОК. Воспользовавшись приведенным ниже советом, вы навсегда избавитесь от ошибки! Итак, приступим:

1. Создание макроса удаления скрытых имен.

Я не нашел в Excel встроенной функции для решения этой проблемы, но есть замечательный макрос, с помощью которого мы избавимся от нее. Сначала вам нужно перейти в редактор макросов, для этого запустить Excel, открыть файл с проблемой и нажать ALT + F11. Откроется Microsoft Visual Basic для приложений, поэтому перейдите в меню «Вставка» и выберите «Модуль.

Откроется окно модуля. Вы должны поместить туда следующий код макроса:

Sub Удалить скрытые имена()
Dim n As Name
Dim Считается целым числом
В случае ошибки Продолжить Далее
Для каждого n в ActiveWorkbook.Names
Если не видно, то
n. Удалить
Счетчик = Счетчик + 1
Конец, если
Следующий n
MsgBox «Количество скрытых имен» & Количество & «Удалено»
Конец подзаголовка

Следовательно, это должно выглядеть так:

Хороший. Мы создали макрос, теперь осталось его применить.

2. Использование макроса для удаления скрытых имен в Excel.

Вернитесь в нашу книгу Excel, перейдите в меню «Просмотр», выберите там блок макросов и щелкните внутри него меню «Макросы.

В открывшемся меню выберите макрос «Удалить скрытые имена» и нажмите кнопку «Выполнить.

Макрос будет работать некоторое время (чем больше скрытых имен у вас в файле, тем дольше он будет работать) и отобразит сообщение о том, сколько имен было удалено. Поздравляю, вы избавились от проблемы и можете спокойно копировать листы.

Макрос отработает некоторое время (чем больше скрытых имен у Вас в файле, тем дольше он будет работать) и выдаст сообщение о том, сколько имен было удалено. Поздравляю Вы избавились от проблемы и можете смело копировать листы.

Я надеюсь что эта инструкция Вам помогла, заходите на сайт почаще — здесь много еще чего полезного для Эксель найдете. Есть вопросы — смело пишите их в комментариях к статье.