Mise en forme conditionnelle en VBA Résolu/Fermé

Question

Bonjour,

Je me permets de solliciter l'aide de quelqu'un à l'aise avec les VBA. 

Je suis en train de créer un petit programme à partir d'Excel. J'ai créé une base de données dans une première feuille nommée "Contrôle" et dans les cellules B1 à B90 j'ai des nombres inscrits. 

Ensuite, j'ai également créé un UserForm avec une recherche de valeur d'après une seconde feuille Excel. En inscrivant un numéro client dans une zone de texte, mes autres données s'affichent. Seulement, j'aimerais que les données qui s'affichent dans mon UserForm et qui sont à doubles d'après mes cellules B1 à B90 s'affichent en noir (mes données dans mon UserForm son de couleur rouge). 

Est-ce que quelqu'un serait assez courageux pour me donner un ptit coup de main à cette VBA ?

Merci d'avance pour vos réponses

via55 · Answer

Bonjour

Fournis :
1) ton fichier en le postant sur mon-partage.fr, en faisant créer un lien puis en le copiant et en revenant les coller ici
2) un exemple de données en double qui doivent se retrouver en noir dans l'UF

Cdlmnt
Via

seby1001 · Answer

Hello!

Merci pour ton message

Voici le lien demandé : https://mon-partage.fr/f/CdrazNFJ/ 

Je vais essayer de t'expliquer un peu plus clairement... 

Il y a un UserForm dans ce fichier qui s'appelle "Vérification des cartes gagnantes". Quand je recherche une carte, cela fonctionne en me mettant les numéros de la carte. Pour ça c'est OK. Mais j'aimerais que les numéros de la carte (donc les intitulés) se mettent en noir (quand je fais une vérification) quand il sont à doubles avec la sélection B1:B90 de la feuille "Contrôle".

Par la même occasion, j'ai remarqué que, quand je presse sur le bouton "Afficher la carte" mon curseur ne se remet dans la cellule où je m'étais arrêté. Je sais pas si tu peux aussi me donner un ptit coup de pouce pour ça.

Merci pour ton aide.

Salutations

Seby

via55 · Answer

Je n'arrive pas à comprendre comment fonctionne  ton logiciel
Au départ il n'y a rien en B1:B90 quand cela se remplit-il ?

Donne moi plus d'explications pas à pas

via55 · Answer

Non je ne comprends toujours pas ce que fait ta macro

C'est sans doute très clair pour toi ...
A quoi sert la carte avec tous les n°s en bas de la feuille Contrôles ? Que doit faire l'utilisateur ? Quelles données doit il rentrer ? que se passe-t-il ensuite ?

via55 · Answer

Merci la video m'a aidé

J'ai mis dans la macro les instructions pour faire colorer en noir les label lorsque le nombre se trouve inscrit dans la colonne B , je l''ai fait pour les 3 premiers; si ça te convient il te restera à recopier les instructions pour les autres labels

https://mon-partage.fr/f/blIlw9Jl/

via55 · Answer

Oui il fallait remettre les contrôles en rouge si le n° n'est pas trouvé
https://mon-partage.fr/f/uIFetC8Y/

Ca doit être ok maintenant

via55 · Answer

la petite erreur vient de la ligne 
   If a > 0 Then Label29.ForeColor = &H0& Else Labe29.ForeColor = &HFF&

le l final de Label a sauté à la frappe dans le second Label29
Une fois rectifié 85 s'affiche bien en rouge

Si cela arrive pour d'autres controles vérifie d'abord l'écriture correcte de l’instruction concernée

Mise en forme conditionnelle en VBA

7 réponses

Discussions similaires