> Tous les forums > Forum Bureautique
 Changer de couleur une cellule avec une maccro
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Alexj15
  Posté le 26/06/2019 @ 16:32 
Aller en bas de la page 

Heyy !

Alors une petite mise en contexte rapide: Je dois obligatoirement utiliser une maccro pour réaliser ceci. Je dois faire en sorte qu'une cellule avec un pourcentage change de couleur selon justement son pourcentage ->60% en VERT; <40% en ROUGE; <60% et >40% en ORANGE.

Donc j'ai déjà fait quelque ligne , mais cela ne fonctionne pas comme je voudrais. Donc si vous avez des ptit conseils et astuces je suis preneur.

Donc voilà mon code la cellule O4 et la cellule ou est écrit le pourcentage du jour par exemple, la cellule AA2 est la moyenne explqiuer au dessu (60%; 40; 60/40%).

Activresheet représente l'objet que je veux faire changer de couleur.
Il ce passe tout de même une chose quand je clic sur le bouton (lié à la maccro) ça change en en rouge avec n'importe quel résultat.

Sur Ceux bonne journée les ptits pote.

[Configuration automatique à compléter]
Windows 7
Chrome 72.0.3626.121

Publicité
Debrief
 Posté le 26/06/2019 à 19:47 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour,

Je suis étonné que puisses qualifier RGB avec Forecolor. Personnellement j'aurais mis .ForeColor = RGB(255, 165, 0 ) par exemple.

D.

Alexj15
 Posté le 27/06/2019 à 08:59 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Bonjour,

J'ai essayer ce que tu m'a dis mais je suis obligé de mettre .Forecolor. RGB = RGB(...) Sinon sa me mets une erreur:/

Debrief
 Posté le 27/06/2019 à 10:27 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

En effet, c'est ce que dit la doc https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa221611(v=office.11).

En ce qui me concerne j'ai beau appliquer l'instruction sh.Fill.ForeColor.RGB = RGB(255, 0, 0) ou sh.Fill.BackColor.RGB = RGB(255, 0, 0) à des shapes ça n'a strictement aucun effet !

galopin01
 Posté le 27/06/2019 à 11:52 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

bonjour,

sans voir le classeur c'est quand m^me difficile à supputer...

A+

Alexj15
 Posté le 27/06/2019 à 13:52 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Oui, je ne comprend vraiment pas pourquoi ça ne marche pas :c

Oui désolé galopin1, je suis en stage je ne peux pas transmettre le classeur

^^

Alexj15
 Posté le 27/06/2019 à 13:54 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

J'ai essayer de mettre des Case à la place des If

Debrief
 Posté le 27/06/2019 à 14:00 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

En fait on ne sait pas si c'est la logique du code qui n'est pas bonne ou ces instructions de colorisation.

Alexj15
 Posté le 27/06/2019 à 15:50 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Bon pas grave, merci quand même

Publicité
mijou1957
 Posté le 28/06/2019 à 08:54 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Salut

Je suis un bleu en macro, mais, faudrait peut être essayer les conditions dans un ordre croissant

-Moins de 40

-Entre 40 et 60

-Plus de 60

Mais aussi, pourquoi ne pas mettre 40% en dur dans la macro au lieu de la valeur d'une cellule.

mijou1957
 Posté le 29/06/2019 à 06:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Re salut

Comme j'ai dis, je suis en apprentissage, alors voyez ma réponse, plus comme une question, qu'une réponse à Alexj15.

ximi
 Posté le 30/06/2019 à 12:00 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour Alexj15

Pourquoi ne pas utiliser une mise en forme conditionnelle tout simplement? Voir ci dessous la configuration de la MFC (Mise en Forme Conditionnelle)

respecter l'ordre des MFC. Les cellules de l'exemple dans lesquelles tu rentres les valeurs sont de E10 à G10 comme indiqué dans "s'applique à".

Pour toi tu appliques bien sur la MFC sur toute la plage de tes cellules.

Bon dimanche - Cordialement - Xavier

Lien vers une image externe <= le lien ne marche pas

Désolé la copie écran n'a pas marché!



Modifié par ximi le 30/06/2019 12:10
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Sujets relatifs
Aucun sujet pertinent lié trouvé
 > Tous les forums > Forum Bureautique