Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel lettre de colonne

lettre de colonne

22 réponses
Avatar
Claire
Bonjour,

Range("C3").column

Cette commande me donne 3 comme résultat. J'aimerais avoir C comme
résultat.
Merci
Claire
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2 3
Avatar
AV
Une courte (XL 2000 et +)
MsgBox Split([C3].Address, "$")(1)

Une longue
MsgBox Left(Mid([C3].Address, 2), Len(Mid([C3].Address, 2)) -
(Len(Mid(Mid([C3].Address, 2), Application.Search("$", Mid([C3].Address, 2), 1)
+ 1)) + 1))

AV
Avatar
Clément Marcotte
Bonjour,

De Laurent Longre:

http://www.excelabo.net/xl/adresses.php#lettrecolonne


"Claire" a écrit dans le message de
news:Oj8V$F%
Bonjour,

Range("C3").column

Cette commande me donne 3 comme résultat. J'aimerais avoir C comme
résultat.
Merci
Claire




Avatar
JpPradier
Bonjour Claire

Une autre :

MsgBox (Chr(64 + Range("C3").Column))

j-p
Avatar
AV
MsgBox (Chr(64 + Range("C3").Column))


Je sais pas si après la colonne Z ça va faire...;-)

AV

Avatar
JpPradier
MsgBox (Chr(64 + Range("C3").Column))


Je sais pas si après la colonne Z ça va faire...;-)

AV


J'avoue que je n'avais pas envisagé ce point.

j-p


Avatar
Claire
Merci beaucoup pour votre aide.

"Claire" a écrit dans le message de
news:Oj8V$F%
Bonjour,

Range("C3").column

Cette commande me donne 3 comme résultat. J'aimerais avoir C comme
résultat.
Merci
Claire




Avatar
docm
Bonjour.

Pour tenir compte de ce point:

colonne = Range("BC3").column

lettres = IIf(colonne 26 = 0, "", Chr(64 + colonne 26)) & Chr(64 +
colonne - (colonne 26) * 26)

Docm

"JpPradier" wrote in message
news:O6wM4q#
MsgBox (Chr(64 + Range("C3").Column))


Je sais pas si après la colonne Z ça va faire...;-)

AV


J'avoue que je n'avais pas envisagé ce point.

j-p





Avatar
JpPradier
Bonsoir docm

Range("AZ3").column ??
Pense bien que j'ai essayé des trucs comme ça. Mais comme ça allait sur une usine à gaz, j'ai laissé
tombé :-(

j-p
Avatar
GD
;o)))
une moyenne :
MsgBox Application.Substitute(Left([C3].Address, 3), "$", "")
@+
AV wrote:
Une courte (XL 2000 et +)
MsgBox Split([C3].Address, "$")(1)

Une longue
MsgBox Left(Mid([C3].Address, 2), Len(Mid([C3].Address, 2)) -
(Len(Mid(Mid([C3].Address, 2), Application.Search("$",
Mid([C3].Address, 2), 1) + 1)) + 1))


Avatar
Rai
Bonsoir,

Juste histoire de mettre mon grain de sel :
c = Selection.Column
l = LTrim(Chr((c > 26) * (c -26 - 32) + 32) & Chr(c Mod 26 + 64))

Ca marche aussi dans tous les cas de figure ;o)
Et surtout : Pourquoi faire simple quand on peut faire ...


Bonne soirée


Rai


"docm" a écrit dans le message de news: eXr1s9$
Bonjour.

Pour tenir compte de ce point:

colonne = Range("BC3").column

lettres = IIf(colonne 26 = 0, "", Chr(64 + colonne 26)) & Chr(64 +
colonne - (colonne 26) * 26)

Docm

"JpPradier" wrote in message
news:O6wM4q#
MsgBox (Chr(64 + Range("C3").Column))


Je sais pas si après la colonne Z ça va faire...;-)

AV


J'avoue que je n'avais pas envisagé ce point.

j-p









1 2 3