Formulario en excel para abrir un archivo
Necesito ayuda urgentemente.No se como hacer un formulario donde puedas elegir la unidad (C:\, A:\, D:\ ...), donde aparezcan los directorios de cada unidad, y dentro de cada directorio los ficheros *.xls que existen.Una vez seleccionado el archivo pulsando aceptar que se habrá. Muchas gracias.
1 respuesta
Respuesta de fejoal
1
A pregunta urgente, respuesta urgente.
No necesitas un formulario para ello. Simplemente ingresa estas instrucciones en tu código:
ChDir "C:\" 'con esta eliges dónde empieza la búsqueda del archivo. Indícale el directorio donde quieres que inicie.
archi = Application.GetOpenFilename("Archivos de Microsoft Excel (*.xl*), *.xl*", , "SELECCIONE ARCHIVO A ABRIR")
If archi <> False Then
Workbooks.Open archi 'si no canceló, abre el archivo elegido.
End If
aclarando qué entendí mal o qué faltó.
No necesitas un formulario para ello. Simplemente ingresa estas instrucciones en tu código:
ChDir "C:\" 'con esta eliges dónde empieza la búsqueda del archivo. Indícale el directorio donde quieres que inicie.
archi = Application.GetOpenFilename("Archivos de Microsoft Excel (*.xl*), *.xl*", , "SELECCIONE ARCHIVO A ABRIR")
If archi <> False Then
Workbooks.Open archi 'si no canceló, abre el archivo elegido.
End If
aclarando qué entendí mal o qué faltó.
