Named Ranges

[robfo0]

Does anyone know a quick way to print ALL of the named ranges that i have in my workbook? i need a list of them

Thanks

[Russell Hauf]

Try this:

Sub NameList()
    Dim nm As Name
    
    For Each nm In ActiveWorkbook.Names
        Debug.Print nm.Name
    Next nm

End Sub

This just prints them to the immediate window in the VB editor...you can also have it print to a worksheet.

HTH,

Russell

[Mark W.]

Get ASAP Utilities freeware add-in at www.asap-utilities.com. It's "Information | List all range names" menu command should do the trick.

It has lots of other features that make it well worth the trip.

[ This Message was edited by: Mark W. on 2002-03-22 15:30 ]

[Mudface]

Depending on where you want them, the following code should work OK, Names in column A, ranges they refer to in column B. Change to where you want them displayed: -

Public Sub NameAll()

Sheet1.Range("A1").ListNames

End Sub

[Russell Hauf]

On 2002-03-22 15:30, Mudface wrote:
Depending on where you want them, the following code should work OK, Names in column A, ranges they refer to in column B. Change to where you want them displayed: -

Public Sub NameAll()

Sheet1.Range("A1").ListNames

End Sub

I like it!

[robfo0]

Thanks guys.

Mudface, your solution was perfect!