bonjour,
Ce n'est pas très cohérent : Le code des bojets du USerform à vocation à rester dans le module du UserForm...
Modifier comme suit (adapter avec le véritable nom de ton Userform et le véritable nom de la feuille cible :
Sub coefficient()
Dim secteur as string, coef as double
secteur = USerForm1.ComboBox1_Secteur.Value
Select Case secteur
Case Is = "PON": coef = 0.9
Case Is = "POS": coef = 0.95
Case Is = "BALAGNE": coef = 0.93
Case Is = "AJACCIO": coef = 0.95
Case Is = "SE": coef = 0.95
End Select
WorkSheets("blabla").Range("E17").Value = coef
End Sub
EDIT : HI ! Doublé sur le fil ...
Mais donner le nom de la feuille est préférable à ActiveSheet (en effet le Userform peut être utilisé et faire référence à une autre feuille que la feuille active...)
A+