Se cierra Access

[erDanielillo]

Hola buenas tardes os comento mi siguiente problema aver si me podeis ayudar:

Tengo exa una base de datos con un formulario q me da la posibilidad de imprimir varios informe segun la opcion elgida en un cuadro de opciones o ver la vista previa.. En mi ordenador funciona bien tengo el acces 2003 pero la base de datos esta en formato 2000 el problema esta en pasarselo a un compañero q tiene el access 2002 pero tbien trabaja con el formato 2000 el comando de vista previa funciona bien el q falla es el de imprimir q cada vez q se le da imprime pero se me cierra el acces con el error:
Microsoft Access ha detectado un problema y debe cerrarse Sentimos los inconvenientes ocasionados

Lo e intentado todo convertir mi base de datos a 2002 compilandola y nada de nada los informes si se imprimen bien si no utilizo ese formulario...

Espero q me podais ayudar xq me estoy volviendo loco.

El codigo del fromulario es:
Option Compare Database
Option Explicit

Private Sub Comando11_Click()

On Error Resume Next

Select Case CInt(Marco0)
Case 1
DoCmd.OpenReport "rptRiesgoClienteSaldo", acViewPreview
Case 2
DoCmd.OpenReport "rptRiesgo1ClienteSaldo", acViewPreview
Case 3
DoCmd.OpenReport "rptRiesgo2ClienteSaldo", acViewPreview
Case Else
DoCmd.OpenReport "rptRiesgo3ClienteSaldo", acViewPreview


End Select



End Sub
Private Sub Comando14_Click()
On Error GoTo Err_Comando14_Click


DoCmd.Close

Exit_Comando14_Click:
Exit Sub

Err_Comando14_Click:
MsgBox Err.Description
Resume Exit_Comando14_Click

End Sub

Private Sub Comando15_Click()
On Error Resume Next
Select Case CInt(Marco0)
Case 1
DoCmd.OpenReport "rptRiesgoClienteSaldo", acViewNormal

Case 2
DoCmd.OpenReport "rptRiesgo1ClienteSaldo", acViewNormal
Case 3
DoCmd.OpenReport "rptRiesgo2ClienteSaldo", acViewNormal
Case Else
DoCmd.OpenReport "rptRiesgo3ClienteSaldo", acViewNormal


End Select

End Sub