Como copiar automaticamente uma célula para a área de transferência com apenas um clique no Excel?
Normalmente, para copiar uma célula para a área de transferência, é necessário selecioná-la primeiro e, em seguida, premir as teclas Ctrl+C para a copiar. Mas e se pudesse copiar automaticamente uma célula bastando clicar nela — sem precisar de atalhos de teclado? O método neste artigo pode ajudá-lo.
Copiar automaticamente uma célula para a área de transferência ao clicar com código VBA
Copiar automaticamente uma célula para a área de transferência ao clicar com código VBA
O código VBA seguinte permite-lhe copiar uma célula para a área de transferência com um simples clique no Excel. Siga estes passos:
1. Abra a folha de cálculo na qual pretende que as células sejam copiadas automaticamente para a área de transferência, clique com o botão direito no separador da folha e selecione Ver Código no menu de contexto. Veja a imagem:
2. Na janela do Microsoft Visual Basic for Applications que se abre, copie o código VBA para a janela de código.
Código VBA: Copiar automaticamente uma célula para a área de transferência ao clicar
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A9")) Is Nothing Then
Target.Copy
End If
End SubNota: No código, A1:A9 é o intervalo de células que será copiado automaticamente. Ajuste-o conforme as suas necessidades.
3. Prima as teclas Alt+Q para fechar a janela do Microsoft Visual Basic for Applications.
Ao clicar em qualquer célula do intervalo A1:A9, esta será automaticamente copiada para a área de transferência, tal como ilustrado na imagem seguinte.
Depois, basta selecionar uma célula de destino e premir Enter para colar o conteúdo copiado.
Artigos relacionados:
- Como copiar dados de células, incluindo a altura das linhas e a largura das colunas, no Excel?
- Como copiar e colar automaticamente uma célula na folha atual ou entre folhas diferentes no Excel?
- Como desativar as funções de recortar, copiar e colar no Excel?
- Como copiar apenas as bordas de um intervalo selecionado no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos