Visual Basic para Aplicaciones - Abrir un archivo excel desde VB 6.0

Hola, mi duda es como abrir un archivo de excel con VB 6.0 desde una ubicación especifica, por ejemplo de "mis documentos

espero que esto te sirva.

Dim ret As Variant
On Error GoTo error
ret = Shell("rundll32.exe url.dll,FileProtocolHandler " & (Direccion), 1)
Exit Sub
error: MsgBox Err.Description, vbExclamation, "Error de Ejecución"

donde pone Dirección es la ruta donde está es archivo que quieres abrir. con este código puedes abrir cualquier archivo (siempre que tengas el programa que lo abra,¡¡¡Claro!!!)