Problème sélection

[Chico64]

Bonsoir à Tous,

Serait-il possible de créer une boucle FOR non avec des chiffres mais avec des lettres ?

En fait, je souhaiterais travailler sur ma sélection.

Dim I As Integer
Dim L As String

Range(L & I & :L & I).Select 'ca ne marche pas

Que L commence à A et finisse à BA et I commence à 2 et finisse à 25 par exemple.
Une sélection qui commencera en

Range("A2:A25").Select

et qui finira en

Range("BA2:BA25").Select

Peut être utiliser 2 boucles for: la premiere pour L et la seconde pour I.

Vous remercie de m'aider.

Chico.

 

[Roland_M]

Re : Problème sélection

bonsoir

sauf erreur comme ceci

'A-Z=26 + AA-AZ=26 + BA soit 53
For Colonne = 1 To 53
X = Range(Cells(2, Colonne), Cells(25, Colonne))
Next

 

[Chico64]

Re : Problème sélection

Merci beaucoup pour votre rapidité,

'A-Z=26 + AA-AZ=26 + BA soit 53
For Colonne = 1 To 53
X = Range(Cells(2, Colonne), Cells(25, Colonne))
Next

Je n'ai pas le cours sur

Range(Cells(2, Colonne), Cells(25, Colonne))

Pourrais-tu m'expliquer:
Pourquoi X?
Cells(2, Colonne) : veut dire cellule avec pour ligne 2 et colonne A, B, ...
Cells(25, Colonne) : veut dire cellule avec pour ligne 25 et colonne A, B, ...

 

[job75]

Re : Problème sélection

Bonsoir Chico, Roland,

Une solution avec Offset (voir l'aide VBA) :

For i = 0 To 52
Range("A2:A25").Offset(0, i).Select
Next

A+

 

[Chico64]

Re : Problème sélection

Je vous remercie Roland_M et job75 pour vos deux solutions c'est vrai que la solution avec Offset est intéressante je l'oublie parfois mais elle est super pour se déplacer dans les lignes ou colonnes.

Chico.