Hur markerar jag alla namngivna områden i Excel?

För något ändamål kan vi i Excel alltid skapa några intervallnamn för en rad celler. Ibland vill vi veta var de angivna intervallen finns i hela arbetsboken och markera dem. Det enklaste sättet för oss är att klicka på intervallnamnen i namnrutan för att välja intervall och fylla färgen till det. Men om det finns många namngivna intervall i arbetsboken kommer den här metoden att vara tidskrävande. Hur kunde vi markera alla de nämnda intervallen i Excel på en gång?

Markera alla namngivna områden med VBA-kod

Markera alla namngivna områden med VBA-kod

Här är en kod för att markera alla namngivna intervall i en arbetsbok, du kan göra så här:

1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic for Applications-fönstret.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.

VBA-kod: Markera alla namngivna områden i 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. Tryck sedan på F5 nyckel för att köra den här koden, och alla namngivna intervall har markerats med gul färg i hela arbetsboken.

Anmärkningar:

1. Om du vill fylla de namngivna områdena med andra färger behöver du bara ändra ColorIndex = 6 som du vill.

2. Efter att ha använt den här koden avbryts alla originalfärger i de angivna intervallen och täcks av den nya färgen.

Relaterade artiklar:

Hur markerar jag alla delsummorader samtidigt i Excel?

Hur markerar jag alla felceller i Excel?

Hur markerar jag celler med externa länkar i Excel?