Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Comparer des valeurs et renvoyer une fleche...

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
C

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

Trier par date Trier par votes
Re : Comparer des valeurs et renvoyer une fleche...

Re,
Par contre maintenant , c'est le userform 5 qui n'integre plus mes longs commentaires et mes photos de Devoir Surrveillés...😛
Je t'envoie le dernier fichier modifié sur ton mail..
A+
Chris
 
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Salut Chris,

Chez moi, les photos ainsi que les commentaires apparaissent bien, le seul problème vient de tes commentaires comportant des images, comme il s'agit de Label je ne peux pas copier les images du commentaire.
 
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Re,

N'y aurait-il pas un subterfuge ?😉
ou tout autre solution faisant apparaitre mes photos ?(Tres interessant pedagogiquement...)
Peux-tu creer un 4eme cadre un peu plus grand pour faire apparaitre les commentaires de DS un peu plus long qu'en Tp...
A+
Chris
 
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Bonsoir Yaloo,
Bon j'ai essayé de rajouter une 4eme possibilité ds la dimension des cadres pour tenir cpte du fait qu'en DS les cadres sont plus remplis mais àa ne marche pas.J'ai essayé de mettre un and entre l'inegalité mais il n'en veut pas😡
Et je ne parle meme pas des images ds les commentaires😛 sur le userform 5.
If .Tag <> "" Then
If Not (Feuil3.Range(.Tag).Comment Is Nothing) Then
UserForm5.Controls("Label" & l & "00").Caption = Feuil3.Range(.Tag).Comment.Text
Select Case Len(Feuil3.Range(.Tag).Comment.Text)
Case Is < 50
UserForm5.Controls("Label" & l & "00").Height = 40: Haut = 40
UserForm5.Controls("Label" & l & "00").Width = 100: Larg = 100
Case Is >= 50 < 100
UserForm5.Controls("Label" & l & "00").Height = 60: Haut = 60
UserForm5.Controls("Label" & l & "00").Width = 150: Larg = 150
Case Is >= 100 < 150
UserForm5.Controls("Label" & l & "00").Height = 80: Haut = 80
UserForm5.Controls("Label" & l & "00").Width = 200: Larg = 200
Case Else
UserForm5.Controls("Label" & l & "00").Height = 100: Haut = 100
UserForm5.Controls("Label" & l & "00").Width = 250: Larg = 250
End Select
UserForm5.Controls("Label" & l & "00").Top = IIf(.Top < 100, .Top + 18, .Top - 42)
UserForm5.Controls("Label" & l & "00").Left = IIf(.Left < 300, .Left + 24, .Left - Larg)
UserForm5.Controls("Label" & l & "00").Visible = -1
End If
Else
 
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Bonsoir Chris,

Je n'ai pas testé mais il me semble que la logique voudrait que l'on écrive le code comme ça :

1er cas : si la longueur du texte est inférieure à 50 alors ...
2ème cas : si la longueur du texte est inférieure à 100 alors ... (puisque le cas inférieur à 50 est traité précédemment)
3ème cas : si la longueur du texte est inférieure à 150 alors ... (puisque les cas inférieurs à 100 sont traités précédemment)
4ème cas : si la longueur du texte est supérieure à 150 alors ... (tous les autres cas)

Donc en résumé :
VB: 
If .Tag <> "" Then
 If Not (Feuil3.Range(.Tag).Comment Is Nothing) Then
   UserForm5.Controls("Label" & l & "00").Caption = Feuil3.Range(.Tag).Comment.Text
   Select Case Len(Feuil3.Range(.Tag).Comment.Text)
     Case Is < 50
       UserForm5.Controls("Label" & l & "00").Height = 40: Haut = 40
        UserForm5.Controls("Label" & l & "00").Width = 100: Larg = 100
     Case Is < 100
        UserForm5.Controls("Label" & l & "00").Height = 60: Haut = 60
        UserForm5.Controls("Label" & l & "00").Width = 150: Larg = 150
     Case Is < 150
        UserForm5.Controls("Label" & l & "00").Height = 80: Haut = 80
        UserForm5.Controls("Label" & l & "00").Width = 200: Larg = 200
     Case Else
        UserForm5.Controls("Label" & l & "00").Height = 100: Haut = 100
        UserForm5.Controls("Label" & l & "00").Width = 250: Larg = 250
   End Select
        UserForm5.Controls("Label" & l & "00").Top = IIf(.Top < 100, .Top + 18, .Top - 42)
        UserForm5.Controls("Label" & l & "00").Left = IIf(.Left < 300, .Left + 24, .Left - Larg)
        UserForm5.Controls("Label" & l & "00").Visible = -1
 End If
 Else
 
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Bonjour le fil
Dommage que l on ne puisse participer
Une question concernant ces labels avez vous essaye la propriete AUTOSIZE de cet objet ?????
Bonne journee
Amicalement
Jean marie
O
 
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Salut Jean-Marie,

C'est vrai que c'est dommage, mais c'est pendant ses essais que Chris décourve ce qui ne convient pas. Il ne peut le voir qu'In Situ.
J'essaie de mettre de temps en temps un fichier bidon, mais à chaque fois il faut modifier une vingtaine d'image et leur remettre le nom d'origine, donc c'est lourd. De plus, le fichier fait 2,8 Mo.
J'avais essayé la propriété AutoSize, mais le Label était mis tout en hauteur et cela rendait illisible les données contenus dans le Label.

A+

Martial
 
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Bonjour,

