Je cherche une fonction qui me donnerait la lettre correspondant à un chiffre compris entre 1 et 26 exemple 1 = A 2 = B et 26 = Z
... et encore mieux : 27 = AA 28 = AB et 256 = IV.
en fait une fonction qui me permet de trouver la colonne XL selon un numéro.
Merci beaucoup pour votre aide.
A "A" correspond le code 65, "B" 66, and so on. Elementaire.
-- A+ Papy Bernard (RTCien malgré lui)
Gilbert
Bonjour,
Voici une fonction que je m'étais faite il y a quelques temps
Function ConvEntierColonneExcel(ByVal Valeur As Long) As String If Valeur > 256 Then Valeur = 256 'Pour Excel la limite est de 256 colonnes If Valeur < 1 Then Valeur = 1 'Pour Excel la limite est de 256 colonnes If Valeur < 27 Then ConvEntierColonneExcel = Chr(Valeur + 64) Else 'Valeur-1 sinon erreur pour les multiples de 26 ConvEntierColonneExcel = ConvEntierColonneExcel((Valeur - 1) 26) & ConvEntierColonneExcel(Valeur - (((Valeur - 1) 26) * 26)) End If End Function
Gilbert
"JPG" a écrit dans le message de news:
Bonjour,
Je cherche une fonction qui me donnerait la lettre correspondant à un chiffre compris entre 1 et 26 exemple 1 = A 2 = B et 26 = Z
... et encore mieux : 27 = AA 28 = AB et 256 = IV.
en fait une fonction qui me permet de trouver la colonne XL selon un numéro.
Merci beaucoup pour votre aide.
Bonjour,
Voici une fonction que je m'étais faite il y a quelques temps
Function ConvEntierColonneExcel(ByVal Valeur As Long) As String
If Valeur > 256 Then Valeur = 256 'Pour Excel la limite est de 256
colonnes
If Valeur < 1 Then Valeur = 1 'Pour Excel la limite est de 256 colonnes
If Valeur < 27 Then
ConvEntierColonneExcel = Chr(Valeur + 64)
Else
'Valeur-1 sinon erreur pour les multiples de 26
ConvEntierColonneExcel = ConvEntierColonneExcel((Valeur - 1) 26) &
ConvEntierColonneExcel(Valeur - (((Valeur - 1) 26) * 26))
End If
End Function
Gilbert
"JPG" <jpg@jpg.fr> a écrit dans le message de
news:F387DEE3-8F8E-472B-BE34-BFB61F2D3781@microsoft.com...
Bonjour,
Je cherche une fonction qui me donnerait la lettre correspondant à un
chiffre compris entre 1 et 26
exemple
1 = A
2 = B
et 26 = Z
... et encore mieux :
27 = AA
28 = AB
et 256 = IV.
en fait une fonction qui me permet de trouver la colonne XL selon un
numéro.
Voici une fonction que je m'étais faite il y a quelques temps
Function ConvEntierColonneExcel(ByVal Valeur As Long) As String If Valeur > 256 Then Valeur = 256 'Pour Excel la limite est de 256 colonnes If Valeur < 1 Then Valeur = 1 'Pour Excel la limite est de 256 colonnes If Valeur < 27 Then ConvEntierColonneExcel = Chr(Valeur + 64) Else 'Valeur-1 sinon erreur pour les multiples de 26 ConvEntierColonneExcel = ConvEntierColonneExcel((Valeur - 1) 26) & ConvEntierColonneExcel(Valeur - (((Valeur - 1) 26) * 26)) End If End Function
Gilbert
"JPG" a écrit dans le message de news:
Bonjour,
Je cherche une fonction qui me donnerait la lettre correspondant à un chiffre compris entre 1 et 26 exemple 1 = A 2 = B et 26 = Z
... et encore mieux : 27 = AA 28 = AB et 256 = IV.
en fait une fonction qui me permet de trouver la colonne XL selon un numéro.
