remplacement $A par une valeur numerique

[drausin]

Bonjour je voudrais faire une mise en forme conditionnelle dans une macro vba.
pour cela je voudrais remplacer $A dans ma formule par un numero de colonne car je ne connais pas presicement le nombre de colonne ou je souhaite appliquer ca. Cela varie.

Code :

Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$A$12=1"

mais à la place du A je voudrais mettre un numero.
Si je remplace par cells la formule n'est pas mise à jour si je change la valeur.
Quelqu'un peut il m'aider ?

[Ormonth]

Bonjour,

vois en #11 ?

http://www.developpez.net/forums/d11...ettre-colonne/

cordialement,

Didier

[Jean-Pierre49]

Bonjour

Pour connaître la lettre de la colonne

dans la Faqhttp://excel.developpez.com/faq/inde...ille#RefLettre

Et une piste

Code :

1
2
3
4
5
6
7
Dim Lettrecolonne As String
Dim CompA As Byte
 
For CompA = 1 To 8 ' par exemple
    Lettrecolonne = Split(Cells(1, CompA).Address(1, 0), "$")(0)
    Cells(1, CompA).FormatConditions.Add Type:=xlExpression, Formula1:="=$" & Lettrecolonne & "$12="
Next CompA

Tu dis

Edit: Grillé par Ormonth