Comparer des valeurs et renvoyer une fleche...

chrisclaret

XLDnaute Occasionnel
Bonjour,

J'ai realise un bulletin d'evaluation par competence pour le college.
Je bloque sur la fin...
En effet , je souhaiterais comparer les points de couleurs de T1 et T2 et suivant l'evolution afficher ds la colonne Q le resultat par une fleche.
Dans les colonnes T1,T2,T3 je fais la moyenne des compétences de la ligne consideree.
Je deplace la formule moy d'un trimestre à l'autre et je fais un copier coller valeur pour conserver la colonne de gauche et ainsi comparer les trimestres consécutifs.
J'ai une formule en Q que j'utilisais ailleurs et qui compare les valeurs en T1 et T2 mais comme un point de couleur correspond à un intervalle de reussite cela pause probleme.
Ex;
0<moy<25% alors rouge
25<moy<50% alors orange
50<moy<75% alors bleu
75<moy<100% alors vert.

Si l'eleve a eu orange et orange en T1 et T2 il me faudrait une fleche horizontale or comme chaque orange correspond a une valeur souvent differente compris dans un intervalle il compare les valeurs et me met une fleche verte.(Ex en Q13).
Il faudrait que suivant l'intervalle ds laquelle se situe la moy im me renvoie dans T1,T2... la valeur 0.25 ou 0.5 ou 0.75 pour pouvoir ensuite etre comparé mais je n'y arrive pas , à moins qu'une autre idee existe...
Voilà...
Chris
 

Pièces jointes

  • bulletin par competence A3 download.xlsx
    22.7 KB · Affichages: 263

Yaloo

XLDnaute Barbatruc
Re : Comparer des valeurs et renvoyer une fleche...

Si jamais ça ne fonctionnait toujours pas.

La solution (on va y arriver, il ne faut pas lâcher ;)) c'est de créer un fichier "modèle Elève" (comprenant les macro et UserForm), puis de copier ce fichier avec tous les noms des élèves. Le récap se fera de la même façon.

A+
 

chrisclaret

XLDnaute Occasionnel
Re : Comparer des valeurs et renvoyer une fleche...

Ok , je te donne ci-dessous le message qq peu changé :
Erreur execution 1004
L'acces par programme au projet VBA n'est pas fiable.
With ActiveWorkbook.VBProject 'Transfert l'USF et lMicrosoft Visual Basic For Application Extensibility x.xes modules dans les classeurs
Pour le reste je m'en remets à toi..
La nuit porte conseil.
Chris
 

chrisclaret

XLDnaute Occasionnel
Re : Comparer des valeurs et renvoyer une fleche...

Bonjour Yaloo,

Oui bien dézipé ds le meme dossier.
En fait , la macro creer onglet , crée le dossier 5G mais vide en plus du message d'erreur déjà évoqué...:mad:
J'ai testé ce jour au college et meme consequence sur excel 2007...
Je ne comprends pas comment celà peut marcher ailleurs et pas chez moi.
Peut-etre un paramétrage incomplet içi...
Bonne journée,
Chris
 

Yaloo

XLDnaute Barbatruc
Re : Comparer des valeurs et renvoyer une fleche...

Bonjour Chris,

A part une référence non cochée, je ne vois pas trop, voici ce qui est coché chez moi.

Référence.PNG

A+
 

Yaloo

XLDnaute Barbatruc
Re : Comparer des valeurs et renvoyer une fleche...

Re,

Je ne vois vraiment pas pourquoi ça plante.

Dans le fichier ci-dessous, j'ai un peu changé l'ordre, en enregistrant le fichier avant d'importer les Module et UserForm, sait-on jamais ...;)

A+

PS : Quel est le N° de l'erreur ?
 

Pièces jointes

  • Devoir surveillé n°1 V1.11.xlsm
    151.1 KB · Affichages: 52
  • Devoir surveillé n°1 V1.11.xlsm
    151.1 KB · Affichages: 50
  • Devoir surveillé n°1 V1.11.xlsm
    151.1 KB · Affichages: 57

chrisclaret

XLDnaute Occasionnel
Re : Comparer des valeurs et renvoyer une fleche...

Re,
En progrès,;)
Cette fois-ci seule la premiere feuille apparait avec le nom Durand...
Sinon le message est le suivant : Erreur execution'1004'
L'acces par programme au projet Visual Basic n'est pas fiable.
Puis il bloque à cet endroit :
With Workbooks(x & ".xlsm").VBProject 'Transfert l'USF et les modules dans les classeurs

Casse-tête ce truc !:mad:
A+
Christophe
 

chrisclaret

XLDnaute Occasionnel
Re : Comparer des valeurs et renvoyer une fleche...

Victoire,:p

Je n'ai pas tout testé en detail mais il n'y a plus de blocage!;)

Je regarde ça ce soir plus finement et essaie au college demain...

Je ne vais pas crier victoire trop tôt mais BRAVO Yaloo !!!

Je te tiendrai informé de mes différents tests...
T'aurais dû faire prof d'info !:)A moins que tu ne sois informaticien déjà ou tt simplement passionné...
@+
Chris
 

Discussions similaires

Statistiques des forums

Discussions
312 215
Messages
2 086 326
Membres
103 180
dernier inscrit
Vcr