Téléchargement
illégal
Posez votre question Signaler

Conversion en vba

usdy 233Messages postés 4 août 2008Date d'inscription 26 juin 2011Dernière intervention - Dernière réponse le 16 janv. 2009 à 10:26
Bonjour,
Dans ma procédure en vba, je fais une boucle "for" qui va de la cellule A10 à Z10 et je souhaite récuperer la lettre
correspondant à la colonne contenant le mot "prix".
Je sais que pour récuperer le numéro de la ligne il faut utiliser .row mais pour récuperer la colonne, j'ai fait un .column mais il m'affiche la colonne en nombre, c'est à dire qu'il m'affiche 2 pour la lettre B : existe-t-il un moyen de convertir un entier en lettre?
Merci de m'aider
Lire la suite 

Conversion en vba »

2 réponses
Réponse
+0
moins plus
blfr 54Messages postés 15 décembre 2008Date d'inscription 16 janv. 2009 à 09:13
Bien sur!Il suffit de faire

lettreColonne= Chr(leNumeroDeTaColonne + 64)

malgré les dix jours de retard j'espère que ça va te servir

 Ajouter un commentaire
Ajouter un commentaire
Réponse
+0
moins plus
lermite222 7110Messages postés 8 avril 2007Date d'inscription 14 février 2012Dernière intervention 16 janv. 2009 à 10:26
Bonjour,
Mai où ça devient plus compliquer c'est pour les colonne AA, AB, AC etc..
Vaux mieux travailler avec les numéros et employer Cells à la place de Range
Cells(Ligne,Colonne)= Résultat
ou l'inverse 
Lig = ActiveCell.Row
for i= 1 to 20 'si tu a 20 colonnes
    if cells(Lig,i)="Prix" then
    'Traitement
    end if
next i

et si tu veux absolument travailler avec Range, Range(Cells(Ligne,Colonne),Cells(Ligne,Colonne))

Aussi un peu tard mais ça peu servir pour d'autre.
A+

Ajouter un commentaire
Ajouter un commentaire
Posez votre question
Ce document intitulé « conversion en vba » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
5 extensions si vous voulez revenir à l'ancien Facebook