Estimados, vengo nuevamente con una consulta, y espero tenga buena acogida.
Tengo una rutina en la que habro archivos y rescato datos, le doy formato y otras cosas. El origen de estos datos es de archivos planos pero con extención particular ".mad", que en el fondo puede ser cualquiera pero distinta de ".txt"
La cosa es que algunos archivos por sus datos pierden coherencia. Solución posible hacer conección de datos desde archivos de texto. Hago la conección y grabo una macro, pero no puedo modificarla para los parametros que van cambiando, como la ruta de origen del dato.
Adjunto Query para aclarar el tema y adjunto archivo plano que intento copiar. Este archivo se separa por ancho delimitado de largo 8,8,8,8... hasta 72.
' esto es lo que se obtiene de la macro, más cosas de formato With ActiveSheet.QueryTables.Add(Connection:= _ "TEXT;C:\doctos\2012-03-07\M231202.mad", Destination:=Range( _ "$A$1")) .name = "M231202" ‘por esta modificación With ActiveSheet.QueryTables.Add(Connection:= _ " TEXT; nombrearchivo", Destination:=Range("A1")) .name = NOMBRE1
‘donde: RUTA = Hoja1.Cells(4, 2) NUMERO = 23 P = Hoja1.Cells(2, 2) Hoja24.Activate nombrearchivo = (RUTA & "\" & "M" & NUMERO & P & ".mad")
[/PHP]
en que me dice que no se puede encontrar el archivo de texto. Me pregunto se es por la extención y de ser así cómo lo arreglo?
Estimados, vengo nuevamente con una consulta, y espero tenga buena acogida.
Tengo una rutina en la que habro archivos y rescato datos, le doy formato y otras cosas. El origen de estos datos es de archivos planos pero con extención particular ".mad", que en el fondo puede ser cualquiera pero distinta de ".txt"
La cosa es que algunos archivos por sus datos pierden coherencia. Solución posible hacer conección de datos desde archivos de texto. Hago la conección y grabo una macro, pero no puedo modificarla para los parametros que van cambiando, como la ruta de origen del dato.
Adjunto Query para aclarar el tema y adjunto archivo plano que intento copiar. Este archivo se separa por ancho delimitado de largo 8,8,8,8... hasta 72.
en que me dice que no se puede encontrar el archivo de texto. Me pregunto se es por la extención y de ser así cómo lo arreglo?
M231202.rar