1/ça marche avec les nouveaux dimensionnements des cadres..😱
J'avais pas fait attention au select case d'ou les differentes possibilités que je faisais apparaitre...

2/Sinon pour les photos dans les commentaires du userform 5 , vraiment aucune solution ?

J'explique le problème actuel :

Dans la feuille "évaluation" je saisis les compétences élèves dans chaque domaine(S:savoir , R:raisonnement , C:communication...).
Ainsi derrière chaque question d'un contrôle se cache une compétence à évaluer avec 3 niveaux d'acquisition(R,J,Vert) pour Non acquis , En cours d'acquisition , Acquis.
Ce nouveau système d'evaluation remplacera petit à petit les notes car il doit y avoir une harmonisation au niveau Européens des systèmes d'evaluations et le systeme français(notes) est minoritaire d'ou l'évolution en cours...
Mais l'ENational ne nous fournit pas de logiciel pour gérer toutes ces compétences et chacun le fait à sa sauce.
On peut le faire à la main , mais avec 300 élèves par semaines et une dizaines de points par controles et par élèves celà devient vite une usine à gaz d'ou ce logiciel pour me simplifier la vie et surtout pour montrer aux eleves via un tableau interactifs leurs points forts et faibles.
MERCI à Yaloo pour ce travail !
Voilà pour la petite histoire.

Maintenant d'un point de vue technique :
J'aimerais que les commentaires(questions contrôle) en ligne 5 de la feuille "évaluation" apparaissent sur le userform 5.(bouton bilan classe).
Celà fonctionne mais pas pour les photos en S2
Le commentaire(cadre) apparait sur le userform 5(bouton bilan classe) mais ss la photo🙁
Dommage car pédagogiquement c'est génial !
A+
Chris
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Bonjour Chris,

Je ne vois pas, de plus, je ne sais même pas comment tu arrives à mettre des images dans les commentaires. J'ai essayé mais je n'y arrive pas.

A+
 
Vote positif 0 Vote négatif
Re : Comparer des valeurs et renvoyer une fleche...

Re,
Procedure pour inserer une image ds un commentaire :
-Sélection du cadre(modifier le commentaire) , clic droit , format de commentaires , onglet couleurs et traits , couleurs , motifs et textures , images.
A+
Chris
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

T
  • Résolu(e)
XL 2021 comparer une cellule avec une colonne et indiquer la valeur
Réponses
5
Affichages
844
thibaut1306
T
J
  • Question Question
Microsoft 365 VBA EXCEL pour rechercher une valeur et copier des valeurs à la suite
Réponses
2
Affichages
539
justine.valck
J
B
  • Résolu(e)
XL 2010 Macro qui compare les valeurs d’un tableau en date t et en date t-1
Réponses
12
Affichages
779
Dudu2
B
  • Résolu(e)
XL 2016 Comparer-soustraire-copier-supprimer
Réponses
7
Affichages
1 K
BPM
B
Y
  • Résolu(e)
XL 2016 Extraire une ligne des valeurs depuis basse des données vers une autre feuille de travail selon critère
Réponses
2
Affichages
1 K
YANNISE
Y
J
  • Résolu(e)
XL 2016 vba cherche 2 valeurs dans une autre feuille et remplace des données
Réponses
9
Affichages
1 K
julien741
J
  • Résolu(e)
XL 2010 Comparer une valeur avec les valeurs plage
Réponses
4
Affichages
1 K
Orson83
W
  • Question Question
XL 2010 recherche d'une valeur en fonction de colonnes dont les intitulés sont des plages de valeurs
Réponses
4
Affichages
2 K
WalloWG
W
  • Question Question
Autres Chercher des valeurs et vérifier les cellules voisines de droite
Réponses
1
Affichages
876
djidji59430
D
  • Question Question
XL 2019 boucle qui compte les valeurs des cellules
Réponses
4
Affichages
801
desmonts
D
C
  • Question Question
comparer un chiffre dans un tableau et récuperer une information associée
Réponses
4
Affichages
723
citroends12
C
M
  • Question Question
XL 2016 Lier une date à une cellule
Réponses
4
Affichages
1 K
MatOLfull
M
E
  • Résolu(e)
Microsoft 365 Transférer valeurs de Textbox et ComboBox dans classeur
Réponses
8
Affichages
1 K
Emli15
E
M
  • Question Question
XL 2019 Comparer 2 cellules et renvoyer une valeur
Réponses
2
Affichages
922
Mel62
M
  • Résolu(e)
XL 2019 Renseigner une valeur a des labels et les mettre dans une boucle
Réponses
1
Affichages
511
Arky
S
  • Question Question
XL 2016 valeur associée à un intervalle
Réponses
7
Affichages
2 K
Dranreb
L
  • Question Question
Microsoft 365 STATUTS TAXREF, Fusionner dans une même cellule l'ensemble des valeurs ayant le même titre de colonne _VBA de mise en forme
Réponses
1
Affichages
892
lusert
L
J
  • Question Question
Microsoft 365 Comparer des données dans des colonnes différentes et faire un tri
2
Réponses
15
Affichages
2 K
mapomme
S
  • Question Question
Reporter des valeurs sur une autre fiche en saut de cellules (en completant la même base de donnée)
Réponses
1
Affichages
545
Robert
Y
  • Question Question
XL 2010 Copy tableau et selon des valeurs vers la feuille suivante
2
Réponses
19
Affichages
2 K
yahya belbachir
Y
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…