Verwissel snel de inhoud van twee cellen of bereiken in Excel
Het verwisselen van de inhoud van twee cellen of bereiken in Excel is een veelvoorkomende behoefte bij het herorganiseren van gegevens, het aanpassen van lay-outs of het corrigeren van invoerfouten. Deze handleiding biedt drie methoden om snel en efficiënt inhoud in Excel te verwisselen, zodat u uw gegevens eenvoudig kunt aanpassen — zonder uitgebreid knippen en plakken. Zo bespaart u tijd én vermindert u het risico op fouten.

Verwissel handmatig de inhoud van twee aangrenzende cellen
Verwissel eenvoudig de inhoud van twee cellen of bereiken met slechts enkele klikken
Verwissel twee celinhouden met VBA-code
Verwissel handmatig de inhoud van twee aangrenzende cellen
Soms wilt u de inhoud van twee aangrenzende cellen verwisselen – en dat kan eenvoudig handmatig. Hieronder ziet u hoe u de inhoud van cel A4 en B4 omwisselt, zoals weergegeven in de schermafbeeldingen:

- Selecteer een van de cellen die u wilt verwisselen: kies bijvoorbeeld cel A4.
- Houd de Shift-toets ingedrukt en plaats de cursor op de rechterrand van de geselecteerde cel.
- Sleep de cursor voorzichtig naar de rechterrand van cel B4.
- Zodra de cursor het symbool „工” weergeeft, laat u de muis los.
De inhoud van de twee cellen is nu verwisseld, zoals te zien is in de schermafbeelding hieronder.

Verwissel eenvoudig de inhoud van twee cellen of bereiken met slechts enkele klikken
Om niet-aangrenzende cellen of bereiken te verwisselen, kunt u een Excel-invoegtoepassing zoals Kutools voor Excel gebruiken, wat het proces aanzienlijk vereenvoudigt.
Na installatie van Kutools voor Excel selecteert u Kutools > Bereik > Bereiken omwisselen om het dialoogvenster Bereiken omwisselen te openen en configureert u dit als volgt.
- Selecteer in het gedeelte Bereik 1 om te wisselen de eerste cel of het eerste bereik dat u wilt verwisselen.
- Selecteer in het gedeelte Bereik 2 om te wisselen de tweede cel of het tweede bereik waarmee u wilt verwisselen.Tips: Voor uw gemak kunt u de twee bereiken alvast selecteren voordat u het dialoogvenster Bereiken omwisselen opent. De vooraf geselecteerde bereiken verschijnen automatisch in de vakken „Bereik 1 om te wisselen” en „Bereik 2 om te wisselen”.
- Klik op de knop OK.

Resultaat
De twee geselecteerde cellen of bereiken worden direct verwisseld. Zie de schermafbeeldingen:

Wilt u een gratis proefversie (30 dagen) van deze tool gebruiken?Klik dan hier om deze te downloaden en volg daarna bovenstaande stappen om de bewerking toe te passen.
Verwissel twee niet-aangrenzende celinhouden met VBA-code
Wanneer de twee cellen niet aangrenzend zijn, werkt de bovenstaande methode niet. In dat geval kunt u ze eenvoudig verwisselen met VBA-code.
1. Houd de Ctrl-toets ingedrukt en selecteer de twee niet-aangrenzende cellen die u wilt verwisselen.
2. Klik op Ontwikkelaar > Visual Basic. Er verschijnt een nieuw venster: Microsoft Visual Basic for Applications. Klik op Invoegen > Module en voer de volgende code in de Module:
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. Klik daarna op de knop
om de code uit te voeren. Er verschijnt een dialoogvenster waarin u de twee cellen kunt selecteren die u wilt verwisselen. Zie de schermafbeeldingen:

4. Klik op Ok in het pop-updialoogvenster; de twee geselecteerde cellen worden verwisseld. Zie de schermafbeeldingen:

Opmerking: Deze VBA-code kan de opmaak van de twee cellen niet verwisselen.
Demo: Verwissel de inhoud van twee willekeurige cellen met Kutools voor Excel
Gerelateerd artikel:
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins
