Échangez rapidement le contenu de deux cellules ou plages dans Excel
L'échange du contenu de deux cellules ou plages dans Excel est une exigence courante lors de la réorganisation des données, de l'ajustement des mises en page ou de la correction des erreurs de saisie. Ce guide présentera trois méthodes pour échanger rapidement et efficacement du contenu dans Excel, vous permettant de modifier vos données sans copier-coller fastidieux, ce qui peut gagner du temps et réduire le risque d'erreurs.
Échangez manuellement le contenu de deux cellules adjacentes
Échangez facilement le contenu de deux cellules ou plages en quelques clics seulement
Échangez le contenu de deux cellules avec le code VBA
Échangez manuellement le contenu de deux cellules adjacentes
Parfois, vous devrez peut-être échanger deux cellules adjacentes. Cela peut être fait manuellement sans trop d'effort. Vous trouverez ci-dessous les étapes pour échanger les cellules A4 et B4, comme indiqué dans les captures d'écran :
- Sélectionnez l'une des cellules à échanger : par exemple, sélectionnez la cellule A4.
- Maintenez la touche Shift et positionnez votre curseur sur le bord droit de la cellule sélectionnée.
- Faites glisser délicatement le curseur vers le bord droit de la cellule B4.
- Une fois que le curseur affiche un "工", relâchez la souris.
Le contenu des deux cellules doit maintenant être échangé, comme illustré dans la capture d'écran ci-dessous.
Échangez facilement le contenu de deux cellules ou plages en quelques clics seulement
Pour ceux qui ont besoin d'échanger des cellules ou des plages non adjacentes, à l'aide d'un complément Excel tel que Kutools for Excel peut simplifier considérablement le processus.
Avant d'appliquer Kutools for Excel, S'il vous plaît téléchargez et installez-le d'abord.
Après avoir installé Kutools pour Excel, sélectionnez Kutools > Catégorie > Intervertir les plages ouvrir le Intervertir les plages boîte de dialogue, puis configurez comme suit.
- Dans le Gamme Swap 1 , sélectionnez la première cellule ou plage que vous souhaitez échanger.
- Dans le Gamme Swap 2 , sélectionnez la deuxième cellule ou plage avec laquelle vous souhaitez échanger. Astuces: Pour plus de facilité, vous pouvez présélectionner les deux plages avant d'ouvrir la boîte de dialogue Permuter les plages. Les plages présélectionnées apparaîtront automatiquement dans la zone "Gamme Swap 1" et "Gamme Swap 2" cases respectivement.
- Cliquez OK .
Résultat
Ensuite, deux cellules ou plages sélectionnées sont immédiatement permutées. Voir les captures d'écran:
Si vous souhaitez bénéficier d'un essai gratuit (30 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis passez à appliquer l'opération selon les étapes ci-dessus.
Échangez deux contenus de cellule non adjacents avec du code VBA
Lorsque les deux cellules ne sont pas adjacentes, la méthode ci-dessus ne fonctionnera pas. Nous pouvons les échanger avec du code VBA.
1. appuie sur le Ctrl et sélectionnez les deux cellules non adjacentes que vous souhaitez permuter.
2Cliquez sur Développeur >Visual Basic, Un nouveau Microsoft Visual Basic pour les applications la fenêtre s'affichera, cliquez sur insérer>Moduleet saisissez le code suivant dans le 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. Puis clique pour exécuter le code, puis une boîte de dialogue s'affiche pour vous permettre de sélectionner les deux cellules que vous souhaitez permuter. Voir les captures d'écran:
4. Cliquez Ok dans la boîte de dialogue contextuelle, les deux cellules sélectionnées sont permutées. Voir les captures d'écran:
Notes: Ce code VBA ne peut pas permuter la mise en forme des deux cellules.
Démo : échangez deux contenus de cellules aléatoires avec Kutools for Excel
Article connexe:
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!