Access - como hago un informe personalizado

hola estoy haciendo un sistena donde tengo que manejar un modulo de aprobacion en donde este me haga lo sigiente despues que el administrador del sistema apruebe una solicitud le llegue un e-mail por medio de outlook donde le de solamente los datos de la autorizacion como lo hago si tienen el codigo o un ejemplo por fabor haganlo llegar

MIRA A VER SI TE VALE ALGO ASÍ

Private Sub Botón90_Click()
On Error GoTo Err_Botón90_Click

Dim DocName As String
Dim mail As String
Dim mensaje As String
Dim CLIENTE As String
Dim dnicliente As String



MAIL=DLookup("[EMAIL]", "[clientes]", "[dni]=" & "'" & Me![CODCLIENT] & "'")
CLIENTE = DLookup("[nombre]", "[clientes]", "[dni]=" & "'" & Me![CODCLIENT] & "'")
mensaje = mensaje & "La AUTORIZACION: ...." & Forms![MINUTAS]![
mensaje = mensaje & Chr(9) & Chr(13)
mensaje = mensaje & " Cuyo Cliente es: " & CLIENTE
mensaje = mensaje & Chr(9) & Chr(13)
mensaje = mensaje & "Ha sido APROBADA"


DocName = "notificacion DE APROBACION"
DoCmd.SendObject A_REPORT, DocName, A_FORMATRTF, mail, , , "NOTIFICACION DE AUTORIZACION" & Me![NUMEXP], mensaje, True


Exit_Botón90_Click:
Exit Sub

Err_Botón90_Click:
MsgBox Error$
Resume Exit_Botón90_Click

End Sub