Excel - Macro. copiar contenido de dos celdas a una hoja

   
Vista:

Macro. copiar contenido de dos celdas a una hoja

Publicado por ricardo (1 intervención) el 24/03/2017 19:53:06
Se que hay muchos temas similares, sin embargo no he podido resolver mi problema.

Lo que requiero hacer es que al darle click a un boton que contega una macro se copie el texto que este en ese momento en la celda a1 y la c1 y guarde el registro en la hoja 2 en el siguiente espacio en blanco (en forma de lista) y que no se sobre escriban los datos.

este es el codigo que uso (no se mucho al respecto solo copie y pegue de otros temas)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub Botón1_AlHacerClic()
 
Range("A3").Copy
Worksheets("Hoja2")
 
Do Until IsEmpty(ActiveCell) And IsEmpty(ActiveCell.Offset(1, 0))
ActieCell.Offset(2, 0).PasteSpecial xlPasteValues
 
Loop
 
Aplication.CutCopyMode = False
Worksheets("Hoja1").Activate
 
 
 
 
 
End Sub
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
Revisar política de publicidad