Macro para exportar de excel a txt a la vez con delimitación
¿Macro para exportar de libro de excel a a archivo .txt y a la vez con delimitación con comas es posible?
¿Macro para exportar de libro de excel a a archivo .txt y a la vez con delimitación con comas es posible?
1 respuesta
Te anexo la macro
Sub GuardarTxt() 'Por.Dante Amor Application.DisplayAlerts = False Application.ScreenUpdating = False Set l1 = ThisWorkbook ActiveSheet.Copy Set l2 = ActiveWorkbook ruta = l1.Path & "\" l2.SaveAs Filename:=ruta & "archivo.txt", FileFormat:=xlCSV, CreateBackup:=False l2.Close MsgBox "terminado" End Sub
Saludos.Dante Amor
Recuerda valorar la respuesta.
¡Gracias!
Muchas gracias excelente funciona (Y)
Solo una consulta adicional de las celdas que contiene fecha me imprime mes/dia/año, en resumen necesito que la fecha sea 29/04/2015 y NO 4/29/2015
AGradezco mucho su apoyo.
Revisa que tu configuración regional sea día mes y año.
Si tienes correcta la configuración regional, entonces antes de ejecutar la macro, tienes que pasar a texto la fecha.
En otra columna pon esta fórmula:
=TEXTO(E2,"dd/mm/aaaa")
Cambia E por la columna en donde tienes la fecha, copia la fórmula hasta la última fila con datos.
Ya que tienes la fecha en texto, copia la columna sobre la columna "E" pero pega solamente valores.
Elimina la columna con la fórmula
Ejecuta la macro.
Saludos. Dante Amor
Recuerda valorar la respuesta.
Ok Gracias por la información, solo que la celda de la fecha se llena a través de formuladas y si hago esa operación no funciona lo demás
Corrige las formuladas para que quede la fecha como texto.
Muchas Gracias excelente ya esta funcionando, el macro me jala toda la información que contenga el libro... pero las tres primeras filas no los necesito el 1,2,3 como hago para omitirlos y no salga en el txt.
Gracias por su ayuda.
La macro copia todo lo de la hoja activa, es más fácil que pases todo lo que necesitas a un nueva hoja y sobre la nueva hoja ejecutar la macro.
