¿Cómo crear un botón de comando para copiar y pegar datos en Excel?
Suponiendo que necesita copiar con frecuencia un rango de celdas a otro lugar después de cambiar los datos, el método de copiar y pegar manualmente será complicado y llevará mucho tiempo. ¿Cómo hacer que este asunto de copiar y pegar se ejecute automáticamente? Este artículo le mostrará cómo usar un botón de comando para copiar y pegar datos con un solo clic.
Cree un botón de comando para copiar y pegar datos con código VBA
Cree un botón de comando para copiar y pegar datos con código VBA
Haga lo siguiente para copiar y pegar datos automáticamente al hacer clic en un botón de comando.
1. Inserte un botón de comando haciendo clic en Developer > recuadro > Botón de comando (control ActiveX). Ver captura de pantalla:
2. Dibuje un Botón de Comando en su hoja de trabajo y haga clic derecho en él. Seleccione Ver código desde el menú contextual.
3. En la aparición Microsoft Visual Basic para aplicaciones ventana, reemplace el código original en la ventana Código con el siguiente código VBA.
Código de VBA: use el botón de comando para copiar y pegar datos en Excel
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Dim xSheet As Worksheet
Set xSheet = ActiveSheet
If xSheet.Name <> "Definitions" And xSheet.Name <> "fx" And xSheet.Name <> "Needs" Then
xSheet.Range("A1:C17 ").Copy
xSheet.Range("J1:L17").PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End If
Application.ScreenUpdating = True
End Sub
Note: En el código, CommandButton1 es el nombre del botón de comando insertado. A1: C17 es el rango que necesita copiar y J1: L17 es el rango de destino para pegar datos. Cámbielos según sea necesario.
4. Prensa otro + Q llaves para cerrar el Microsoft Visual Basic para aplicaciones ventana. Y apague el Modo de diseño en la pestaña Desarrollador.
5. Ahora haga clic en el Botón de comando, todos los datos en el rango A1: C17 se copiarán y pegarán en el rango J1: L17 sin el formato de celda.
Desbloquee Excel Magic con Kutools AI
- Ejecución inteligente: realice operaciones celulares, analice datos y cree gráficos, todo ello controlado por comandos simples.
- Fórmulas personalizadas: Genere fórmulas personalizadas para optimizar sus flujos de trabajo.
- Codificación VBA: Escriba e implemente código VBA sin esfuerzo.
- Interpretación de fórmulas: Comprenda fórmulas complejas con facilidad.
- Traducción de textos: Rompe las barreras del idioma dentro de tus hojas de cálculo.
Artículos relacionados:
- ¿Cómo guardar y cerrar el libro activo sin que lo solicite un botón de comando en Excel?
- ¿Cómo siempre flotar un botón de comando en la hoja de trabajo en Excel?
- ¿Cómo actualizar o insertar la fecha y hora (actual) con un botón de comando en Excel?
- ¿Cómo usar un botón de comando para cambiar un valor de celda específico en Excel?
- ¿Cómo usar el botón de comando para guardar la hoja de trabajo activa como archivo PDF en Excel?
- ¿Cómo insertar una nueva fila en blanco automáticamente con el botón de comando en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!