Effacer des cellules sur plusieurs feuilles
cestmoipaslui
Messages postés
26
Statut
Membre
-
cestmoipaslui Messages postés 26 Statut Membre -
cestmoipaslui Messages postés 26 Statut Membre -
Bonjour,
J'ai fait une macro pour effacer des données page par page, mais est-il possible de ne faire qu'une macro pour toutes les feuilles?
Effacer une cellule cela pourrait être:
Sheets(ActiveSheet.Name).Cells(10,20)
Mais pour une plage est-ce possible?
Merci
J'ai fait une macro pour effacer des données page par page, mais est-il possible de ne faire qu'une macro pour toutes les feuilles?
Effacer une cellule cela pourrait être:
Sheets(ActiveSheet.Name).Cells(10,20)
Mais pour une plage est-ce possible?
Merci
3 réponses
-
Bonjour,
Effacer contenu d'une meme plage de cellules sur toutes les feuilles
Sub test() For x = 1 To Worksheets.Count Worksheets(x).Range("A1:C12").ClearContents Next x End Sub -
Bonjour,
Exemple de macro à mettre dans un module, et exécuter par un bouton de commande formulaire (efface les données dans la plage A1: L35) sur feuil1,feuil2,feuil3
Sub Reset()
With Feuil1.Range("A1:L35")
.ClearContents
End With
With Feuil2.Range("A1:L35")
.ClearContents
End With
With Feuil3.Range("A1:L35")
.ClearContents
End With
End Sub
Slts -
