Discussion :

[gapgap]

Je n'ai pas trouvé dans l'aide...

Comment obtenir la référence de la colonne n ?

Ex: Si n=40 je veux que ça me retourne "AN", de même que si je sais "AN", je veux que ça me retourne 40.

[Vesta]

Dénomination de colonne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
NoColonne=40
DenomCol = Left$(cells(1,NoColonne).Address(0, 0), (NoColonne < 27) + 2)

No de colonne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
DenomCol="AN"
NoColonne  = Range(DenomCol & "1").Column

[gapgap]

Pour l'index en fonction de la référence, c'est exactement ce que je voulais

Pour la référence en fonction de l'index, j'avais déjà fait en truc dans le genre mais je pensais qu'il y avait une solution plus élégante.

En tout cas, merci


(je ne mets pas ce topic tout de suite en "résolu", au cas où la solution "élégante" existe )

[random]

=SI(ENT(index/26)>0;CAR(ENT(index/26)+64);"")&CAR(MOD(index;26)+64)

[random]

=colonne(ref & 1)

[gapgap]

oui on a aussi:

=left(Feuil1.Columns(n).Address(columnAbsolute:=False),IIF(n>26,2,1))

Mais bon, ce que je veux dire par élégant, c'est l'utilisation d'une propriété, style:

=Feuil1.Columns(n).name ou Feuil1.Columns(n).ref

Mais bon, ça fait plus d'une heure que je cherche, je crois que je vais laisser tomber

[random]

=colonne(ref & 1) tu peux remplacer par columns(ref & 1)
c'est aussi élégant (enfin je trouve)

nb le nom de la feuille n'a rien à voir la dedans
b=2 indépdendemment de la feuille

[AlainTech]

J'ai trouvé ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox Split(Columns(40).Address(0, 0), ":")(0)

Je trouve ça relativement "propre".

Edit:
Et, dans l'autre sens:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox Columns("AN").Column

me paraît très "soft" aussi...