mettre le nom de la collonne dans une variable

[Olivier]

Bonjour le Forum

je cherche comment attribuer la lettre de la colonne active dans un variable

quand j'utilise la formule : colonne = ActiveCell.Column

j'obtiens le numéro de la colonne mais pas sa lettre et je ne sais pas faire un range dessus

Merci pour votre aide


Olivier

 

[jmps]

Bonjour Olivier,

Colonne = Mid(ActiveCell.Address, 2, InStr(2, ActiveCell.Address, "$") - 2)

Il y a peut être plus court mais ça marche.

Bon appétit.

José

 

[Hervé]

bonjour

2 solutions :

avec activecell.column, utilise cells :
colonne = ActiveCell.Column
cells(1 , activecell.column)

si tu veux utiliser un range, il te faut transformer le numéro de la colonne en lettre :

colonne = Left(ActiveCell.Address(False, False), (ActiveCell.Column < 27) + 2)
range (colonne & "1").value

Je te conseille d'utiliser cells qui est bien plus pratique.

Salut
Hervé