Comment effacer le contenu de plusieurs cellules fusionnées dans Excel ?
Si vous avez une grande feuille de calcul qui contient plusieurs cellules fusionnées, et que vous souhaitez effacer tout le contenu des cellules fusionnées tout en conservant les cellules fusionnées, vous pourriez essayer d'utiliser la fonction Rechercher et Remplacer pour sélectionner toutes les cellules fusionnées, puis appuyer sur la touche Supprimer pour supprimer la valeur. Cependant, vous recevrez un message d'avertissement "Nous ne pouvons pas faire cela sur une cellule fusionnée". Dans ce cas, comment effacer rapidement les valeurs des cellules fusionnées tout en laissant les cellules fusionnées dans Excel ?
Effacer le contenu de plusieurs cellules fusionnées avec du code VBA
Effacer le contenu de plusieurs cellules fusionnées avec Kutools pour Excel
Effacer le contenu de plusieurs cellules fusionnées avec du code VBA
Dans cette section, je peux créer un code VBA pour vous afin de résoudre cette tâche ; veuillez suivre les étapes ci-dessous.
1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre Module.
VBA : Effacer le contenu de plusieurs cellules fusionnées
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, et une boîte de dialogue apparaîtra pour vous rappeler de sélectionner la plage où vous souhaitez effacer les cellules fusionnées. Voir capture d'écran :
4. Cliquez ensuite sur OK, et le contenu des cellules fusionnées sera immédiatement effacé, laissant les cellules fusionnées vides. Voir capture d'écran :
Effacer le contenu de plusieurs cellules fusionnées avec Kutools pour Excel
Si vous avez Kutools pour Excel, avec son utilitaire Sélectionner les cellules fusionnées, vous pouvez sélectionner toutes les cellules fusionnées dans une sélection en un seul clic, puis les supprimer en une seule fois.
Après avoir installé Kutools pour Excel, veuillez procéder comme suit :
1. Sélectionnez la plage de cellules qui contient les cellules fusionnées dont vous souhaitez effacer le contenu.
2. Cliquez sur Kutools > Sélectionner > Sélectionner les cellules fusionnées, voir capture d'écran :
3. Et toutes les cellules fusionnées sont immédiatement sélectionnées. Voir capture d'écran :
4. Appuyez ensuite sur la touche Supprimer du clavier, et toutes les valeurs des cellules fusionnées seront effacées, mais les cellules fusionnées resteront telles que vous le souhaitez.
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. Profitez de fonctionnalités IA gratuites en permanence ! Obtenez-le maintenant
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification 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é de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels