Конфликтные имена при копировании листа (dan20, dan3, B12)

[nemoomen]

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

ActiveWorkbook.Sheets("B_Tsh_1").Co py After:=Workbooks(Dest).Sheets(1)

появляется вот такое сообщение

Foto.jpg
по два раза упомянуты некие диапазоны B12, dan3, dan20
В базовой книге, конечно, много имен. И все они нужны, но именно этих нет. Непонятно что это за имена.
Кто сталкивался с похожей проблемой и как ее обойти?

[Hugo121]

Если эти имена не нужны - удалите.
Если нужны - переименуйте.
Имена могут быть скрытыми.

[nemoomen]

не знал раньше про скрытые имена.
при помощи кода

Sub rty()
Dim n As Name
For Each n In ThisWorkbook.Names
n.Visible = True
Next
End Sub

открыл все скрытые имена и удалил их.
пересохранил файл.
проблема решена.
Всем спасибо!