Activating Sheet Whose Name Contained In Variable

I am attempting to use the code below to activate a sheet whose name is contained in a variable. The line in Bold gives me a "Subscript out of range" error even though the variables seam correct in the debugger.

Code:
Private Sub GetFromArchive_Click()
Dim wkb As Workbook
Dim strPath As String: strPath = "M:EfpDocsArchivesESI Processing Log Master Archive.xls"
Dim lngListItem As Long, lngSelected As Long
Dim varSheets() As String

[Code] .......