Bonjour à Tous,

Je rencontre un souci avec le MsgBox ci-dessous, il ne renvoi que le résultat ce qui est déjà bien

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub but_ctl_enreg_Click() 'comptage des coche pour comparer avec la demande
 
MsgBox CurrentDb.OpenRecordset("select count(*) as nombre from R_ctrl_coche")!nombre
 
End Sub
Mais je souhaiterai au moins mettre une légende comme ci-dessous mais au lieu du résultat j'ai 3 boutons oui,non, annulé

Code : Sélectionner tout - Visualiser dans une fenêtre à part
MsgBox "Nombre de noms sélectionnés ", CurrentDb.OpenRecordset("select count(*) as nombre from R_ctrl_coche")!nombre
Est-ce qu'il manque un critère ou est-ce que cela n'est pas possible dans ce cas?

Je vous remercie et vous souhaite une Belle journée