Ved hjælp af Macro, åben Excels Open funktion

Jeg prøver at lave nogle shortcuts til de mapper jeg bruger mest i excel og have lavet en macro som godt nok åbner Excel's Open funktion, men den tillader mig ikke at åbne et vilkårligt regneark.

Macro'en ser således ud:

Sub Dagcspmazda()

'
    ChDir "W:\WHOLESALE (Forhandler bogholderi)\mazda\CSP"
    Application.GetOpenFilename
End Sub

Den kommer ikke op med en fejl, den åbner bare ikke arket som jeg dobbelt klikker på.