Sur la feuille ci-jointe je bug sur un truc : je voudrais que la macro "initialiser" ne s'exécute pas si le prénom en C1 n'est pas renseigné. Dans l'idéal il faudrait qu'en pareil cas une boite de dialogue s'affiche en précisant "merci de renseigner le prénom".
Sub Initialiser()
If IsEmpty(Range("C1")) Then MsgBox "veuillez renseigner le prénom SVP": End
Range("C6")= "0"
Range("C7") = "0"
Range("C8") = "0"
[c3].Value = [c3].Value + 1
End Sub