View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
KIM W KIM W is offline
external usenet poster
 
Posts: 52
Default Check if Range EXISTS

Thank you-- this checking for range name worked just fine.
KIM W.

"Barb Reinhardt" wrote:

You could do something like this

Dim myRange as Excel.Range
Dim myWS as Excel.Worksheet

for each myWS in ActiveWorkbook.Worksheets
Set myRange = nothing
on error resume next
Set myRange = myWS.Range("YourRange")
On Error GoTo 0
If Not myRange is Nothing then
'Range exists
else
'Range does not exist
end if
next myWS

"KIM W" wrote:

How can I verify if a range exists on a worksheet?
I am looping through all worksheets retrieving worksheet name info from a
range, but I don't want to include worksheets without the specified named
range. THe same name is used on each worksheet with scope limikted to the
worksheet.