Discussion :

[BENNASR]

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

[casefayere]

J'ai regardé le dernier fichier disponible mais ici, tu ne dis pas quel Usf est concerné quel combo dépend de quel combo, et le code que tu publies est mal barré.
Je ne vais plus être disponible ce soir car j'ai de la visite.