[Recup numero enregistrement Access]

Bonjour
J ai créé un formulaire qui intègre un sous-formulaire.
Je souhaiterai récupérer le numéro d'enregistrement du sous-formulaire pour l'utiliser dans mon formulaire.
J'ai pensé à faire une petite fonction dont voici le code :

Option Compare Database

Function Recd()
Dim Val As Long
Val = CurrentRecord
End Function

Ensuite, dans mon formulaire, lors du clic sur un bouton, le code suivant permet, normalement, de récupérer le numéro d'enregistrement :

Public Sub Commande65_Click()
Dim num As Long
num = Recd()
MsgBox num
End Sub

Seulement il m'affiche "0". J'ai bien essayé de spécifier Sousformulaire.CurrentRecord mais ça plante.
Quelqu'un a-t'il une solution?
Merci