supprimer...

Question

slt
je voudrais savoir commetn faire pour créer une macro qui supprime le contenu de plusieurs cellules en boucle sur plusieur feuilles différentes
merci

cs_CanisLupus · Answer

Salut,

Sheets(NomFeuille).Range(TaPlage).ClearContents

NomFeuille est une variable contenant le nom de la feuille :

NomFeuille = "Feuil1" par exemple

TaPlage est une variable contenant le nom de la cellule ou de la plage a effacer.

TaPlage = "A1"
TaPlage = "A" & i ' i représentant la ligne
Taplage = "A1:B3"
Taplage = "A" & i & ":" & "B" & j"
.....

Cordialement, CanisLupus

fghk · Answer

ok merci beaucoup 
et la variabla il fo la rentré avec dim sé sa?

cs_CanisLupus · Answer

Si tu es en Option Explicit, il faut que tu fasses un dim i as ineteger.

Pour la suite, un exemple (option explicit ou non)

for i = 1 to 10
Sheets(NomFeuille).Range("A" & i ).ClearContents
next

ça effacera les cellules A1 à A10 de la feuille 'NomFeuille'

Cordialement, CanisLupus

cs_CanisLupus · Answer

Oups, erreur de frappe ou autre :
à la place de 
dim i as ineteger
c'est 
dim i as integer

Cordialement, CanisLupus

fghk · Answer

autre question ....
comment on fé pour "consolider" des cellules
je m'explique en fait je veux que dans un tableau de la feuille 1 par exemple, on puisse avoir la somme des montant des tableaux se trouvant sur les otres feuilles 2,3 ect...
merci encore de l'aide

Supprimer...

5 réponses

Discussions similaires