Macro que me abra archivos
Hola buenos días
Me puede ayudar
Necesito una macro que me abra un archivo xxxxxxx
En la cual, en la celda le indico en nombre del archivo , celda"A1" = xxxxxxxx.xls o cualquier otro
si existe el archivo en la carpeta que me lo abra si no existe dicho archivo
que me mande un mensaje que diga "EL ARCHIVO NO EXISTE"
Por ejemplo:
Ubicacion o ruta = C:\Mis Documentos\
Nombre del archivo = xxxxxxxx.xls
Espero haberme dado a entender y espero su ayuda
Me puede ayudar
Necesito una macro que me abra un archivo xxxxxxx
En la cual, en la celda le indico en nombre del archivo , celda"A1" = xxxxxxxx.xls o cualquier otro
si existe el archivo en la carpeta que me lo abra si no existe dicho archivo
que me mande un mensaje que diga "EL ARCHIVO NO EXISTE"
Por ejemplo:
Ubicacion o ruta = C:\Mis Documentos\
Nombre del archivo = xxxxxxxx.xls
Espero haberme dado a entender y espero su ayuda
1 Respuesta
Respuesta
1
Ok, supongamos que el nombre del archivo está en A1 y la ruta en A2, entonces hacé
sub XX()
On Error Goto noEsta
Workbooks.Open range("A2") & Range("A1")
Exit Sub
noEsta:
MsgBox "El Archivo " & Range("A1") & " no existe"
End Sub
sub XX()
On Error Goto noEsta
Workbooks.Open range("A2") & Range("A1")
Exit Sub
noEsta:
MsgBox "El Archivo " & Range("A1") & " no existe"
End Sub
Muchas muchas gracias por la ayuda... me sirvió mucho y ahora solome falta que lo aplique en forma condicional o if
icc and jlcc
"no entender es no aprender"
icc and jlcc
"no entender es no aprender"