Convert String to a Worksheet type variable

D

Dave Peterson

Dim Wks as worksheet
dim myName as string

myname = "hi there"

set wks = nothing
on error resume next
set wks = activeworkbook.worksheets(myname)
on error goto 0

if wks is nothing then
msgbox "no such name in the activeworkbook"
else
'ok
end if
 
Top