Discussion :

[cecyl]

Bonjour,

je desespere, pour chaque ligne de code je passe une heure a chercher sur internet... (au passage si vous avez un bon lexique des fonctions VBA cela m interesserait, car l aide VBA ne m aide pas beaucoup)

j essaye de faire une boucle de toutes mes colonnes sur ma premiere ligne

voila ce que j ai ecris: (le probleme est dans ma boucle For)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub fct()
 
Dim wsh1 as worksheet
Dim c as range
 
set wsh1 = Sheets("Feuille1")
 
For Each c In wsh1.Range("A1",wsh1.Cells(1,Columns.Count).End(xlToRight).Column) & 1)
 
....

Je pense que je ne suis pas tres loin mais je n arrive pas a trouver la bonne formulation. J ai essaye d autres formulations aussi mais je n ai pas reussi.

Merci d avance si vous pouvez m aider !

[Duddy]

Bonjour le forum,

Voici ce que j'écrirai:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub fct()
 
Dim wsh1 as worksheet
 
set wsh1 = Sheets("Feuille1")
 
For y=1 to wsh1.Range("iv1:a1").End(xlToRight).Column
  wsh1.cells(1,y)=y
next
 
sdet wsh1=nothing

[cecyl]

Merci Duddy !