Bonsoir à toutes et à tous
je vous remercié d'avance les super bénévoles
pour mon petit projet j'ai deux combobox la deuxième est conditionnée par le choix effectué courant la première CBX
voila parie de mon code
merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub UserForm_Initialize()
With Sheets("compte comptable")
  Set Dl = .Range("A" & .Rows.Count).End(xlUp)
  Set Dc = .Cells(Dl.Row, .Columns.Count).End(xlToLeft)
  ActiveWorkbook.Names.Add Name:="base", RefersTo:=.Range("A1", Dc)
End With
matiere.Clear
Me.matiere.List = Sheets("DONNEES").Range("Type1").Value
 
If Me.matiere.Value = "Fluorure*" Then
client.List = Sheets("DONNEES").Range("ClientF").Value
End If
 
If matiere.Value = "Anhydrite" Then
client.List = Sheets("DONNEES").Range("CLIENTANH").Value
End If