Como copiar e colar linhas ou colunas em ordem inversa no Excel?

Por vezes, poderá precisar de copiar e colar uma lista — seja em coluna ou em linha — por ordem inversa, vertical ou horizontalmente, tal como ilustrado na seguinte captura de ecrã. Como pode realizar esta tarefa de forma rápida e fácil no Excel?

Copiar e colar uma lista de coluna ou linha por ordem inversa com fórmula

Copiar e colar um intervalo de colunas ou linhas por ordem inversa com código VBA

Copiar e colar um intervalo de colunas ou linhas por ordem inversa com uma funcionalidade extraordinária

---

Copiar e colar uma lista de coluna ou linha por ordem inversa com fórmula

Copiar e colar uma lista de coluna por ordem inversa verticalmente

Se pretender inverter uma lista de células de uma coluna, pode aplicar a seguinte fórmula:

Introduza ou copie a seguinte fórmula para uma célula vazia onde deseja inverter a ordem da coluna:

Nota: Na fórmula acima, A1 é a primeira célula da coluna e A15 é a última célula da coluna.

Em seguida, arraste a alça de preenchimento para baixo até às células para extrair os valores das células por ordem inversa, tal como mostrado na seguinte captura de ecrã:

---

Copiar e colar uma lista de linha por ordem inversa horizontalmente

Para copiar e colar uma lista de linha por ordem inversa, utilize a seguinte fórmula:

Introduza ou copie esta fórmula para uma célula vazia:

Nota: Na fórmula acima, A1 é a primeira célula da linha e 1:1 é o número da linha onde os seus dados se encontram. Se os seus dados estiverem na linha 10, deverá alterá-lo para 10:10.

Depois, arraste a alça de preenchimento para a direita até às células onde pretende aplicar esta fórmula até que todos os valores estejam extraídos, obtendo assim todos os valores invertidos horizontalmente, conforme mostra a captura de ecrã:

---

Copiar e colar um intervalo de colunas ou linhas por ordem inversa com código VBA

Se precisar de copiar e colar um intervalo de colunas ou linhas por ordem inversa, apresento-lhe aqui alguns códigos VBA para o resolver de forma rápida e fácil. Siga os passos seguintes:

Copiar e colar uma lista de coluna por ordem inversa verticalmente

1. Em primeiro lugar, copie e cole os seus dados para um novo local e, em seguida, prima as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o seguinte código na janela do Módulo.

Código VBA: Copiar e colar um intervalo de células por ordem inversa verticalmente

Sub Flipvertically()
'updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim i As Integer, j As Integer, k As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Arr = WorkRng.Formula
For j = 1 To UBound(Arr, 2)
    k = UBound(Arr, 1)
    For i = 1 To UBound(Arr, 1) / 2
        xTemp = Arr(i, j)
        Arr(i, j) = Arr(k, j)
        Arr(k, j) = xTemp
        k = k - 1
    Next
Next
WorkRng.Formula = Arr
End Sub

3. Em seguida, prima a tecla F5 para executar este código e surgirá uma caixa de diálogo a solicitar que selecione o intervalo de dados que pretende inverter verticalmente, conforme mostra a captura de ecrã:

4. Depois, clique no botão OK e o intervalo de dados será invertido verticalmente, tal como mostram as seguintes capturas de ecrã:

---

Copiar e colar um intervalo de células por ordem inversa horizontalmente

Para inverter a Intervalo de Dados por ordem horizontal, aplique o seguinte código VBA:

Código VBA: Copiar e colar um intervalo de células por ordem inversa horizontalmente

Sub Fliphorizontally()
'updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim i As Integer, j As Integer, k As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Arr = WorkRng.Formula
For i = 1 To UBound(Arr, 1)
    k = UBound(Arr, 2)
    For j = 1 To UBound(Arr, 2) / 2
        xTemp = Arr(i, j)
        Arr(i, j) = Arr(i, k)
        Arr(i, k) = xTemp
        k = k - 1
    Next
Next
WorkRng.Formula = Arr
End Sub

Após executar este código, obterá as seguintes capturas de ecrã conforme necessário:

---

Copiar e colar um intervalo de colunas ou linhas por ordem inversa com uma funcionalidade extraordinária

Se não estiver familiarizado com as fórmulas e códigos VBA acima, recomendamos uma ferramenta fácil de usar – Kutools para Excel, com as funcionalidades Inverter Intervalo Verticalmente e Inverter Intervalo Horizontalmente, que lhe permitem inverter um intervalo de células na vertical e na horizontal com apenas um clique.

Após instalar o Kutools para Excel, proceda da seguinte forma:

Copiar e colar um intervalo de células por ordem inversa horizontalmente

1. Selecione o intervalo de células e, em seguida, clique em Kutools > Intervalo > Inverter Intervalo Verticalmente > Tudo (Inverter Somente Conteúdo), conforme mostra a captura de ecrã:

2. Em seguida, os valores do intervalo de células foram invertidos verticalmente de imediato, como mostram as capturas de ecrã:

---

Copiar e colar um intervalo de células por ordem inversa horizontalmente

1. Selecione o intervalo de células e, em seguida, clique em Kutools > Intervalo > Inverter intervalo horizontalmente > Tudo (Inverter Somente Conteúdo), conforme mostra a captura de ecrã:

2. De seguida, todos os valores das células na seleção foram invertidos horizontalmente de imediato, conforme mostram as capturas de ecrã:

Clique para descarregar o Kutools para Excel e experimente gratuitamente já!

---

Mais artigos relacionados com cópia e colagem: