Access - URGENTE

Hola, me gustaría saber que tengo que hacer para imprimir un informe a partir de un formulario, e imprimir el registro actual que estoy visualizado en el formulario

PROCEDIMIENTO EN EL BOTON DE COMANDO PARA IMPRIMIR.

Private Sub Imprimir_Ficha_Click()

On Error GoTo Err_Imprimir_Ficha_Click

Dim stDocName As String
Dim stWhere As String

stDocName = ""
stWhere = ""

stDocName = "NOMBRE DEL INFORME"
' stWhere = "GP01NMAT = '" & Me![GP01NMAT] & "'" SI GP01NMAT FUERA CARACTER
stWhere = "GP01NMAT = " & Me![GP01NMAT]

If Not IsNull(stDocName) And stDocName <> "" Then
DoCmd.OpenReport stDocName, acPreview, , stWhere
End If

Exit_Imprimir_Ficha_Click:
Exit Sub

Err_Imprimir_Ficha_Click:
MsgBox Err.Description
Resume Exit_Imprimir_Ficha_Click

End Sub

EXPLICACION
stDocName = AQUI SE PONE EL NOMBRE DEL INFORME ENTRE COMILLAS DOBLES.
Debe haber un campo comun tanto en el informe como en el formulario.
GP01NMAT es el nombre del campo en el informe
me.[GP01NMAT] es el nombre del campo del formulario

Saludos desde Cádiz y espero tengas la misma urgencia para indicar si se te ha resuleto el tema con esto.