Compter des colonnes

Bonjour a tous,

J'ai un probleme relativement simple.
J'ai un tableau avec un certains nombre de colonne (dont le nombre peut changer).

Je veux faire une boucle for sur toutes ces colonnes et donc plutot que de faire

Code:

---

For colonne = 1 To 12 ...

---

Je voudrais faire :

Code:

---

For colonne = 1 To derniereColonne

---

Öon probleme vient de l'ecriture du calcul de la derniere colonne :

J'ai ecris :

Code:

---

derniereColonne = Hauptgewerke.Cells(1, Columns.Count).End(xlright).Column

---

Et ca me met une erreur. J'ai pourtant simplement adapte le comptage de ligne au comptage de colonne...

je comprend pas d'ou vient le probleme !

Salut,

C'est to .end qui pose problème.

Premièrement, lorsque c'est un "déplacement" horizontal, on écrit

Code:

---

XlToRight

---

Mais en utilisant Columns.count, tu indique le numéro de la dernière colonne, donc tu ne dois pas aller à droite mais revenir à gauche, donc XlToLeft.
Le bon code:

Code:

---

derniereColonne = Hauptgewerke.Cells(1, Columns.Count).End(xlToLeft).Column

---

A+