Abrir Archivo!!

Hola a todos!!!
Tengo este codigo que baje de una pagina para abrir archivo:

Sub OpenF()
Dim wb As Workbook
Fname = Application.GetOpenFilename("Todos Los Archivos,*.*", , "Abrir
El Archivo a Trabajar")
If Fname = False Then Exit Sub
For Each wb In Application.Workbooks
If wb.Path & "\" & wb.Name = Fname Then
MsgBox "Archivo " & wb.Name & " Ya esta Abierto", vbInformation,
"Abrir Archivo"
Exit Sub
End If
Next
Workbooks.Open (Fname)
end sub
Mi pregunta es si se puede que la ejecutar la macro que se ubique en una
ruta especifica, siempre se ubica en mis documentos y quiero que se ubique en
: "C:\EXCEL"
aqui es donde tengo los archivos con los que trabajo

GRACIAS DE ANTE MANO!!!!