Bonjour,
je voudrais que le calcule se fasse automatiquement se fasse via une table je m'explique
actuellement via un userform une sélection d' option buttons donne le résultat de 2 note
a cela j'ai une une formule sur ma feuille recap en colonne M et N qui donne 2 états ,mais j'ai des problèmes pour la note finale qui sera A ou B ou C
je pense que pour tout cela passé pas une table de correspondance serai le mieux mais je n'y arrive pas ,et surtout cela évitera a qui que se soit efface le formules
calcule des notes' via mon userform et option buttons
Private Sub CommandButton2_Click()
TextRESUETAT = (CDbl(TextBox1.Value) * CDbl(TextBox2.Value) * CDbl(TextBox3.Value))
TextRESUCRIT = (CDbl(TextBox4.Value) * CDbl(TextBox5.Value) * CDbl(TextBox6.Value))
Set ws = Sheets("Donné équipement")
l = ws.Cells.Find(ComEQUI.Value, , , xlWhole).Row
ws.Range("i" & l).Value = TextRESUETAT
ws.Range("j" & l).Value = TextRESUCRIT
End Sub
la table est la suivante
si mauvais et faible la note est b
si mauvais et moyenne la note est c
si mauvais et forte la note est c
si usuel et faible la note a
si usuel et moyenne la note b
si usuel et forte la note b
si bon et faible la note a
si bon et moyenne la note a
si bon et forte la note a
Ce lien n'existe plus
merci de votre aide pour ce sujet