Re : problème listview et combobox
Bonjour,
Merci Bebere de m'avoir suppléé.
Effectivement, j'avais eu la même idée que toi quant aux dates.
regnum,
pour la ligne
Dim Ouis as Boolean, c'est un résidu d'une recherche avortée donc elle est inutile et
à effacer.
Pour la couleur, il y a une erreur de programmation que tu peux corriger en ajoutant la
référence en gras:
Sheets(ComboBox1.Text).Range("A" & lig & ":I" & lig).Interior.ColorIndex = Month(.Offset(0, 3)).
Cette ligne permet d'associer une couleur à chaque mois (1-noir- pour janvier, 2-blanc- pour février , 3-rouge- pour mars ...) .
On peut choisir les couleurs ainsi
Sheets(ComboBox1.Text).Range("A" & lig & ":I" & lig).Interior.ColorIndex _
= Array(3, 5, 6, 8, 9, 45, 15, 34, 22, 23, 37, 18)(Month(.Offset(0, 3)))
(voir macro2).