Suite Alphabétique

Résolu
cs_Bidibop Messages postés 12 Date d'inscription mercredi 28 février 2007 Statut Membre Dernière intervention 27 mars 2007 - 27 mars 2007 à 09:00
cs_Bidibop Messages postés 12 Date d'inscription mercredi 28 février 2007 Statut Membre Dernière intervention 27 mars 2007 - 27 mars 2007 à 10:54
Bonjour,

Comment réaliser une suite alphabétique dans le même principe que pour les chiffres :

i = 1
Do While i <> 20
msgbox i
i = i +1
loop

J'ai bien essayé avec ça mais ça ne marche pas :

h = "a"

Do While h <> "z"

msgbox h
 
h= h+1

loop

Peut-avec avec le code Ascii des lettres ...

Qui peut m'aider ?

Merci.

6 réponses

Molenn Messages postés 797 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 23 février 2011 7
27 mars 2007 à 10:49
Si tu as besoin des lettres, je suppose que tu tentes de parcourir ta plage de cellule Excel avec un Range.

Ne t'embête pas, il te suffit plutôt de parcourir la même plage avec Cells, qui te permet de définir une cellule par un numéro de ligne et de colonne.

Par ex, pour parcourir un tableau A1:Z10, il te suffit d'imbriquer 2 boucles :

Dim Ligne as integer
Dim Colonne as integer

For Ligne = 1 to 10
   For Colonne = 1 to 26
       Msgbox cells(Ligne, Colonne).value
   Next Colonne
Next Ligne

Molenn
3
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
27 mars 2007 à 09:05
oui, avec le code ascii

Dim i As Integer
   For i = 97 To 122
       MsgBox ChrW$(i)
   Next i, ----
By Renfield

ou si ces valeurs ne t'inspirent pas :

Dim i As Integer
   For i = AscW("a") To AscW("z")
       MsgBox ChrW$(i)
   Next i, ----
By Renfield

Renfield
Admin CodeS-SourceS- MVP Visual Basic
0
jmfmarques Messages postés 7666 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 27
27 mars 2007 à 09:07
Bonjour,

"Peut-avec avec le code Ascii des lettres ... "

Ben... tu l'as dit toi-même....
Regarde donc à quoi servent Asc et Chr et utilise-les, pardi
0
cs_Bidibop Messages postés 12 Date d'inscription mercredi 28 février 2007 Statut Membre Dernière intervention 27 mars 2007
27 mars 2007 à 09:33
Merci beaucoup pour ces 2 réponses.

En fait grâce à ça, j'aimerai dans mon tableau Excel parcourir les cellules A1, B1 ...Z1, AA1, AB1, AC1 etc ....
 pour vérifier si elles sont vides.

Je peux donc aller de A à Z pusique j'arrive à obtenir ma suite de lettres et de chiffres mais comment faire pour la suite ?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
jmfmarques Messages postés 7666 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 27
27 mars 2007 à 09:37
Cette nouvelle question est très différente de la 1ère et devrait donc faire l'objet d'une nouvelle discussion, à ouvrir, si finalement tu développes sous VBA, dans la section langages dérivés - VBA (tu es ici dans la section VB6 !).
D'autant qu'il y a sans doute d'autres méthodes pour définir et parcourir une place de cellules ...
0
cs_Bidibop Messages postés 12 Date d'inscription mercredi 28 février 2007 Statut Membre Dernière intervention 27 mars 2007
27 mars 2007 à 10:54
Merci Molen, c'est ce que je cherchais.
0
Rejoignez-nous