Note: The other languages of the website are Google-translated. Back to English

Як швидко видалити всі названі діапазони в Excel?

Припускаючи, що ви створили багато іменованих діапазонів у своїй книзі, але тепер вам більше не потрібні тези з іменованими діапазонами, як ви можете видалити всі названі діапазони одночасно в Excel?


Видаліть усі іменовані діапазони, перейшовши до диспетчера імен

У діалоговому вікні Менеджер імен ви можете створювати, редагувати та видаляти названі діапазони як завгодно. Будь ласка, зробіть так:

1. Іди до Менеджер імен натиснувши Formula > Менеджер імен, див. скріншот:
doc-delete-named-ranges1

2, в Менеджер імен діалогове вікно, натисніть Shift , щоб вибрати всі названі діапазони або утримувати Ctrl клавіша для вибору тих, які вам не потрібні, див. знімок екрана:
doc-delete-named-ranges1

3. А потім клацніть видаляти у верхній частині діалогового вікна, і з'явиться підказка з нагадуванням, якщо ви впевнені, що ви видалите імена.
doc-delete-named-ranges1

4. Потім натисніть OK, усі названі діапазони були видалені відразу.

doc-delete-named-ranges4 -2 doc-delete-named-ranges5

Знайдіть і замініть усі названі діапазони відповідними посиланнями на клітинки у формулах

Kutools for ExcelАвтора Замініть назви діапазонів Утиліта може легко знайти всі формули, що застосовують іменовані діапазони у вибраному діапазоні, певному аркуші або всіх аркушах. І основна роль цієї утиліти - замінити всі названі діапазони відповідними посиланнями на клітинки у цих формулах.


оголошення замінює іменований діапазон 1

Kutools for Excel - Включає понад 300 зручних інструментів для Excel. Повна безкоштовна пробна версія 30-день, кредитна картка не потрібна! Get It Now

Видаліть усі іменовані діапазони за допомогою коду VBA

Наступний короткий код VBA також може допомогти вам видалити всі названі діапазони з книги.

1. Утримуйте клавішу ALT + F11 і відкриває Вікно Microsoft Visual Basic для програм.

2. Клацання Insert > Модуліта вставте наступний код у Вікно модуля.

Код VBA: Видаліть усі названі діапазони в Excel

Sub DeleteNames()
'Update 20140314
Dim xName As Name
For Each xName In Application.ActiveWorkbook.Names
    xName.Delete
Next
End Sub

3. Потім натисніть F5 для запуску цього коду, всі імена з книги буде негайно видалено.


Статті по темі:


Найкращі інструменти для підвищення продуктивності офісу

Kutools for Excel Вирішує більшість ваших проблем і підвищує вашу продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (6)
Поки немає оцінок. Оцініть першим!
Цей коментар був мінімізований модератором на сайті
Коли я намагаюся запустити наведений вище код VBA, я отримую таку помилку:

Помилка під час виконання "1004"
Синтаксис цього імені неправильний.

Перевірте, чи назва:
- Починається з літери або підкреслення
- Не містить пробілу чи символу, які заборонені
- Не суперечить існуючому імені в книзі
Цей коментар був мінімізований модератором на сайті
Як щодо чогось більш конкретного.

Спочатку визначте всі невикористані іменовані діапазони для перегляду.

По-друге, макрос для видалення всіх невикористаних іменованих діапазонів.
Цей коментар був мінімізований модератором на сайті
Помилка виконання 7
недостатньо помяті
Цей коментар був мінімізований модератором на сайті
Привіт, Муралі
Я перевірив код, він добре працює в моїй робочій книзі.
Чи можете ви завантажити свою робочу книжку сюди, щоб ми могли перевірити, де проблема?

Дякую!
Цей коментар був мінімізований модератором на сайті
Вам слід перевірити, чи це внутрішній захищений діапазон імен
`` `
Sub DeleteNames()
Dim xName як ім'я
Для кожного xName в Application.ActiveWorkbook.Names
If Split(xName.Name, ".")(0) <> "_xlfn" Тоді
xName.Delete
End If
Далі
End Sub
`` `
Цей коментар був мінімізований модератором на сайті

Sub DeleteNames()
    Dim xName As Name
    For Each xName In Application.ActiveWorkbook.Names
        If Split(xName.Name, ".")(0) <> "_xlfn" Then
            xName.Delete
        End If
    Next
End Sub
There are no comments posted here yet

Слідуй за нами

Copyright © 2009 - WWW.extendoffice.com. | Всі права захищені. На основі ExtendOffice. | Карта сайту
Microsoft та логотип Office є товарними знаками або зареєстрованими товарними знаками Microsoft Corporation у США та / або інших країнах.
Захищений Sectigo SSL