Ver Mensaje Individual
  #1 (permalink)  
Antiguo 18/08/2015, 15:35
transmasivo
 
Fecha de Ingreso: agosto-2015
Mensajes: 3
Antigüedad: 9 años, 3 meses
Puntos: 0
Macro para Exportar a Plano

buen día Amigos

soy nuevo en el foro y les agradezco de antemano la ayuda.

Paso a contarles:

Debo crear un archivo plano (tab) para subirlo a un sistema ERP, este archivo debe cumplir con ciertas características de los campos, algunos campos son siempre los mismos, algunos los recibo por una lectora de barras y otros de acuerdo a una elección.

Ya tengo la macro para exportar a un csv, pero no se como hacer para que al exportar me ingrese al plano los que son fijos.

Esta es la macro:

Sub Exportar()
mio = ActiveWorkbook.Name
Workbooks.Add
otro = ActiveWorkbook.Name
Workbooks(mio).Activate
Range("a:g").Copy
Workbooks(otro).Activate
Sheets(1).Range("a1").PasteSpecial Paste:=xlValues
nombre = Day(Date) & "_" & Month(Date) & "_" & Hour(Time) & "_" & Minute(Time)
ActiveWorkbook.SaveAs nombre, FileFormat:=xlCSV
ActiveWorkbook.Close False
End Sub

Gracias

Última edición por transmasivo; 18/08/2015 a las 15:42