asi como lo tienes lo ejecuita de la carpeta de system32 directamente si es de una hubicacion ajena a dicha carpeta debes espesificar la dirección completa.

si el archivo a ejecutar esta en la misma carpeta que el EXE ejecutor seria asi

App.path & "\Nombrearchiv.extensión"

Dulces Lunas!¡.

malo malo malo no usar End seria mas recomendable Unload Me es solo por si carga otras cosas por hay en compañero ¬¬#

igual solo puede agregar un modulo y quitar el formulario y solo agregar

Sub Main()
    Shell App.Path & "\programa.exe", vbNormalFocus
end sub
 

y en el proyecto seleccionar el proceso inicial Sub Main() y Yap

Con esto evitamos en el End y el UnLoad Me

Dulces Lunas!¡.

Cuantas ideas para algo tan simple, en google y aqui ahi muchas cosas que tratan sobre esto. Y existe mas de una manera, no creo que le sea complicación.