Jun 02, 15 · Code Sub FindWS () Dim strWSName As String strWSName = InputBox ("Enter the sheet name to serach for") If strWSName = vbNullString Then MsgBox "You cancelled!" Exit Sub End If If SheetExists (strWSName) Then Worksheets (strWSName)Activate Else MsgBox "That sheet name does not exist!"The ordinalIndex is taken by the order they are displayed in the name tab queue in the worksheet window While it is uncommon to rename aCodeName, it is not impossibleThe following image shows the VBA Project window (CtrlR) which lists the worksheets byCodeName then byName (in brackets) The order they are displayed does not change;
Excel Vba Code To Get All Sheets Names Into First Sheet Comexcelhub