trying to find workbook with worksheet that has same name. Ending of
name may vary, but starts off as code indicates.
Code doesn't work... any clues?
Sub GotoSheetA1onSheetNamedX()
Dim wb As Workbook
On Error Resume Next
For Each wb In Application.Workbooks
wb.Worksheets("2ndex_to*").Activate
wb.Worksheets("2ndex_to*").Range("A1").Select
Next
End Sub