Para DAM macro que me traslade unos datos de una hoja a otra
Hola DAM
¿Me pudieras ayudar con lo siguiente?
Tengo una hoja en excel llamada inscripción y otra hoja llamada BD
En la Hoja Inscripción ingreso datos en este rango C7:C12 (Como te puedes dar cuenta es verticalmente)
Y necesito trasladar a través de una macro esos datos a la hoja BD desde la columna A hasta la columna F (Los mismos 6 datos pero de manera horizontal)
La idea es que continuamente en la hoja BD se vayan acumulando en forma de Base de Datos, todos los ingresos realizandos en la hoja Inscripción.
Gracias.
1 Respuesta
Respuesta de Dante Amor
1
Te anexo la macro
Sub Trasladar()
'Por.Dante Amor
Set h1 = Sheets("inscripción")
Set h2 = Sheets("BD")
'
h1.Range("C7:C12").Copy
u = h2.UsedRange.Rows(h2.UsedRange.Rows.Count).Row + 1
h2.Range("A" & u).PasteSpecial Paste:=xlPasteValues, Transpose:=True
MsgBox "Registro copiado"
End SubRevisa que el nombre de las hojas esté correctamente escrito.
