Abrir libro excel usando comodines

[juanpy]

Estimados,

La idea es abrir un libro excel desde una ubicacion pre definida, cuyo nombre esta estructurado de la siguiente manera.

LibroBanco201409051345.xlsx
|ParteFija|-Fecha--|Hora

La parte "LibroBanco" es fija, no asi la fecha y hora que son variables

Existen varios archivos en el directorio con este nombre, el que yo necesito abrir, siempre sera el ultimo generado.

Estube probando con ?? o **, pero no sirve (LibroBanco????????????.xlsx).

¿Alguien sabe como lo puedo hacer?

Muchas gracias.

 

[RickXL]

Hi,

Sorry, no hablo Espagnol.

Try this:

Sub xx()
    Dim FileTemp As String, FileName As String
    FileTemp = Dir("C:\Users\RickXL\Documents\@Excel\MasterFolder\LibroBanco*.xlsx")     '  <=== Your Folder
    Do While FileTemp <> ""
        FileName = FileTemp
        FileTemp = Dir
    Loop
    Debug.Print FileName   '  <=== Answer
End Sub

The value of FileName will be the most recent file.

Regards,

 

[juanpy]

RickXL

Excellent, it is just what he needed...

You are better...

thank you very much!!

 

[RickXL]

No problem, glad you liked it