here are some examples

Sub name_ranges3() ' dumps all named ranges
Dim nm As Name

For Each nm In ThisWorkbook.Names
Debug.Print Range(nm).Parent.Name ' will give the sheet name of the
range
Debug.Print nm.Parent.Name ' will give the workbook name
Debug.Print nm.Name ' will give the range name
Next nm
End Sub

--


Gary


"Don Wiss" wrote in message
...
I was looking for a property that returned what sheet a range was on. I
didn't find it. So I wrote a simple function that plucked the sheetname
from the range.name. But is there a property that I didn't find?

Don <www.donwiss.com (e-mail link at home page bottom).