Mi proyecto esta parado..!

wsajo

New Member
Joined
Jul 5, 2002
Messages
2
Buenas a todos.

Tengo un macro que corre muy bien, busca una documento de texto, lo pega en excel y suma su filas y columnas, tiene un boton de limpiar, y cargar datos.

Pero quiero adicionarle una funcion para que en la carpetas donde estan los documentos de texto, y me traiga el mas reciente que encuentre. conforme al orden descrito. Ahi estoy varado. use esto y no me funciona.
_________________________________
Code:
'Ciclo para buscar cuantas versiones hay del archivo, por defecto la capacidad maxima serían 10
Set fs = CreateObject("Scripting.FileSystemObject")
For i = 0 To 10
    If i = 0 Then
        'Busca si se puede encontrar este archivo
        Set a = fs.getfile("F:\" & Procesador & "\" & añoc & "\CR1s" & N_MESP & dia & ".txt" & i)
    Else
        On Error Resume Next 'Activa el controlador de errores
 
            'Busca si se puede encontrar este archivo
            Set a = fs.getfile("F:\" & Procesador & "\" & añoc & "\CR1s" & N_MESP & dia & ".txt" & i)
            If Err.Number <> 0 Then
                i = 11
            End If
 
        On Error GoTo 0
    End If
Next
Workbooks.Open Filename:=a
______________________________

Gracias por la ayuda amigos.
 
Last edited by a moderator:

Excel Facts

Waterfall charts in Excel?
Office 365 customers have access to Waterfall charts since late 2016. They were added to Excel 2019.
Antes de todo, ¿me puede explicar qué supuestamente debe de hacer este bucle? En este momento no comprendo porque la prueba sobre si vale cero. Tampoco entiendo porque cambiar i a once.

Y favor note que tuve que editar las líneas de "set a...." porque como usted puso, da un error. No sé si procesador era una variable o un valor constante.
 
Upvote 0
gracias greg Truby.
Procesador es el nombre de la carpeta donde estan los archivos *.txt. en esa linea el codigo describe la dirección donde estan los archivos.
Y se requiere que tome el archivo más actual.
Se podria usar tambien usar una ventana de busqueda, para seleccionar un rango de fechas?
como del 01 de junio hasta el 10 de junio. Como quedaria el codigo?
Muchas gracias.
 
Upvote 0
¿Qué quiere decir con «fecha»?
  • ¿Fecha creada?
  • ¿Fecha modificada?
  • ¿La fecha incluida como componente del nombre del archivo?
 
Upvote 0

Forum statistics

Threads
1,223,979
Messages
6,175,760
Members
452,668
Latest member
mrider123

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top