Jack

Résolu/Fermé
Jack - 8 janv. 2017 à 19:31
jac-1943 Messages postés 4 Date d'inscription lundi 9 janvier 2017 Statut Membre Dernière intervention 9 janvier 2017 - 9 janv. 2017 à 15:53
Bonjour,
Comment faire pour retrouver les deux lettres d'une colonne dont on a le numéro ?
Merci beaucoup.
Jack


5 réponses

pepe35 Messages postés 73 Date d'inscription mardi 6 mai 2008 Statut Membre Dernière intervention 5 avril 2017 10
8 janv. 2017 à 19:34
Bonjour,

Pas très explicite ta question.
Pourrais-tu donner plus d'informations ?

A+

pépé35
3
 
Bonjour pepe35,

Si, c'est explicite : Jack a le de la colonne, par exemple : 30,
et il veut savoir à quelle colonne en lettres ça correspond.

Ici, la colonne n° 30 est la colonne AD.

Je te laisse lire mon message #4 pour une solution possible.

Cordialement.  :)
0
Jac-1943 > Utilisateur anonyme
9 janv. 2017 à 13:12
Merci pepe35, c'est en VBA que j'aîmerai une réponse.
Au plaisir de te lire.
Mon nouveau nom ewt jac-1943.
0
Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 394
Modifié par Vaucluse le 8/01/2017 à 21:05
Bonsoir

si le simple code ADRESSE ne suffit pas (?) et qu'il soit nécessaire de ressortir uniquement le nom

pour un numéro de colonne en A1 par exemple:

=SUBSTITUE(GAUCHE(ADRESSE(1;A1);TROUVE("$";ADRESSE(1;A1);2)-1);"$";"")

crdlmnt

La qualité de la réponse dépend surtout de la clarté de la question, merci!
1
Utilisateur anonyme
8 janv. 2017 à 20:44
Bonjour Jack,

Voici un exemple, à adapter :

En A1 : =ADRESSE(5;30) => $AD$5
En B1 : =DROITE(A1;NBCAR(A1)-1) => AD$5
En C1 : =GAUCHE(B1;CHERCHE("$";B1)-1) => AD

Rappel : avec Excel 2007, les colonnes vont de A à XFD,
donc une colonne peut être sur 1 à 3 lettres ; d'où la
fonction CHERCHE().

Cordialement.  :)
0
Rebonjour Jack,

Voici un exemple (adapter le n° de colonne) :

En A1 : =ADRESSE(1;30)

Comme tu cherches la colonne, mets toujours 1
pour le n° de ligne, car il ne doit pas dépasser
un caractère ; donc de 1 à 9.

Utilise ensuite cette formule :

=GAUCHE(SUBSTITUE(A1;"$";"");NBCAR(A1)-3)

Note que l'utilisation de la cellule A1 permet
d'éviter de mettre 2× ADRESSE(1;30) dans
la formule => formule plus courte et aussi
plus lisible.

Cordialement.  :)
0

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

Posez votre question
jac-1943 Messages postés 4 Date d'inscription lundi 9 janvier 2017 Statut Membre Dernière intervention 9 janvier 2017
9 janv. 2017 à 12:16
Merci à tous pour votre réponse. J'ai essayé de rendre plus claire ma question.
0
Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 394
Modifié par Vaucluse le 9/01/2017 à 12:36
Bonjour
avez vous trouvé votre solution? Si oui, pointez le sujet comme résolu en dessous du titre.
si non, expliquez ce qui ne va pas
crdlmnt
0
jac-1943 Messages postés 4 Date d'inscription lundi 9 janvier 2017 Statut Membre Dernière intervention 9 janvier 2017 > Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022
9 janv. 2017 à 12:59
Merci Vaucluse,
Je n'avais pas dit que c'était en VBA et j'attends une réponse.
Merci encore.
0
Utilisateur anonyme > jac-1943 Messages postés 4 Date d'inscription lundi 9 janvier 2017 Statut Membre Dernière intervention 9 janvier 2017
Modifié par albkan le 9/01/2017 à 14:35
 
Bonjour Jack,

Je te propose ce code VBA :


Option Explicit

Sub Essai()
  Dim chn As String: chn = Cells(1, 30).Address
  chn = Mid$(chn, 2, InStr(2, chn, "$") - 2)
  MsgBox chn
End Sub


colonne 30 => affichage de "AD"

Cordialement.  :)
0
Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 394 > Utilisateur anonyme
9 janv. 2017 à 14:34
comme c'est bien quand c'est court, net et précis, sans fioritures!
0
jac-1943 Messages postés 4 Date d'inscription lundi 9 janvier 2017 Statut Membre Dernière intervention 9 janvier 2017 > Utilisateur anonyme
9 janv. 2017 à 15:52
Merci albkan, çà marche...
0