Excel - COPIAR DE UNA HOJA A OTRA

 
Vista:
sin imagen de perfil

COPIAR DE UNA HOJA A OTRA

Publicado por MARCOS (4 intervenciones) el 06/03/2014 18:14:40
Buenos dias,
estoy intentando copiar datos de un libro a otro:
ejemplo
libro 1
nombre-- cedula---color--observacion--tamaño

al libro 2

nombre--documento---color--observacion--tamaño

he intentado varias cosas para copiar
ya que no necesito copiar todos los datos si no algunos
pero no me da..
otro problema es que en el libro 1 un ejemplo

nombre--cedula---color-observacion--tamaño
jose --- 84545---ama--ninguna--52
jose ----84545---ama--posible---52

si se dan cuenta es el mismo nombre cambia solo observación, necesito que al copiar me copie solo uno me podrian decir como puedo hacer esta macr, si alguien tiene alguna respuesta les agradezco

Workbooks("SINDX.xls").Worksheets("SIN").Range("D2:D20").Select
Selection.Copy
Workbooks("FINAL.xls").Worksheets("REGISTRO").Range("A:B").Select
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

COPIAR DE UNA HOJA A OTRA

Publicado por lh_zero (3 intervenciones) el 07/03/2014 02:04:19
Recorre el rango con un contador tomando los datos en un array y posteriormente escribes los que quieras:

Set oRango = Workbooks("SINDX.xls").Worksheets("SIN").Range("D2:D20")

iMax = oRango.Rows.count

For iCont= 1 to iMax
'Llevas los datos al array
Next iCont
...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar