dérniere collone pleine

mth

XLDnaute Barbatruc

• 13 Septembre 2010

• #2

Re : dérniere collone pleine

Bonjour,

Peut-être en demandant l'adresse?

Code:

k = Workbooks("Suivi_Obj 2009-2010.xls").Sheets("2010").Range("IV4").End(xlToLeft).address

@ +

 

Vote positif 0 Vote négatif

A

akramenergie

XLDnaute Occasionnel

• 13 Septembre 2010

• #3

Re : dérniere collone pleine

Merci pour ta réponse mth.
le resulta afficher est $F$4 parcontre est ce que il y a un moyen de récuperer juste le F tout cours.

 

Vote positif 0 Vote négatif

mth

XLDnaute Barbatruc

• 13 Septembre 2010

• #4

Re : dérniere collone pleine

re 🙂

Je viens de retrouver un code de notre grand Hasco (à qui je fais une grosse bise) répondant à ta question:

Code:

k = Split(Workbooks("Suivi_Obj 2009-2010.xls").Sheets("2010").Range("IV4").End(xlToLeft).address, "$")(1)

@ +

mth

Edit: Grosse bise Robert 🙂
Bien contente de te croiser 🙂

 

Dernière édition: 13 Septembre 2010

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 13 Septembre 2010

• #5

Re : dérniere collone pleine

Bonjour le fil, bonjour le forum,

Essaie comme ça :

Code:

col = Split(Workbooks("Suivi_Obj 2009-2010.xls").Sheets("2010").Range("IV4").End(xlToLeft).Address, "$", -1)(1)

Édition :

Ooops j'ai pris un coup de sax... on s'est croisé Mth

 

Vote positif 0 Vote négatif

A

akramenergie

XLDnaute Occasionnel

• 13 Septembre 2010

• #6

Re : dérniere collone pleine

merci robet et mth pour votre réponsse.🙂
j'ai une dérniere question a ce sujet je veut remplacer la valeur 163 dans ma ligne de code suivante : r = Workbooks("Suivi_Obj 2009-2010.xls").Sheets("2010").Range("IV163").End(xlToLeft).Column + 1
par la variable "t", j'ai esséyer avec cela mais sa fonctione pas:
r = Workbooks("Suivi_Obj 2009-2010.xls").Sheets("2010").Range("IV" & t ).End(xlToLeft).Column + 1

merci de votre aide

 

Vote positif 0 Vote négatif

A

akramenergie

XLDnaute Occasionnel

• 13 Septembre 2010

• #7

Re : dérniere collone pleine

c'est bon merci le probléme est résolut juste oublier de mettre une parantése dans ma formule🙂

 

Vote positif 0 Vote négatif