1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6
Sujet Précédent Sujet Suivant

Effacer les Cellules non Protéger d'une Feuil Excel

Signaler
Messages postés
6
Date d'inscription
samedi 10 novembre 2007
Statut
Membre
Dernière intervention
14 février 2010
 -
Messages postés
3874
Date d'inscription
mardi 8 mars 2005
Statut
Modérateur
Dernière intervention
7 novembre 2014
 -
Bonjour
Je suis un débutant en VBA
Voila j'ai un classeur Nome FACTURE Excel(V.2003)
Je suis sur une Feuil C
Je voudrais effacer les contenues de touts les cellules
Non Protéger d'un tableau dans la Feuil A
J'ai utiliser une boucle
Fro i=1 to Sheets.Count
Sheets(i).cells.Clear
Next i
Mais elle ne fonctionne pas
La boucle efface tout la feuil A

2 réponses

Réponse 1 / 2
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
 240
Bonjour,
Il te faut créer un range des cellules à effacer
set ton_range = sheets(i)......
puis :
ton_range.clearcontents


____________________
Vous aimez Codes-Sources ? Il vous aide ? Cliquez ici pour l'aider à continuer
Cliquer sur "Réponse acceptée" en bas d'une solution adéquate est
Réponse 2 / 2
Messages postés
3874
Date d'inscription
mardi 8 mars 2005
Statut
Modérateur
Dernière intervention
7 novembre 2014
 14
Bonjour,

Pour une question VBA, merci de poster sur vbfrance dans le thème approprié.

[ Déplacé sur vbfrance ]
Répondre Posez votre question