Bonsoir
Lorsque je lance ce code :
Private Sub CommandButtonEnreg_Click()
'***********************************'
'Afficher_Catégorie et Sous Catégorie
'***********************************'
If ComboBoxCatCredit.Value = ComboBoxCatCredit.Text Then
ligne = ActiveCell.Row
Cells(ligne, 10).Value = ComboBoxCatCredit.Text
Cells(ligne, 11).Value = ComboBoxSousCatCredit.Text
End If
If ComboBoxCatDebit.Value = ComboBoxCatDebit.Text Then
ligne = ActiveCell.Row
Cells(ligne, 10).Value = ComboBoxCatDebit.Text
Cells(ligne, 11).Value = ComboBoxSousCatDebit.Text
End If
Unload Me
End Sub
Quand je choisis une donnée dans les ComboBoxCatDebit et ComboBoxSousCatDebit, leur contenu s'affichent dans les cellules désignées
Par contre, quand je choisis une donnée dans les ComboBoxCatCredit et ComboBoxSousCatCredit les cellules n'affichent rien.
Si j'inverse les blocs if, l'inverse se produit !
Je ne comprends pas.
Le pas à pas montre que les différentes combo ont bien pris en compte les données.
Une piste ?
Merci d'avance à ceux qui veulent bien se pencher sur le problème.
DW