Foros del Web » Soporte técnico » Ofimática »

Macro para Exportar a Plano

Estas en el tema de Macro para Exportar a Plano en el foro de Ofimática en Foros del Web. 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 ...
  #1 (permalink)  
Antiguo 18/08/2015, 15:35
 
Fecha de Ingreso: agosto-2015
Mensajes: 3
Antigüedad: 8 años, 8 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
  #2 (permalink)  
Antiguo 18/08/2015, 18:37
Avatar de Triby
Mod on free time
 
Fecha de Ingreso: agosto-2008
Ubicación: $MX->Gto['León'];
Mensajes: 10.106
Antigüedad: 15 años, 8 meses
Puntos: 2237
Respuesta: Macro para Exportar a Plano

Haz una captura de pantalla de la hoja a exportar, para ver si se entiende eso de "ciertas características de los campos".
__________________
- León, Guanajuato
- GV-Foto
  #3 (permalink)  
Antiguo 19/08/2015, 08:01
 
Fecha de Ingreso: agosto-2015
Mensajes: 3
Antigüedad: 8 años, 8 meses
Puntos: 0
Respuesta: Macro para Exportar a Plano

Claro que si Triby

mira la captura.


,

Si nos vez bien la imagen, la guarde aquí:

http://www.transmasivo.com/adjuntos/documentos/captura.png


los datos que están en amarillo son los que cambiarían, la columna C es un Tipo de Operación, la E es la fecha del día algo así como =HOY(), la G es el Producto que lo ideal seria que lo trajera de una base de datos cuando capture el I, el I es el código que yo capturo con la lectora de código de barras, el K es el tipo de medida que también lo traería de la misma base de productos, es decir unidad, galón etc.; el Q es la misma que la E, la R es el centro de costo contable, y la Y es la misma que la R.

El resto de los valores son fijos.

Te agradezco mucho.
  #4 (permalink)  
Antiguo 21/08/2015, 14:52
Avatar de Triby
Mod on free time
 
Fecha de Ingreso: agosto-2008
Ubicación: $MX->Gto['León'];
Mensajes: 10.106
Antigüedad: 15 años, 8 meses
Puntos: 2237
Respuesta: Macro para Exportar a Plano

Entonces cuál es exactamente el problema? En el archivo exportado aparece la fórmula en vez del valor? Habría que ver cómo estás copiando el valor, pero si lo haces con Cell(fila, columna).Value no deberías tener problemas.
__________________
- León, Guanajuato
- GV-Foto
  #5 (permalink)  
Antiguo 21/08/2015, 15:07
 
Fecha de Ingreso: agosto-2015
Mensajes: 3
Antigüedad: 8 años, 8 meses
Puntos: 0
Respuesta: Macro para Exportar a Plano

El problema es que no se como quemar dentro del código los valores que van fijos, por que yo voy a recoger de un formulario como 4 datos nada mas.
  #6 (permalink)  
Antiguo 24/08/2015, 21:07
Avatar de jhonnymontoya  
Fecha de Ingreso: octubre-2013
Mensajes: 11
Antigüedad: 10 años, 5 meses
Puntos: 1
Respuesta: Macro para Exportar a Plano

No te entiendo bien pero si es quee escriba los valores fijo cuando lea por decir algo el código de barras puedes usar algo como esto en las funciones de excel =SI(I1<>""; "Valor a ingresar fijo ejemplo 1234"; "") si no es eeso lo que necesitas agrega un ejemplo del archivo plano final y se un poco mas especifico.

Etiquetas: macro, plano
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 12:56.