How about either

making the range name equal to all the 65,000+ rows in the applicable columns

or add one row extra to the range names and have the new data added in to
the row above that last, blank row. You can find that row using
Selection.End(xlDown).select
Activecell.offset(1,0).select

Bill

"Raul" wrote:

I have a number of named ranges in a workbook, and these ranges need to be
updated as new data is added. Is there a way to select all the named ranges
in a workbook and read the contents in the "refers to:" field? As an aside,
could these ranges be set up to be dynamic so they will update themselves to
fit the data?

Thanks in advance,
Raul