You can do this too:

Dim RetVal
RetVal = Shell("C:\Archivos de programa\Microsoft Office\Office\MSAccess.exe C:\GralRoca\Agenmde.mde /x Ingreso", 1)