Sujet Précédent Sujet Suivant

Colorer une case avec un résultat de listbox et checkBox

Résolu/Fermé
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 - 25 nov. 2014 à 13:25
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 - 27 nov. 2014 à 13:34
Bonjour,

Je cherche à colorer une ligne par rapport à ma liste box.
C'est a dire que j'ai un userforme dont à l'interieur il se comoporte d'une comboBox dont j'ai une liste qui est selectionné, puis une ListBox qui est allimentée par la combobox par dictionnary etc). Le seul probleme, maintenant c'est que j'aimerais , quand je clique sur la checkbox, que la ligne correspondant à la ligne choisi dans la ListBox se colorie dans le tableau. C'est n'est pas des données numérique que du texte et ce n'est pas des cellules fixes, donc je n'ai pas trouvé de sujet traitant cette afaire encore.

Merci

16 réponses

Réponse 1 / 16
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
25 nov. 2014 à 13:39
Bonjour Drumer, bonjour le forum,

Sans fichier exemple c'est pas très clair...
0
Réponse 2 / 16
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
25 nov. 2014 à 14:12
Voilà un exemple. Je n'ai pas activé le bouton "validé" mais apres c'est un truc rapide. donc voilà

https://www.cjoint.com/?DKzor15Aglc
0
Réponse 3 / 16
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
25 nov. 2014 à 15:54
Bonjour Drumer, bonjour le forum,

Ton fichier modifié avec le code commenté :
https://www.cjoint.com/?DKzp7zBjycT
0
Réponse 4 / 16
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
Modifié par drumer57 le 25/11/2014 à 16:15
C'est parfait ca marche ! par contre j'ai rien compris au code mais je vais essayer d'y comprendre un peu mieu

Merci Beaucoup !
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 16
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
25 nov. 2014 à 16:23
Bonjour Drumer, bonjour le forum,

J'ai oublié de te dire, tu peux aussi double-cliquer dans la ListBox1 et supprimer la CheckBox1...
Pour le code j'ai utilisé un tableau TC en tant que variable. Ça va pratiquement aussi vite de boucle dessus que de faire un Find...
0
Réponse 6 / 16
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
25 nov. 2014 à 16:26
par contre j'ai essayé d'integrer dans mon programme d'origine mais ca ne marche quand meme pas
0
Réponse 7 / 16
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
25 nov. 2014 à 16:41
Le probleme c'est que je peux pas surligner plusieurs lignes que 1
0
Réponse 8 / 16
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
25 nov. 2014 à 17:20
Bonsoir Drumer, bonsoir le forum,

je n'ai plus ton fichier sous les yeux mais il suffit de supprimer les lignes qui contiennent : Cells.Interior.ColorIndex = xlNone.
0
Réponse 9 / 16
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
26 nov. 2014 à 08:34
Bonjour ThauTheme,

Ca marche super bien ,sauf que quand j'essaye d'integrer le programme dans le mien, ca ne marche pas il bloque sur : 
Application.Goto O.Cells(LI,1) 'sélectionne la cellule ligne Li, colonne 1 de l'onglet O
0
Réponse 10 / 16
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
26 nov. 2014 à 09:08
Bonjour Drumer, bonjour le forum,

J'ai mis cette ligne pensant que tu voulais peut-être sélectionner la ligne. Si ce n'est pas le cas et que la couleur te suffit, supprime-la.
Je suis étonné que tu ne l'ai pas testé avant, sinon ça sert à quoi que je commente les codes...
0
Réponse 11 / 16
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
26 nov. 2014 à 09:41
J'ai bien compris ce que voulais dire la ligne, mais le débogueur la surligne
0
Réponse 12 / 16
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
26 nov. 2014 à 15:15
Dans mon post précendent je te disait :

J'ai mis cette ligne pensant que tu voulais peut-être sélectionner la ligne. Si ce n'est pas le cas et que la couleur te suffit, supprime-la.

0
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
26 nov. 2014 à 15:17
je t'avais déjà répondu : relis mon post précédent mais visiblement les modérateurs ont supprimé cette réponse ???
0
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
27 nov. 2014 à 08:32
est bon j'ai compris, ca marche. Petit soucis une dernière fois, il me surligne la 3e ligne. J'essaye de changer le 
LI = Me.ListBox1.Column (3, me.ListBox1.ListIndex)
en echangeant le 3 par 9 debut de mon tableau et ca ne marche pas si non il trouve la bonne ligne etc juste qui me surligne un peu trop haut au niveau des lignes
0
Réponse 13 / 16
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
27 nov. 2014 à 09:59
Bonjour Drumer, bonjour le forum,

Surtout ne pas changer le 3 qui ne correspond pas à la première ligne du tableau mais à la quatrième colonne de la ListBox1. Je ne comprends pas pourquoi ça plante chez toi, chez moi ça fonctionne.
Au pire renvoie-moi le bon fichier et j'adapterai...
0
Réponse 14 / 16
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
27 nov. 2014 à 10:11
Bonjour ,

voila le fichier. Le code c'est un espace et l'utilisateur un espace aussi. La page demandé c'est "partothèque_modif"

merci beaucoup
0
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
27 nov. 2014 à 10:34
Pas de fichier...
0
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
27 nov. 2014 à 10:58
https://www.cjoint.com/?DKBkrcHQiVx
0
Réponse 15 / 16
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
27 nov. 2014 à 12:55
Bonjour Drumer, bonjour le forum,

Les modifications à faire :
* propriété [ColumnCount] de la Listbox1 de l'userform "Sortie" = 4
* proriété [ColumnWidths] de la même = "0 pt;0 pt;;0 pt"
* dans le code "ComboBox1_Change()" :
.Column(3, .ListCount - 1) = I + 8 (pour commencer à la 9ième ligne du tableau)
* dans le code ListBox1_DblClick et dans le code CheckBox1_Click :
LI = CInt(Me.ListBox1.Column(3, Me.ListBox1.ListIndex)) 'définit la ligne LI
sinon LI est une variable texte et ça plante...

0
Réponse 16 / 16
drumer57 Messages postés 77 Date d'inscription samedi 18 octobre 2014 Statut Membre Dernière intervention 27 mars 2021 1
27 nov. 2014 à 13:34
Merci beaucoup ca marche à présent !!! Super Gentil !
0

Discussions similaires

Récupérer un résultat selon la date d'aujourd'hui
l1607 -
l1607 -

3 réponses
Excel : colorer une cellule sous condition d'une autre ?
KAKEPATHEL -
Pascal -

15 réponses
Fixer un résultat pour de bon à l'aide d'une fonction.
Bioforge -
Bioforge -

1 réponse
Chemin Logo du site de la Cité de l'espace
Keiios -
blux -

11 réponses
code couleur associé a une image
magic charly -
pandora -

9 réponses