Introducir valor en Excel y según valor abrir vbs

Vamos a probar con esto

Sigue las Instrucciones para un botón y ejecutar la macro
1. Abre tu libro de Excel
2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
3. En el menú elige Insertar / Módulo
4. En el panel del lado derecho copia la macro
5. Ahora para crear un botón, puedes hacer lo siguiente:
6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
8. Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona Asignar macro / Selecciona: abrevbs
9. Aceptar.
10. Para ejecutarla dale click a la imagen.

Sub abrevbs()
'Por.DAM
Shell "192.168.119.134\COMPARTIDO\" & Range("A5") & ".vbs"
End Sub

Prueba y me comentas

Saludos. DAM
Si es lo que necesitas.

Buenas DAM,

Muchas gracias por la ayuda, he introducido el código en siguiendo los pasos que me comentas y me da error: "se ha producido el error '53' en tiempo de ejecución:Archivo no encontrado."

El "& Range ("A5")" entiendo que es para coger el valor de la casilla A5 de excel, supongamos que introduzco un 3.

El "& .vbs" entiendo que es para aplicar el valor que hemos cogido en A5 y abrir por ejemplo el 3.vbs.

Es correcto lo que comentas.

De lo que no estoy seguro es si puede leer el archivo en la dirección IP del servidor, porque no pruebas primero abriendo el archivo en tu computador, copia tu archivo 3.vbs en tu computador en la raíz de c:
Entonces escribe lo siguiente en la macro
Shell "C:\" & Range("A5") & ".vbs"

Después de esta prueba, revisamos cómo tendrías que abrir el archivo en el servidor

Saludos. DAM

Buenas DAM

He dejado los ficheros en el directorio raíz c:\

He actualizado la macro con el: Shell "C:\" & Range("A5") & ".vbs"

Y me dá el siguiente error:

Se ha producido el error '5' en tiempo de ejecución:
Argumento o llamada a procedimiento no válida

Gracias por tu ayuda.