Discussion :

[Thumb down]

@Thumb down
Pour une débutante j'évite d'écrire ce genre de code bien qu'il est court est bien élaboré

personnellement je suis convaincu qu'il faut aider les demandeur à progresser!

tu à toi même relevé les incohérence du code de notre amis, notre devoir est de l'aider à trouver par lui même les solution à ses problème voir optimiser ses code!

If not sans_div Then 'False

If sans_div Then 'True

[Halima-BTY]

@Thumb down
Pour une débutante j'évite d'écrire ce genre de code bien qu'il est court est bien élaboré



Il suffira d’inverser la condition ..et ca marche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub sans_div_Change()
 If sans_div.Value = False Then
    d.Value = 0
    d.Locked = True
 Else
    d.Value = ""
    d.Locked = False
 End If
End Sub

cette partie du code ne sert pas vraiment à grande chose faut la supprimer
remplace directement le variable optionc par le texte correspondant dans les deux conditions
soit : "option avec dividendes" ou "option sans dividendes"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
If avec_div.Value = True Then
optionc = "option avec dividendes"
ElseIf sans_div.Value = True Then
optionc = "option sans dividendes"
Else: MsgBox ("Veuillez sélectionner un type!")
End If

Merci beaucoup pour votre aide j'ai bien réussi, et j'ai trop bien compris les codes et comment les manipuler, je ferais pas les mêmes erreurs la prochaine fois.