[VBA] calcul de la lettre d'une colonne à partir d'un chiffre
9 réponses
Jean Bidule
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne
(donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)).
Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne
pas ca du tout évidemment.
x = Cells(2, 27).Address(ReferenceStyle:=xlA1) -> AA2
JB
isabelle
bonjour Jean,
no = 256 lettre = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(ROW()," & no & ",4)),LEFT(ADDRESS(ROW()," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne (donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)). Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne pas ca du tout évidemment.
Bien à vous et merci de votre attention Jean
bonjour Jean,
no = 256
lettre = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(ROW()," & no & ",4)),LEFT(ADDRESS(ROW()," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne
(donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)).
Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne
pas ca du tout évidemment.
no = 256 lettre = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(ROW()," & no & ",4)),LEFT(ADDRESS(ROW()," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne (donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)). Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne pas ca du tout évidemment.
Bien à vous et merci de votre attention Jean
isabelle
un peu plus court :
no = 256 x = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(1," & no & ",4)),LEFT(ADDRESS(1," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne (donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)). Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne pas ca du tout évidemment.
Bien à vous et merci de votre attention Jean
un peu plus court :
no = 256
x = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(1," & no & ",4)),LEFT(ADDRESS(1," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne
(donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)).
Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne
pas ca du tout évidemment.
no = 256 x = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(1," & no & ",4)),LEFT(ADDRESS(1," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne (donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)). Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne pas ca du tout évidemment.
Bien à vous et merci de votre attention Jean
AV
Avec une variable "numCol" représentant le N° de colonne :
Pour version XL >= 2000 : Split(Cells(1, numCol).Address, "$")(1)
no = 256 x = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(1," & no & ",4)),LEFT(ADDRESS(1," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne (donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)). Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne pas ca du tout évidemment.
Bien à vous et merci de votre attention Jean
Super, merci beaucoup Isabelle
"isabelle" <hoHoho@hohoHo> a écrit dans le message de news:
u1GtN87fGHA.4004@TK2MSFTNGP04.phx.gbl...
un peu plus court :
no = 256
x = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(1," & no &
",4)),LEFT(ADDRESS(1," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne
(donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)).
Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne
pas ca du tout évidemment.
no = 256 x = Evaluate("=IF(" & no & "<26,LEFT(ADDRESS(1," & no & ",4)),LEFT(ADDRESS(1," & no & ",4),2))")
isabelle
Bonjour le forum,
Existe-t-il un moyen de calculer en VBA la lettre d'une certaine colonne (donnée en chiffre) ?
Par exemple : le chiffre 1 donne la lettre "A" (réalisé avec chr(64+1)). Mais pour le chiffre 27, il faudrait obtenir "AA"; or chr(64+27) ne donne pas ca du tout évidemment.
Bien à vous et merci de votre attention Jean
Jean Bidule
Merci beaucoup AV, très gentil à vous
"AV" a écrit dans le message de news:
Avec une variable "numCol" représentant le N° de colonne :
Pour version XL >= 2000 : Split(Cells(1, numCol).Address, "$")(1)