Bonjour, je suis bloqué ou alors mais code son pas bon
tous fonctionné impeccablement pour 14 combo mais sauf pour une.
alors que j'ai mis la même choses....
Private Sub ORL_Change()
With Sheets("ORL")
TextBox12 = .Cells(ORL.ListIndex + 1, 2)
Me.TextBox12.Font = "Times New Roman"
Me.TextBox12.Font.Size = 18
End With
End Sub
Me.ORL.RowSource = "ORL!A1:A8" & Sheets("ORL").Cells(1, 1).End(xlDown).Row
Me.ORL.Font = "Times New Roman"
Me.ORL.Font.Size = 14 cela me mais: