UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1 corregir macro el 01/09/14, 03:35 pm

LAJUANA50


tengo hoja de factura activa y quiero copiar alguna celda a hoja de datos he realizado esta macro pero no me avanza de línea y me escribe datos encima de los datos anteriores, y además me empieza en la línea 11 DE LA HOJA DE DATOS


Sub copiado()
fila2 = sheets("FACTURA").range("A1").end(xlDown).row +1
activesheet.range("F4").copy destination:=sheets("DATOS").cells(fila2,1)
activesheet.range("F3").copy destination:=sheets("DATOS").cells(fila2,2)
End Sub


ALGUIEN PUEDE CORREGIRME

2 Re: corregir macro el 01/09/14, 11:34 pm

Igtelo


Hola Lajuana50.

Si vas a copiar a la Hoja DATOS, cambia:

Sub copiado()

fila2 = Sheets("DATOS").Range("A1").End(xlDown).Row + 1
Sheets("FACTURA").Range("F4").Copy Destination:=Sheets("DATOS").Cells(fila2, 1)
Sheets("FACTURA").Range("F3").Copy Destination:=Sheets("DATOS").Cells(fila2, 2)

End Sub

Si avanza de línea, sólo verifica que en tu hoja DATOS tengas "llenas" 2 filas de la columna A.
Está copiando a partir de la fila 11 porque esta tomando ese dato de la hoja FACTURA y debe ser de la hoja DATOS.

Échale una revisada a tus datos, tu macro está bien salvo el detalle que te marqué en rojo.

Saludos
Ignacio Téllez
P.d: ¿Dónde o en que país está GRANA?

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.