bonsoir,
pour suivre la logique de ton code, ajoute ceci dans le code de ta userformm
Private Sub ComboBox1_Change()
[h2] = ComboBox1.Text
End Sub
edit :
j'ai oublié qu'il fallait mettre le résultat dans les 4 feuilles
Private Sub ComboBox1_Change()
worksheets("OPPOSITIONS").range("H2") = ComboBox1.Text
worksheets("PA").range("H2") = ComboBox1.Text
worksheets("RAPPELS").range("H2") = ComboBox1.Text
worksheets("MLO").range("H2") = ComboBox1.Text
End Sub
il te faudra sans doute également insérer une ligne dans ces onglets au moment de la validation.