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 maintenant effacer tout le contenu des cellules fusionnées tout en conservant les cellules fusionnées. Normalement, vous pouvez essayer d'appliquer le Rechercher et remplacer pour sélectionner d'abord toutes les cellules fusionnées, puis appuyez sur Supprimer clé pour supprimer la valeur, cependant, vous obtiendrez un message d'avertissement "On ne peut pas faire ça à une cellule fusionnée". Dans ce cas, comment effacer les valeurs dans les cellules fusionnées tout en laissant les cellules fusionnées rapidement dans Excel?
Effacer le contenu de plusieurs cellules fusionnées avec le code VBA
Effacer le contenu de plusieurs cellules fusionnées avec Kutools for Excel
Effacer le contenu de plusieurs cellules fusionnées avec le code VBA
Cette section, je peux créer un code VBA pour que vous résolviez cette tâche, procédez comme suit:
1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2Cliquez sur insérer > Moduleet collez le code suivant dans le Module Fenêtre.
VBA: effacez 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. Puis appuyez F5 clé pour exécuter ce code, et une boîte de dialogue apparaîtra pour vous rappeler de sélectionner la plage que vous souhaitez effacer les cellules fusionnées, voir capture d'écran:
4. Et puis cliquez OK, le contenu des cellules fusionnées a été effacé à la fois et laisse les cellules fusionnées vides, voir capture d'écran:
Effacer le contenu de plusieurs cellules fusionnées avec Kutools for Excel
Si vous avez Kutools for Excel, Avec son Sélectionnez les cellules fusionnées utilitaire, vous pouvez sélectionner toutes les cellules fusionnées dans une sélection en un seul clic, puis les supprimer en même temps.
Kutools for Excel : avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation en 30 jours. |
Après l'installation de Kutools for Excel, veuillez procéder comme suit :( Téléchargez gratuitement Kutools pour Excel maintenant )
1. Sélectionnez la plage de cellules contenant les cellules fusionnées dont vous souhaitez effacer le contenu.
2Cliquez sur Kutools > Sélectionnez > Sélectionnez les cellules fusionnées, voir capture d'écran:
3. Et toutes les cellules fusionnées ont été sélectionnées immédiatement, voir capture d'écran:
4. Puis appuyez Supprimer sur le clavier, et toutes les valeurs des cellules fusionnées ont été sélectionnées, mais laissez les cellules fusionnées selon vos besoins.
Cliquez pour en savoir plus sur cet utilitaire Sélectionner les cellules fusionnées…
Téléchargez gratuitement Kutools pour Excel maintenant
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!