Como criar um Botão de Comando para copiar e colar dados no Excel?

Suponha que você precise copiar frequentemente um intervalo de células para outro local após alterar os dados; o método manual de copiar e colar será complicado e demorado. Como automatizar essa tarefa de copiar e colar? Este artigo mostrará como usar um botão de comando para copiar e colar dados com apenas um clique.

Crie um Botão de Comando para copiar e colar dados com código VBA

Crie um Botão de Comando para copiar e colar dados com código VBA

Por favor, siga as instruções abaixo para copiar e colar dados automaticamente ao clicar em um Botão de Comando.

1. Insira um Botão de Comando clicando em Desenvolvedor > Inserir > Botão de Comando (Controle ActiveX). Veja a captura de tela:

2. Desenhe um Botão de Comando na sua planilha e clique com o botão direito do mouse. Selecione Visualizar Código no menu de contexto.

3. Na janela Microsoft Visual Basic for Applications que aparece, substitua o código original na Janela de Código pelo seguinte código VBA.

Código VBA: Use o Botão de Comando para copiar e colar dados no 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

Observação: No código, CommandButton1 é o nome do seu Botão de Comando inserido. A1:C17 é o intervalo que você precisa copiar, e J1:L17 é o intervalo de destino para colar os dados. Altere-os conforme necessário.

4. Pressione as teclas Alt + Q para fechar a janela Microsoft Visual Basic for Applications. E desative o Modo de Design na guia Desenvolvedor.

5. Agora, ao clicar no Botão de Comando, todos os dados no intervalo A1:C17 serão copiados e colados no intervalo J1:L17 sem a formatação das células.

Desbloqueie a Magia do Excel com o Kutools AI

• Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
• Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
• Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.

Potencialize suas capacidades no Excel com ferramentas alimentadas por IA. Baixe Agora e experimente uma eficiência como nunca antes!

Artigos relacionados:

• Como salvar e fechar a pasta de trabalho ativa sem prompt usando um Botão de Comando no Excel?
• Como sempre flutuar um Botão de Comando na planilha no Excel?
• Como atualizar ou inserir data e hora (atual) com um Botão de Comando no Excel?
• Como usar um Botão de Comando para alterar o valor de uma célula específica no Excel?
• Como usar um Botão de Comando para salvar a planilha ativa como arquivo PDF no Excel?
• Como inserir automaticamente uma nova linha em branco com um Botão de Comando no Excel?