Hector agradecido de la ayuda prestada hasta este momento..
Sabes coloque el modulo y funciono
perfectamentePosterior trate de modificar el mismo en
el sentido que te detallo a continuacion:
A1: Nombre:
A2: Apellido
A3:Otros hasta A11 Estas celdas son fijas]
Las celdas que lleno son desde B1 hasta B11 y alli las
trazlada a la Hoja 2 pero en forma Fila desde A2 Hasta K2
pero realmente no me funciona como quiero los datos los
traslada a la Hoja 2 pero me los coloca en forma Columna
desde a1 hasta a11 y no es lo que quiero...Me puedes dar
nuevamente una manoHasta aqui he modificado que me
falta...
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$I$2" Then Exit Sub
If IsEmpty(Target) Then Exit Sub
Application.ScreenUpdating = False
With Range("a2:i2")
.Copy Worksheets("Hoja2").Range("a65536").End
(xlUp).Offset(1)
.ClearContents
End With
SendKeys "^{Left}"
End Sub
Leer las respuestas