Buscar último archivo modificado dentro de carpeta, teniendo ruta y formato
publicado
Estimadísimos.
Tengo otra consulta, necesito realizar una funcion dentro de macro excel que me entregue el nombre del último archivo modificado de un formato específico. Esto teniendo la ruta en la que quiero buscar y el formato.
He conseguido el siguiente código, que en teoría debería ser parte del programa:
Function encontrar_ultimo(sitio As String) As String
Set fsearch = CreateObject("Scripting.FileSystemObject")
ruta = ActiveWorkbook.Path & "\" & sitio & "\"
'file() se accede a todas las propiedades de un archivo
Set Carpeta = fsearch.getfolder(ruta)
Set ficheros = Carpeta.Files
'hacer algo para cada archivo den directorio, utilizando arreglo llamado 'ficheros'
For Each archivo In ficheros
'obtener formato .dbf
'obtener nombre y fecha-hora (ultimo modificado), esto bajo la premisa
'que el ultimo modificado corresponde al shape a enviar
Next archivo
'entregar archivo con ultima fecha
encontrar_ultimo = fesarch.LookIn = Path
'Limpiamos los objetos y variables definidas
Set fso = Nothing
Set Carpeta = Nothing
Set ficheros = Nothing
End Function[/CODE]
Como ven, falta lo importante y por eso paso a pedir alguna ayuda por aca
Slds!
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Estimadísimos.
Tengo otra consulta, necesito realizar una funcion dentro de macro excel que me entregue el nombre del último archivo modificado de un formato específico. Esto teniendo la ruta en la que quiero buscar y el formato.
He conseguido el siguiente código, que en teoría debería ser parte del programa:
Como ven, falta lo importante y por eso paso a pedir alguna ayuda por aca
Slds!