Extraire la lettre (nom de la colonne) d'une cellule

stephseiy Messages postés 3 Date d'inscription vendredi 6 juin 2003 Statut Membre Dernière intervention 1 juillet 2003 - 1 juil. 2003 à 10:13
stephseiy Messages postés 3 Date d'inscription vendredi 6 juin 2003 Statut Membre Dernière intervention 1 juillet 2003 - 1 juil. 2003 à 11:02
Bonjour à tous,
En VBA , je cherche à connaitre la lettre de la colonne de la cellule que je viens de trouver.
Pour faire clair:
j'ai le nom d'une cellule ex: "B5" et par programme je veux avoir le "B" car ensuite j'ai une gestion sur toute la colonne.

Merci de me repondre, car cette petite chose me pourri la journée.

2 réponses

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
1 juil. 2003 à 10:55
Bonjour
Une possibilité :
Dim Lettre As String, NomCellule As String, i As Integer
NomCellule = "B5" ' à compléter par programme
Lettre = Left(NomCellule, 1)
For i = 2 To Len(NomCellule)
If Asc(UCase(Mid(NomCellule, i, 1))) > 64 Then
Lettre = Lettre & Mid(NomCellule, i, 1)
End If
Next i
0
stephseiy Messages postés 3 Date d'inscription vendredi 6 juin 2003 Statut Membre Dernière intervention 1 juillet 2003
1 juil. 2003 à 11:02
Je te remercie, mais je pensais que peux être il y avait une ""fonction"" en vba qui le fesait automatique, car pour l'instant le mieux que j'obtiens c'est $B$5.
En plus vu que mon tableau et plutot grand (environ de A à GW et plus de 2000 lignes) la moindre modif à de mauvaise actions.

Si quelqu'un à un autre solus , ça serait sympa
0
Rejoignez-nous