How To Search & Select A Worksheet By Name

I have set a String Variable as a worksheet name in one workbook and I want to find that worksheet name in another workbook that I have opened using VBA to write data to it.

When I try to use the variable, it gives me a Run-time error 9 Subscript out of Range.
Part of my code

Dim strSheetName As String
strSheetName = ActiveSheet.Name { This is on the ist WorkBook}

Application.Workbooks("Customers-2008").Activate { This is on the 2nd WorkBook}

MsgBox ("Here is " & strSheetName & " "") { This is to see if strSheetName is passed} It is

This is where the problem is on the new Workbook
Sheets("strSheetName").Select

How can I select the value of strSheetName which is the sheetname that I want to select