repérage derniere colonne

Charly2

Nous a quittés en 2006

Repose en paix

• 28 Mars 2006

• #2

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+

 

Vote positif 0 Vote négatif

T

toinish

XLDnaute Nouveau

• 28 Mars 2006

• #3

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

 

Vote positif 0 Vote négatif

C

Creepy

XLDnaute Accro

• 28 Mars 2006

• #4

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

 

Vote positif 0 Vote négatif

N

ninou58

XLDnaute Occasionnel

• 28 Mars 2006

• #5

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

 

Vote positif 0 Vote négatif

A

AV

Guest

• 28 Mars 2006

• #6

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

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

AV [MVP Excel]

 

Vote positif 0 Vote négatif

Charly2

Nous a quittés en 2006

Repose en paix

• 28 Mars 2006

• #7

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+

 

Vote positif 0 Vote négatif

T

toinish

Guest

• 28 Mars 2006

• #8

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!!

 

Vote positif 0 Vote négatif