Visual Basic - Ejecutar .exe utilizando la funcion shell

Como puedo ejecutar un documento( por ejemplo .xls) desde mi aplicacion de visual utilizando la funcion shell, ya que la sintaxis que utilizo me da error
dim x
x= shell (\\\"c:\\\\Archivos de Programa\\\\Microsoft Office\\\\Office\\\\excel\\\" + \\\"c:\\\\Mis documentos\\\\prueba.xls\\\", 1 )

solamente funciona para ejecutar un .exe, por ejemplo el excel, pero si quiero ejecutar un documento de excel me da error

Como podria convertir esta conexion en forma dinamica utilizando App.Path, de antemano muchas gracias por la ayuda que puedan prestarme.

Es mejor utilizar ShellExecute, ya que con esto no tienes que saber dónde se encuentra al programa que va a abrir el documento deseado, sino que busca en las asociaciones de archivo y ya.

'COLOCA ESTO EN UN MÓDULO
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal _
lpDirectory As String, ByVal nShowCmd As Long) As Long

Public Const SW_RESTORE = 9

Public Sub AbrirArchivo(miarchivo As String, micarpeta As String)
Dim retval As Long
retval = ShellExecute(Form1.hWnd, "open", miarchivo, "", micarpeta, _
SW_RESTORE)
End Sub