Displaying all Named Ranges in workbook
 

Programmatically, how do I get all of the named ranges in the workbook to be
displayed on my Sheet1. I have named ranges that are workbook specific and
worksheet specific. I'd like to know the sheet that they are specific to if
they are present.

Thanks,

Displaying all Named Ranges in workbook
 

Sub listnames()
Application.Calculation = xlManual
For Each n In ThisWorkbook.Names
lr = Cells(Rows.Count, "a").End(xlUp).Row + 1
Cells(lr, 1) = n.Name
Cells(lr, 2) = n
Next
Application.Calculation = xlAutomatic
End Sub


--
Don Guillett
SalesAid Software

"Barb Reinhardt" wrote in message
...
Programmatically, how do I get all of the named ranges in the workbook to
be
displayed on my Sheet1. I have named ranges that are workbook specific
and
worksheet specific. I'd like to know the sheet that they are specific to
if
they are present.

Thanks,

Displaying all Named Ranges in workbook
 

Anything after the ! in column 2 is not being displayed. What needs to be
changed?

Thanks

"Don Guillett" wrote:

Sub listnames()
Application.Calculation = xlManual
For Each n In ThisWorkbook.Names
lr = Cells(Rows.Count, "a").End(xlUp).Row + 1
Cells(lr, 1) = n.Name
Cells(lr, 2) = n
Next
Application.Calculation = xlAutomatic
End Sub


--
Don Guillett
SalesAid Software

"Barb Reinhardt" wrote in message
...
Programmatically, how do I get all of the named ranges in the workbook to
be
displayed on my Sheet1. I have named ranges that are workbook specific
and
worksheet specific. I'd like to know the sheet that they are specific to
if
they are present.

Thanks,

Displaying all Named Ranges in workbook
 

Barb,

Get a hold of Jan Karel Pieterse's Namemanager utility
http://www.jkp-ads.com/OfficeMarketPlaceNM-EN.asp

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Barb Reinhardt" wrote in message
...
Programmatically, how do I get all of the named ranges in the workbook to
be
displayed on my Sheet1. I have named ranges that are workbook specific
and
worksheet specific. I'd like to know the sheet that they are specific to
if
they are present.

Thanks,

Displaying all Named Ranges in workbook
 

widen the column?

--
Don Guillett
SalesAid Software

"Barb Reinhardt" wrote in message
...
Anything after the ! in column 2 is not being displayed. What needs to
be
changed?

Thanks

"Don Guillett" wrote:

Sub listnames()
Application.Calculation = xlManual
For Each n In ThisWorkbook.Names
lr = Cells(Rows.Count, "a").End(xlUp).Row + 1
Cells(lr, 1) = n.Name
Cells(lr, 2) = n
Next
Application.Calculation = xlAutomatic
End Sub


--
Don Guillett
SalesAid Software

"Barb Reinhardt" wrote in
message
...
Programmatically, how do I get all of the named ranges in the workbook
to
be
displayed on my Sheet1. I have named ranges that are workbook
specific
and
worksheet specific. I'd like to know the sheet that they are specific
to
if
they are present.

Thanks,