Skip to main content

Kutools para Office — Uma Suíte. Cinco Ferramentas. Aumente sua Produtividade.

Troque rapidamente o conteúdo de duas células ou intervalos no Excel

Author Xiaoyang Last modified

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.

swap contents of two ranges

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:

sample data

  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.

the two cells are swapped


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.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

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.
    specify two ranges in the dialog box
Resultado

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

two selected ranges are swapped

  Se você deseja experimentar este utilitário gratuitamente (30 dias), clique para baixá-lo e, em seguida, vá aplicar a operação de acordo com as etapas acima.


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 run button 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:

select two range separately

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

the two selected ranges are swapped

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:

Melhores Ferramentas de Produtividade para Office

🤖 Kutools AI Aide: Revolucione a análise de dados com: Execução Inteligente   |  Gerar Código  |  Criar Fórmulas Personalizadas  |  Analisar Dados e Gerar Gráficos  |  Chamar Funções Aprimoradas
Recursos Populares: Localizar, Destacar ou Marcar Duplicatas   |  Excluir Linhas em Branco   |  Consolidar Colunas ou Células sem Perder Dados   |   Arredondar...
Super PROC: Procura por múltiplos critérios    Procura por múltiplos valores  |   Procura em várias planilhas   |   Correspondência Fuzzy...
Lista Suspensa Avançada: Crie rapidamente Lista suspensa  |  Lista suspensa dependente  |  Lista suspensa com múltipla seleção ...
Gerenciador de Colunas: Adicionar número específico de colunas  | Mover Colunas  | Alternar status de visibilidade de Colunas ocultas |  Comparar Intervalos & Colunas...
Recursos em Destaque: Grade de foco   |  Visualização de Design  |  Barra de fórmulas aprimorada    Gerenciador de Pasta de trabalho & Planilha   |  Biblioteca de AutoTexto (Auto Text)   |  Selecionador de Data   |  Mesclar Dados   |  Criptografar/Descriptografar Células    Enviar Email por Lista   |  Super Filtro   |   Filtro Especial (filtrar negrito/itálico/tachado...) ...
Os 15 Principais Conjuntos de Ferramentas: 12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ...)  | 50+ Tipos de Gráficos (Gráfico de Gantt, ...)  | 40+ Fórmulas Práticas (Calcular a idade com base na data de nascimento, ...)  | 19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem pelo Caminho, ...)  | 12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ...)  | 7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ...) | ...e muito mais
Use o Kutools no idioma de sua preferência – compatível com Inglês, Espanhol, Alemão, Francês, Chinês e mais de40 idiomas!

Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para acessar o recurso que você mais precisa...


Office Tab traz interface com abas para o Office e facilita muito seu trabalho

  • Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
  • Aumente sua produtividade em50% e economize centenas de cliques todos os dias!

Todos os complementos Kutools. Um instalador

O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.

Excel Word Outlook Tabs PowerPoint
  • Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
  • Um instalador, uma licença — configuração em minutos (pronto para MSI)
  • Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
  • Avaliação completa por30 dias — sem registro e sem cartão de crédito
  • Melhor custo-benefício — economize comparado à compra individual de add-ins