Travail sur une autre feuille

J

JPM

Guest

• 24 Février 2006

• #2

Bonjour,

Essayes ceci :

Dim p As Range
Dim c As Range
Set p = Sheets('Historique').Range('A2').CurrentRegion

For Each c In p
...
Next

Bonne journée

Jean-Pierre

 

Vote positif 0 Vote négatif

S

Spock

XLDnaute Occasionnel

• 24 Février 2006

• #3

Bonjour jpm,

Pas mal, effectivement il fait une boucle dans la selection. J'ai même le nombre de cellules dans la selection. MAIS, je n'ai pas la valeur de chaque cellule. Ca c'est embétant.

Une idée ? Mercii.

 

Vote positif 0 Vote négatif

J

JPM

Guest

• 24 Février 2006

• #4

Je ne comprends pas bien ce que tu veux !

La variable objet p correspond à la plage autour de A2, et la variable objet c représente chaque cellule de p. Donc en utilisant les méthodes et propriétés tu peux accéder au contenu, format et tout ce que tu veux.

Par exemple : c.value, c.text, c.font, ...

Précise davantage

Jean-Pierre

 

Vote positif 0 Vote négatif

S

Spock

XLDnaute Occasionnel

• 24 Février 2006

• #5

oups, effectivement, je crois avoir été trop vite :S

J'étais tellement passionné par la variable p (géniale) que j'ai négligé c.

Vivement lundi que j'essayes ça.

Merci et désole.

 

Vote positif 0 Vote négatif