[*.xlsm] Select Case : le résultat ne s'affiche pas malgré le code ? [résolu]

anthoYS

XLDnaute Barbatruc
Bonjour,


Vous pourrez apercevoir le code VBA dans la seule et unique feuille du classeur.
Or, je ne sais pas comment faire en sorte que le résultat apparaisse en B.

VB:
Sub Resultat_Examen()
    Select Case Cells(1, 1)
        Case 0 To 9.99
            Cells(1, 2) = "Non reçu"
        Case 10 To 11.99
            Cells(1, 2) = "Reçu"
        Case 12 To 13.99
            Cells(1, 2) = "Reçu. Mention AB"
        Case 14 To 15.99
            Cells(1, 2) = "Reçu. Mention B"
          Case Else
            Cells(1, 2) = "Reçu. Mention TB"
    End Select
End Sub

je ne sais pas s'il faut l'intégrer dans "ThisWorkbook" de ce classeur ? (dans le doute je demande avant d'empirer les choses peut être)​


Merci de m'indiquer la marche à suivre,
Cordialement
 

Pièces jointes

  • Select_Case (résultats_Bac).xlsm
    11 KB · Affichages: 23

Discussions similaires