La ruta del archivo 

La ruta correspondiente al libro actual se obtiene con la instrucción siguiente: ActiveWorkbook.Path. El valor así obtenido se puede concatenar con el nombre del archivo a abrir, separándolo con una barra invertida.
Veamos un ejemplo:
nombre = “Planillas enviadas.xls”
ruta = ActiveWorkbook.Path
Workbooks.Open (ruta + “\” + nombre)
Luego de estas instrucciones, el nuevo archivo pasa a ser el libro actual. Esto es así de simple.

Truco publicado en Users 219.