Test for membership in sheets collection
You could use a function from Chip Pearson to test the existence of a sheet.
Function WorksheetExists(SheetName As Variant, _
Optional WhichBook As Workbook) As Boolean
'from Chip Pearson
Dim WB As Workbook
Set WB = IIf(WhichBook Is Nothing, ThisWorkbook, WhichBook)
On Error Resume Next
WorksheetExists = CBool(Len(WB.Worksheets(SheetName).Name) 0)
End Function
'and you can use it like:
....
if worksheetexists("myname",activeworkbook) then
Tom wrote:
I want to test the worksheets collection for a specific worksheet name.
True/False response is what I'm loking for.
Suggestions?
--
Dave Peterson
|