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,

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,

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,

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,

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,