Liste déroulante VBA

Bonjour,

Je voudrais récupérer l'information de ma liste déroulante pour mettre des variables.

Je voudrais que cette information s'affiche en message box.

Exemple dans la liste déroulante, je voudrais récupérer l'information Nico.

Et est ce possible dans la liste déroulante d'Opération que crédit soit en vert et crédit en rouge ?

Merci pour aide

Bonjour

Voir si cela te convient

Si c'est bon tu passes le sujet en résolu

Crdlt

Bonjour,

Ca marche bien pour les couleurs mais comment récupérer l'information de la liste déroulante ?

Bonjour

Pour récupérer l'information de la liste déroulante

Private Sub CbxPersonne_Change()
Msgbox CbxPersonne.Text
End Sub

Pour ajouter à la BDD

Private Sub BtnAjout_Click()
Dim derLigne
Dim sh As Worksheet
Set sh = Sheets(CbxMois.Text)
derLigne = sh.Cells(sh.Rows.Count, 1).End(xlUp).Row
ligne = derLigne + 1
sh.Cells(ligne, 1) = FMRSaisie.CbxPersonne.Text
sh.Cells(ligne, 2) = FMRSaisie.CbxOpération.Text
sh.Cells(ligne, 3) = FMRSaisie.CbxCatégorie.Text
sh.Cells(ligne, 4) = FMRSaisie.TextBox1.Text

End Sub