Copiar datos de celdas en fila a celdas en columnas
Tengo datos de la celda B3 a la B16 en la hoja1 y deseo, por medio de una macro, copiar estos datos en las celdas A2 a la N2 de la hoja2 para almacenar los datos que se ingresan en la hoja1. Luego que los datos son copiados en la hoja2, los datos ingresados en la hoja1 en el rango B3:B16 son borrados para poder recibir nuevos datos; los nuevos datos deberán ser copiados en la hoja2 en el rango A3:N3, y así sucesivamente.
Gracias por la invaluable ayuda que prestan a los que estamos iniciando, en este caso excel.
1 Respuesta
Sigue las Instrucciones para un botón y ejecutar la macro
1. Abre tu libro de Excel
2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
3. En el menú elige Insertar / Módulo
4. En el panel del lado derecho copia la macro
5. Ahora para crear un botón, puedes hacer lo siguiente:
6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
8. Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona Asignar macro / Selecciona: copia_datos
9. Aceptar.
10. Para ejecutarla dale click a la imagen.
Sub copia_datos()
'Por.DAM
Sheets("hoja1").Select
Range("B3:B16").Copy
Sheets("hoja2").Select
uf = Range("A" & Rows.Count).End(xlUp).Row + 1
Range("A" & uf).Select
Selection.PasteSpecial Paste:=xlPasteAll, _
Operation:=xlNone, SkipBlanks:=False, Transpose:=True
Sheets("hoja1").Select
Application.CutCopyMode = False
Range("B3:B16").ClearContents
End SubSaludos.DAM
Si es lo que necesitas.
