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 comum ao reorganizar dados, ajustar layouts ou corrigir erros de entrada. Este guia apresentará três métodos para trocar rapidamente e de forma eficiente o conteúdo no Excel, permitindo que você modifique seus dados sem recortar e colar extensivamente, o que pode economizar tempo e reduzir o risco de erros.

Troque manualmente o conteúdo de duas células adjacentes
Troque facilmente o conteúdo de duas células ou intervalos com apenas alguns cliques
Troque o conteúdo de duas células com código VBA

Troque manualmente o conteúdo de duas células adjacentes

Ocasionalmente, você pode precisar trocar duas células adjacentes. Isso pode ser feito manualmente sem muito esforço. Abaixo estão os passos para trocar as células A4 e B4, como mostrado nas capturas de tela:

1. Selecione uma das células para trocar: Por exemplo, selecione a célula A4.
2. Mantenha pressionada a tecla Shift e posicione o cursor na borda direita da célula selecionada.
3. Arraste cuidadosamente o cursor até a borda direita da célula B4.
4. Assim que o cursor exibir um símbolo "工", solte o mouse.

Os conteúdos das duas células agora devem estar trocados, conforme mostrado na captura de tela abaixo.

Troque facilmente o conteúdo de duas células ou intervalos com apenas alguns cliques

Para quem precisa trocar células ou intervalos não adjacentes, usar um complemento do Excel como Kutools for Excel pode simplificar significativamente o processo.

Após instalar o Kutools for Excel, selecione Kutools > Intervalo > Trocar Faixas para abrir a caixa de diálogo Trocar Faixas, e configure conforme segue.

1. Na seção Faixa 1 para trocar, selecione a primeira célula ou intervalo que deseja trocar.
2. No Faixa 2 para trocar selecione a segunda célula ou intervalo com a qual deseja trocar.
   Dicas: Para facilitar, você pode pré-selecionar os dois intervalos antes de abrir a caixa de diálogo Trocar Faixas. Os intervalos pré-selecionados aparecerão automaticamente nas caixas "Faixa 1 para trocar" e "Faixa 2 para trocar", respectivamente.
3. Clique no botão OK.
   

Resultado

Em seguida, as duas células ou intervalos selecionados são trocados imediatamente. Veja as capturas de tela:

Troque o conteúdo de duas células não adjacentes com código VBA

Quando as duas células são não adjacentes, o método acima não funcionará. Podemos trocá-las com código VBA.

1. Pressione a tecla Ctrl e selecione as duas células não adjacentes que deseja trocar.

2. Clique em Desenvolvedor>Visual Basic, uma nova janela Microsoft Visual Basic para Aplicativos será exibida, clique em Inserir>Módulo, e insira 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, então uma caixa de diálogo será exibida para você selecionar as duas células que deseja trocar entre. Veja as capturas de tela:

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

Observações: Este código VBA não pode trocar a formatação das duas células.

Demonstração: Troque o conteúdo de duas células aleatórias com Kutools for Excel

Artigo relacionado:

• Como trocar linhas ou colunas no Excel?