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

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

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

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

Ось код для виділення всіх названих діапазонів у книзі, ви можете зробити це так:

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

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

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

Sub HighlightRange()
'Update 20140317
Dim xName As Name
Dim Rng As Range
On Error Resume Next
For Each xName In Application.ActiveWorkbook.Names
    Set Rng = xName.RefersToRange
    Rng.Interior.ColorIndex = 6
Next
End Sub

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

Примітки:

1. Якщо ви хочете заповнити названі діапазони іншими кольорами, вам просто потрібно змінити Кольоровий індекс = 6 як тобі до вподоби.

2. Після застосування цього коду всі вихідні кольори в названих діапазонах скасовуються та покриваються цим новим кольором.

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

Як виділити всі проміжні підрядні відразу в Excel?

Як виділити всі комірки помилок у Excel?

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