combobox selon le choix effectué d'un autre combobox
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:
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 |