Visual Basic para Aplicaciones - ¿Sabes enviar E-Mail con VBA?

(MSACCESS)He tratado de hacer un "cmdButton" que me envie un E-mail automaticamente. Pero todos los record son enviados en el E-mail. Quisiera que enviara el E-Mail de tan solo el Record que se ve en la forma y no de todos los records. Por favor necesito un ejemplo del código para tener una idea al respecto.

El código que tengo hasta el momento es el siguiente:

Private Sub cmdMail_Click()
DoCmd.SendObject ObjectType:=acSendReport, _
OutputFormat:=acFormatRTF, _
To:="Francisco Granado", CC:="Lizzette Alvarado", _
EditMessage:=False
EndSub