Osea segun lo que dices es que tienes varias carpetas de programas cada una con su instalador dentro.
Si tu exe lo pones fuera de las carpetas te deberia de funcionar la linea
tal y como esta que la he probado en xp y funciona.
Shell (App.Path & "\Firefox 8\Setup.exe"), vbMaximizedFocus
Revisa que tienes bien escrito todo ya que como sabes las rutas son susceptibles a mayusculas y minusculas a veces el Setup.exe lo escriben en minuscula.
En cuanto al error que te da nunca lo habia visto.
Seria bueno que pusieras algunas lineas de codigo para que te las pudieramos corregir entre todos los usuarios del foro.
Esta seria otra forma de usar app.path:
Cita: Private Sub Command1_Click()
Dim ruta As String
ruta = "\firefox\setup.exe"
Shell (App.Path & ruta), vbMaximizedFocus
End Sub
Puedes cambiar los diferentes valores donde pone vbMaximizedFocus ya que ese valor te abre una pantalla completa.
salu2