XL 2013 Macro mise en forme et ajout d'un caractère

[Elodie195]

Bonjour,

Je sollicite votre aide pour une macro Excel.
Dans mon fichier Excel de test, j'ai créé un ongle "A_obtenir", c'est plus parlant.

Voici l'idée de la macro :

J'ai un onglet avec un tableau qui peut être de taille aléatoire.
Dans la colonne A, j'ai des numéros d'échantillons, tous par paquet avec un titre au dessus "CCV suivi d'un chiffre". Il faudrait appliquer la macro pour chaque paquet compris entre deux titres "CCV".

A partir de la colonne C jusqu'à F, j'ai des pourcentages.

Je souhaiterais une macro qui fait de la mise en forme conditionnelle avec plusieurs conditions.

Concernant le code 89Y-H2, il faut vérifier si l'échantillon est dans l'intervalle :
Moyenne(CCV1 + CCV2) * 0.7 < résultat < Moyenne(CCV1 + CCV2) *1.3

Concernant les 3 autres codes, il faut vérifier si l'échantillon est dans l'intervalle :
Moyenne(CCV1 + CCV2) * 0.75 < résultat < Moyenne(CCV1 + CCV2) *1.25

Si l'échantillon fait bien partie de l'intervalle, on colore la case en verte.
Si l'échantillon est hors intervalle, je souhaite le colorier en rouge et rajouter " ERR" derrière le résultat.

Exemple échantillon 1 :
Concernant le code 89Y-H2 :
Moyenne(122,432% + 118.68%) * 0.7 = 85.39%
Moyenne(122,432% + 118.68%) * 1.3 = 156.72%
La valeur 143,74% est bien dans l'intervalle on colore en vert.

Exemple échantillon 11 :
Concernant le code 103Rh :
Moyenne(109.60% + 107.67%) * 0.75 = 81.48%
Moyenne(109.60% + 107.67%) * 1.25 = 135.79%
La valeur 150% n'est pas dans l'intervalle donc on colore en rouge et on écrit ERR derrière : 150% ERR.

Et ainsi de suite pour chaque échantillon.

Cette macro est-elle réalisable ?

Merci d'avance de votre aide.

Bonne journée.

 

[sousou]

Bonsoir
Regarde cette solution macro deb,
Je n'ai pas mis err pour simplifier les test
A adapter sans doûte

 

[Elodie195]

Bonjour sousou,

Merci beaucoup pour ton aide. C'est top !
Je vais adapter cela de suite !

Bonne journée.