Je ne sais pas comment les boutons ont été créés. J'avais envoyé mon code à un expert et il m'est revenu avec les 9 boutons que j'avais demandé tous numérotés de 1 à 9.
Ci bas le seul code que j'ai trouvé. Il n'y a rien d'autres dans tous les codes de mon programme.
Sub Macro1()
Chiffre = CInt(Right(Application.Caller, 1))
End Sub
Cordialement,
Daniel