Comment effacer le contenu de plusieurs cellules fusionnées dans Excel ?
Si vous avez une grande feuille de calcul contenant plusieurs cellules fusionnées et que vous souhaitez effacer tout leur contenu tout en conservant la fusion, vous pourriez naturellement penser à utiliser la fonction Rechercher et remplacer pour d’abord sélectionner toutes les cellules fusionnées, puis appuyer sur la touche Supprimerpour effacer les valeurs. Cependant, un message d’avertissement s’affiche alors : «Impossible d’effectuer cette opération sur une cellule fusionnée». Alors, comment effacer rapidement le contenu des cellules fusionnées sans altérer la fusion dans Excel ?
Effacer le contenu de plusieurs Fusionné à l’aide d’un code VBA
Effacer le contenu de plusieurs Fusionné avec Kutools pour Excel
Effacer le contenu de plusieurs Fusionné à l’aide d’un code VBA
Dans cette section, je vais créer pour vous un code VBA afin de résoudre cette tâche ; veuillez procéder comme suit.
1. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insertion > Module, puis collez le code suivant dans la fenêtre Module.
VBA : Effacer le contenu de plusieurs Fusionné
Sub ClearMerged()
'updateby Extendoffice
Dim Rg As Range, Rg1 As Range
Dim xAddress As String
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("Please select the range of cells:", "Kutools for Excel", xAddress, , , , , 8)
If Rg Is Nothing Then Exit Sub
For Each Rg1 In Rg
If Rg1.MergeCells Then Rg1.MergeArea.ClearContents
Next
End Sub
3. Appuyez ensuite sur la touche F5 pour exécuter ce code. Une boîte de dialogue s’ouvrira alors afin que vous puissiez sélectionner la plage dont vous souhaitez effacer le contenu des cellules fusionnées. Voir la capture d’écran :
4. Cliquez ensuite sur OK : le contenu des cellules fusionnées est effacé en une seule opération, laissant les cellules fusionnées vides. Voir la capture d’écran :
Effacer le contenu de plusieurs Fusionné avec Kutools pour Excel
Si vous possédez Kutools pour Excel, son utilitaire Sélectionner les cellules fusionnées vous permet de sélectionner d’un seul clic toutes les cellules fusionnées d’une plage, puis de les supprimer en une seule opération.
Après avoir installé Kutools pour Excel, procédez comme suit :
1. Sélectionnez la plage de cellules contenant les cellules fusionnées dont vous souhaitez effacer le contenu.
2. Cliquez sur Kutools > Sélectionner > Sélectionner les cellules fusionnées. Voir la capture d’écran :
3. Toutes les cellules fusionnées sont immédiatement sélectionnées. Voir la capture d’écran :
4. Appuyez ensuite sur la touche Supprimer du clavier. Toutes les valeurs contenues dans les cellules fusionnées ont été supprimées, tout en conservant les cellules fusionnées comme souhaité.
Cliquez ici pour en savoir plus sur cet utilitaire Sélectionner les cellules fusionnées…
Kutools pour Excel– Boostez Excel avec plus de 300 outils essentiels, pour gagner en rapidité et en simplicité, et profitez des fonctionnalités d’intelligence artificielle pour un traitement de données plus intelligent et une productivité accrue.Obtenez-le dès maintenant
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre 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 rend votre travail bien plus facile
- Activez 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 vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels