repérage derniere colonne

[toinish]

bonjour tt le monde!
j ai l habitude d utiliser les code suivant :
last = Range('B65536').End(xlUp).Row
pour repérer la derniere ligne (ici sur la colonne B) remplie. Je souhaiterai faire la meme chose pour la derniere colonne remplis sachant que mon tableau se remplit de gauche a droite...
Merci d'avance.

 

[Charly2]

Bonjour Toinish, bonjour à toutes et à tous

Presque de la même façon :

Range('IV1').End(xlToLeft).Column

à condition que ta ligne 1 soit remplie, sinon tu changes la ligne

A+

 

[toinish]

Super merci beaucoup!!
c etait pas bien compliqué mais fallait le savoir!

 

[Creepy]

Bonjour le Forum, Toinish,


Tu as 4 possibilité sur cette commande : last = Range('B65536').End(xlUp).Row

- xlUp = vers haut
- xlDown = vers le bas
- XlToLeft = vers la gauche
- XlToRight = Vers la droite

Donc dans ton cas : Feuil1.Range('A5').End(xlToRight).Column

@+

Creepy

Edit : Ouuuppsss doublons !! Hello à vous deux

Message édité par: Creepy, à: 28/03/2006 09:38

 

[ninou58]

Salut tout le monde!

dl1 = Worksheets('nomfeuille').Range('A1').End(xlToRight).Column

Je l'ai testé avant, ca a l'air de fonctionner


Oups tous ensemble!!!

Message édité par: ninou58, à: 28/03/2006 09:38

 

[AV]

Pour être bien sur de retourner la dernière colonne renseignée :

MsgBox Cells.Find('*', [A1], , , xlByColumns, xlPrevious).Column

AV [MVP Excel]

 

[Charly2]

re Toinish, bonjour Creepy, Ninou et Alain,

Effectivement, pour être certain de tomber sur la dernière colonne, la solution proposée par Alain est parfaite, surtout si on a pas de ligne de titres...

A+

 

[toinish]

oula!! beaucoup de reponses pour une simple question!! Merci a tous j ai gardé la solution de charly (1ere arrivése) et ca fonctionne tres bien

Merci a tous, j apprends un peu plus chaque jour grace a vous!!