Discussion :

[jbggg]

bonjour à tous,

ai-je le droit d'écrire ceci (je souhaite le mettre dans mon thisWorkBook):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim cel As Range
 
For Each cel In Range("feuille1!A10:B10,feuille2!A15:B20") 'je ne suis pas sure
 cel = ""
 
    Next

[Bevan]

Salut

ai-je le droit d'écrire ceci

Oui, personne ne te l'interdit

est-ce que ça marche

Bof, mais tu le savais déjà, non ?


Bon :
1. Essaye

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("feuille1").Range("A10:B10,A15:B20").cells

(c'est pas feuil1 ?)

2. Pas besoin du foreach

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("feuille1").Range("A10:B10,A15:B20").value = ""

3. ou mieux

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("feuille1").Range("A10:B10,A15:B20").ClearContents

[Godzestla]

Salut
Citation:ai-je le droit d'écrire ceci

Oui, personne ne te l'interdit