Macro para abrir un archivo excel pero no siempre el mismo
Soy nueva en VBA, y quería saber cual es la mejor opción para crear una macro, que permita abrir un archivo de excel (xlsx), pero no siempre el mismo, son historiales de clientes, que cuando necesite abrir el de un cliente en particular, me salga una ventana coloque el código del cliente, y me abra el historial, todos los historiales se encuentran en la misma carpeta. He probado diferentes opciones que he encontrado en internet y nada...
1 respuesta
H o l a:
Te anexo la macro. Deberás cambiar la ruta por el nombre donde tienes los historiales de los clientes en esta línea:
ruta = "C:\Trabajo\clientes\"
Cuando ejecutes la macro, te va a solicitar que introduzcas el código del cliente, por ejemplo, si tienes un archivo con el nombre abc1234.xlsx, entonces deberás escribir en el cuadro "abc1234" y presionar aceptar. La macro buscará el archivo en la carpeta, si lo encuentra lo abre, si no lo encuentra te envía un mensaje.
Sub abrearchivo()
'Por.Dante Amor
ruta = "C:\Trabajo\clientes\"
cliente = InputBox("Introduce el código del cliente", "ABRIR HISTORIAL")
If cliente = "" Then Exit Sub
nombre = cliente & ".xlsx"
If Dir(ruta & nombre) <> "" Then
Workbooks.Open ruta & nombre
Else
MsgBox "No existe el archivo: " & nombre
End If
End Sub'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
