Macro en excel
Hola, necesito copiar los datos que ingreso en hoja1 celdas a1 b1 c1 a hoja2 a partir de a11 b11 c11 teniendo en cuenta que d11 ya tengo datos, estaba intentando con esta macro, pero solo funciona si la hoja esta vacía. ¿Se podrá modificar para hacer lo que necesito?
Sub FormCarga()
OrigSheet = ActiveSheet.Name
Range("A2:C2").Copy
HojaDest = "Hoja2"
Firstcell = "A11"
Sheets(HojaDest).Select
Range(Firstcell).Select
LCol = Selection.Column
LCell = Selection.Row
LCell = LCell + Selection.CurrentRegion.Rows.Count
Cells(LCell, LCol).Select
ActiveSheet.Paste
Application.CutCopyMode = False
Cells(LCell, LCol).Select
Sheets(OrigSheet).Select
Range("B2:C2").ClearContents
Range("B2").Select
End Sub
Desde ya muchas gracias..
Sub FormCarga()
OrigSheet = ActiveSheet.Name
Range("A2:C2").Copy
HojaDest = "Hoja2"
Firstcell = "A11"
Sheets(HojaDest).Select
Range(Firstcell).Select
LCol = Selection.Column
LCell = Selection.Row
LCell = LCell + Selection.CurrentRegion.Rows.Count
Cells(LCell, LCol).Select
ActiveSheet.Paste
Application.CutCopyMode = False
Cells(LCell, LCol).Select
Sheets(OrigSheet).Select
Range("B2:C2").ClearContents
Range("B2").Select
End Sub
Desde ya muchas gracias..
{"Lat":-31.4307137721548,"Lng":-64.218864440918}
1 Respuesta
Respuesta de 230283
1