View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
ainbinder ainbinder is offline
external usenet poster
 
Posts: 2
Default Check Worksheet Name and Select if Meets Criteria

Hi everyone, i have what i think is a very easy question. I'm trying
to select all the worksheets in my workbook that start with the
"Data". i wrote this vba code, and even though i put a watch on the
left formula and it shows "Data" in the watch window, it never selects
the sheet. Any help would be much appreciated!!!!

Sub SelectCockpit()
'
' Selects all tabs with cockpit in first 6 digits

Dim wksSheet As Worksheet

Sheets(1).Activate
For Each wksSheet In Worksheets
If Left(wksSheet.Name, 4) = "Data" Then
wksSheet.Select
End If
Next wksSheet