bonjour,
je t'en fais 2 pour le prix d'une:
la première qui passe par un range
Sub test()
For i = 1 To 50
Range(Split(Cells(1, i).Address, "$")(1) & "1").Select
Next i
End Sub
Mais sauf exception, il ne viendrait à l'idée de personne d'utiliser celà. Habituellement on utilise :
Sub test2()
For i = 1 To 50
Cells(1, i).Select
Next i
End Sub
A ma connaissance il n'est pas possible de passer directement par A... Z
sauf à passer par la valeur asci ce qui de toute façon est sans intéret car on serait bloqué à la 27 ème colonne.
A+