VBA abre el libro con el nombre especificado en una dirección fija

Si recién está abriendo el archivo, pruebe el siguiente código VBA

Sub?Open File()

Dim?wjm,?lj1,?lj2

wjm ?= ?Hojas("Hoja1").Rango("A1")?&?" .XLSM"

lj1?=?" E:\Nueva Carpeta\"?E:\Nueva Carpeta\" ? amp；?wjm

lj2?=?"E：\keil\"? amp；?wjm

If?Dir(lj1)?lt；gt；?" Luego ?'Determinar si el archivo existe

Workbooks.Open?Filename:=lj1

Else

MsgBox?"El archivo 1 no existe"

<. p>Salir?Sub

Fin?Si

Si?Dir(lj2)?lt;gt;?" ?Entonces?'Determinar si el archivo existe

Workbooks.Open?Filename:=lj2

Else

MsgBox?"El archivo 2 no existe".

¿Salir?