Visual Basic - Lanzar informes de Access desde Visual Basic

Tengo este código pero me dice que el nombre del informe que meto no existe, cuando es el mismo nombre que tiene en el Acces. ¿Que me puede estar pasando?

Private Sub cmd_Imprimir_Click()
Dim DocName As String
Dim Filtro As String
Dim Base As Access.Application
DocName = "Estudio de Obra"
'Filtro = "Campo = Valor"
Set Base = New Access.Application
Base.OpenCurrentDataBase "EXISA.mdb"
Base.DoCmd.OpenReport DocName, acViewPreview, , Filtro
Base.Visible = True
Base.DoCmd.Maximiza
Set Base = Nothing
End Sub