Sub MacroMultiFeuilles()
For sh = 1 To 3
Sheets("feuille" & sh).Range("A1:A65536").Delete
Next
End Sub
En fait ce n'est pas feuille le nom de l'onglet mais : "1" , "2" , "3"
Cdlt
Sub MacroMultiFeuillesBIS()
For sh = 1 To 3
Sheets(CStr(sh)).Columns(1)= Empty
Next
End Sub
Donc A1 aussi normalement ?Je souhaite avoir une macro permettant de supprimer tout le contenu présent dans la colonne A
Staple1600;1123359[B à dit:Papounet[/B]:
Pour lever le mystère
Code:Sub MacroMultiFeuillesBIS() For sh = 1 To 3 Sheets(CStr(sh)).Columns(1)= Empty Next End Sub
mais je ne comprends toujours pourquoi ça fonctionnait avec sh=1 et 2.
Sub MacroMultiFeuilles()
For sh = 1 To 3
Sheets(sh).Range("A2:A65536").Delete
Next
End Sub
Bonjour à tous,
Dans le fichier du post #3 on a :
sh est pris comme index des feuilles donc ce sont les feuilles "Feuil1" (vide) "1" et "2" qui sont traitées.Code:Sub MacroMultiFeuilles() For sh = 1 To 3 Sheets(sh).Range("A2:A65536").Delete Next End Sub
A+