Saltar al contenido principal
 

¿Cómo crear un botón de comando para copiar y pegar datos en Excel?

Autor: Silvia Última modificación: 2024-08-26

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:

haga clic en el botón Comando en la pestaña Desarrollador

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.

dibuje un botón y haga clic en Ver código en 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.

una captura de pantalla de kutools para excel ai

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.
Mejore sus capacidades de Excel con herramientas impulsadas por IA. Descargar Ahora ¡Y experimente la eficiencia como nunca antes!

Artículos relacionados:

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

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!