Troque rapidamente o conteúdo de duas células ou intervalos no Excel
Trocar o conteúdo de duas células ou intervalos no Excel é uma necessidade frequente ao reorganizar dados, ajustar esquemas ou corrigir erros de introdução. Este guia apresenta três métodos rápidos e eficientes para trocar conteúdos no Excel, permitindo-lhe modificar os seus dados sem depender excessivamente de cortar e colar — uma abordagem que poupa tempo e reduz o risco de erros.

Trocar manualmente o conteúdo de duas células adjacentes
Trocar facilmente o conteúdo de duas células ou intervalos com apenas alguns cliques
Trocar o conteúdo de duas células com código VBA
Trocar manualmente o conteúdo de duas células adjacentes
Ocasionalmente, poderá precisar de trocar duas células adjacentes — e isso pode ser feito manualmente com facilidade. Veja a seguir os passos para trocar as células A4 e B4, conforme ilustrado nas capturas de ecrã:

- Selecione uma das células a trocar: por exemplo, selecione a célula A4.
- Mantenha premida a tecla Shift e posicione o cursor na borda direita da célula selecionada.
- Arraste suavemente o cursor até à borda direita da célula B4.
- Assim que o cursor apresentar o símbolo "工", solte o rato.
O conteúdo das duas células deverá agora estar trocado, conforme ilustrado na seguinte captura de ecrã.

Trocar facilmente o conteúdo de duas células ou intervalos com apenas alguns cliques
Para quem precisa de trocar células ou intervalos não adjacentes, utilizar um suplemento do Excel como o Kutools para Excel pode simplificar significativamente o processo.
Após instalar o Kutools para Excel, selecione Kutools > Intervalo > Trocar Faixas para abrir a caixa de diálogo Trocar Faixas e configure-a da seguinte forma.
- Na secção Faixa 1 para trocar, selecione a primeira célula ou intervalo que pretende trocar.
- Na secção Faixa 2 para trocar, selecione a segunda célula ou intervalo com o qual pretende efetuar a troca.Dicas: Para facilitar, pode pré-selecionar os dois intervalos antes de abrir a caixa de diálogo Trocar Faixas. As seleções prévias aparecerão automaticamente nas caixas "Faixa 1 para trocar« e »Faixa 2 para trocar", respetivamente.
- Clique no botão OK.

Resultado
Os dois intervalos ou células selecionados são imediatamente trocados. Veja as capturas de ecrã:

Se pretender experimentar gratuitamente esta utilidade durante 30 dias, clique para a transferir e, em seguida, siga os passos indicados acima.
Trocar o conteúdo de duas células não adjacentes com código VBA
Quando as duas células não forem adjacentes, o método anterior não funcionará. Nesse caso, podemos trocá-las usando código VBA.
1. Prima a tecla Ctrl e selecione as duas células não adjacentes que pretende trocar.
2. Clique em Programador > Visual Basic. Será apresentada uma nova janela do Microsoft Visual Basic para Aplicações. Clique em Inserir > Módulo e introduza o seguinte código no Módulo:
Sub SwapTwoRange()
'Updateby20131120
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub 3. Em seguida, clique no botão
para executar o código. Será então apresentada uma caixa de diálogo que lhe permite selecionar as duas células cujo conteúdo pretende trocar. Veja as capturas de ecrã:

4. Clique em Ok na caixa de diálogo que surge; as duas células selecionadas serão trocadas. Veja as capturas de ecrã:

Notas: Este código VBA não troca a formatação das duas células.
Demonstração: Troque o conteúdo de duas células aleatórias com Kutools para Excel
Artigo relacionado:
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
