Que lanía de comandos me falta para imprimir.

Tengo esta instrucción la cual abre un informe, pero quiero poder si me interesa inprimirlo y no se como hacerlo.

DoCmd.OpenReport "InformeGeneral", acViewPreview, , "IdAño=" & Me.IdAño
resultado = MsgBox("Lo quieres inprimir ", vbOKCancel, "CONFIRMACION")
If resultado = vbOK Then

Else
DoCmd.Close acReport, "InformeGeneral"
End If
End Sub

¿Me pueden ayudar?