Unable to activate a workbook

[Wooders]

I am trying to open and activate a workbook from an already open workbook. I select a workbook to open using the Open Dialogue box as I don't know the location of the target file plus the name of the file changes regularly.
Once selected and open, I am not able to activate it to work on it.

My MsgBox is for testing and it shows the correct name of the target file but the active workbook remains that of the original file containing my code.

My code is

Sub openUpdate()
Dim strFile As String
On Error Resume Next
strFile = Application.GetOpenFilename(FileFilter:="Excel files (*.xl*),*.xl*", Title:="Select the Daily Update File")
strFile = Split(strFile, "\")(UBound(Split(strFile, "\")))
Workbooks(strFile).Activate
MsgBox (strFile & " " & ActiveWorkbook.Name)
End Sub

 

[mohadin]

No need to activate the newly opened workbook, already activated
Any way
Use something like

 Windows.Workbooks(strFile).Activate

 

[Fluff]

The code you've posted isn't opening the other workbook, which is why you cannot activate it.
Is that all your code?

 

[Wooders]

The code you've posted isn't opening the other workbook, which is why you cannot activate it.
Is that all your code?

Well spotted Fluff. I just needed to add Workbooks.Open (strFile).
DOH! I was getting tied in a knot trying to get the filename in a format that Open could address and then left the command out.
Thank you.

 

[Fluff]

Glad we could help & thanks for the feedback.