Problème macro mise en forme conditionelle

[remy67]

Bonjour,
Après plus d'une journée de recherche sans succès, je vous pose mon problème.
Je souhaite ajouter par macro une mise en forme conditionnelle dynamique.

La formule est la suivante

Selection.FormatConditions.Add Type:=xlExpression, Formula1:=iii
Avec iii= "=SI($I5>0.2*$E5;VRAI;FAUX)"

Problème je voudrais avoir ma variable iii en dynamique, je vois pas du tout comment faire ca. J'ai également testé avec

Selection.FormatConditions.Add Type:=xlExpression, FormulaR1C1:=iii
Avec iii= "=SI(RC>0.2*R[-4]C;VRAI;FAUX)"

Mais ne marche pas

L'objectif est de pouvoir insérer la MFC par maro ligne par ligne dans une colonne excel.

Merci

 

[Paritec]

Re : Problème macro mise en forme conditionelle

Bonjour remy67 le forum
oui pourquoi faire simple quand on peut faire compliqué???
tu fais une macro de mise en forme conditionnelle et tu n'as plus à insérer de formules dans tes lignes
a+
papou🙂

 

[remy67]

Re : Problème macro mise en forme conditionelle

Merci Papou pour ta réponse

Qu'appelles tu faire une macro de mise en forme conditionnelle ?

Le projet d'ensemble est complexe, gestion sur plusieurs onglets et plusieurs dizaines de classeurs, mais ça marche pas mal pour le moment.

Mais dans mon problème précis l'idée étant de rentrer la formule conditionnelle une fois dans une cellule en tant que texte, puis de la récupérer pour ensuite l'appliquer à la cellule active (elle-même sélectionné selon des conditions précises)

La variable de la formule comme précisée est la ligne, la colonne est fixe.

Le tout permet de créer automatiquement un squelette d'une feuille

 

[Hippolite]

Re : Problème macro mise en forme conditionelle

Bonjour à tous,

Avec iii= "=SI(RC>0.2*R[-4]C;VRAI;FAUX)"

Ta formule doit être en anglais, essaie avec IF, TRUE et FALSE, Excel traduira en français dans la feuille.
A+

 

[remy67]

Re : Problème macro mise en forme conditionelle

Hippolite
Désolé ca ne marche pas, j'ai bien une erreur lorsque j'arrive à la ligne, mais c'est bien tenté 😉

Selection.FormatConditions.Add Type:=xlExpression, FormulaR1C1:=iii