File does not exist"

[sp00kster]

Any reason the following code does not find the Excel file? If I force workbook open I get run-time error 1004.
Actual address from address bar = C:\Users\dell\Dropbox\Prefab\Common\Reminder.xlsm. Thanks in advance

Sub OpenReminders()
    Dim y As Workbook
    Dim Root As String
    Dim sPath As String
    Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
    Root = Left(ThisWorkbook.Path, InStr(1, ThisWorkbook.Path, ":\"))
    sPath = Root & Application.PathSeparator & "Users\del\Dropbox\Prefab\Common\" & "Reminder.xlsm"
    'MsgBox sPath
    If fso.FileExists(sPath) Then 'Testing for existance of reminder.xlsm
        MsgBox "yes does exist"
        Set y = Workbooks.Open(sPath)
    Else
        MsgBox "no does not exist"
    End If
End Sub

I am bad at Excel and this forum saves my but - lol

 

[sp00kster]

Never mind - read and re-read b4 posting just to find dell spelled wrong in code - thanks

 

[Michael M]

Ha....I was just about jump on the typo...?