Using a Function to Check for the Existence of a Code Name : Worksheet « Excel « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Excel
  3. Worksheet

Using a Function to Check for the Existence of a Code Name

 
Function WorksheetCodeNameExists(wb As Workbook, sCodeName As String) As Boolean 
    Dim s As String 
    Dim ws As Worksheet 

    WorksheetCodeNameExists = False 
    For Each ws In wb.Worksheets 
        If StrComp(ws.CodeName, sCodeName, vbTextCompare) = 0 Then 
            WorksheetCodeNameExists = True 
            Exit For 
        End If 
    Next 
    Set ws = Nothing 
End Function








Related examples in the same category

1.Select Entire Sheet
2.Get Worksheets count in a Workbook
3.Get Worksheet name
4.changes the value of the Name property of the first worksheet in the first workbook of the Excel application:
5.Gives indexes of sheets
6.Inserts a new sheet after each sheet
7.Loop through all worksheets in workbook and reset values in a specific range on each sheet.
8.Group sheets together
9.Reference worksheet across worksheet
10.Determines if a given worksheet name exists in a workbook
11.Activate last sheet
12.Activate first sheet
13.Reference a worksheet from a workbook
14.Safely Deleting Worksheets Using the DeleteSheet Function
15.Using the Parent Property to Obtain a Reference to an Object's Parent Object