Para poder extraer la información de libros con diferentes nombres, primero lo abro y despues agrego estas lineas:
Así ya no tengo que renombrar el archivo a protocolo.xls, el código identifica al archivo abierto como LibroaCopiar, sin importar el nombre o caracteres que tenga.
Código [Seleccionar]
Dim LibroaCopiar As String
LibroaCopiar = ActiveWorkbook.Name
Así ya no tengo que renombrar el archivo a protocolo.xls, el código identifica al archivo abierto como LibroaCopiar, sin importar el nombre o caracteres que tenga.