Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Determines if a given worksheet name exists in a workbook

Private Function WorksheetExists(wb As Workbook, sName As String) _      As Boolean      Dim s As String      On Error GoTo WorksheetExistsErr      s = wb.Worksheets(sName).Name      WorksheetExists = True      Exit Function  WorksheetExistsErr:      WorksheetExists = False  End Function