Hola
Bueno eso solo es la linea de código para abrir el informe, antes tienes que declarar el tipo access y añadir la referencia. Te paso el código completo por si te ayuda a enfocarlo mejor:
Código:
Dim informeX as access.application
Set InformeX = New Access.Application
InformeX.OpenCurrentDatabase (App.Path & "\ControlBoyas.mdb")
PreSem.Show 1
Seleccion = Left(Seleccion, 4) & Right(Seleccion, 2)
InformeX.DoCmd.OpenReport "TotUlSem", acViewPreview, , "Sem='" & Seleccion & "'"
InformeX.Visible = True
InformeX.DoCmd.SelectObject acReport, "TotUlSem"
InformeX.DoCmd.Maximize
InformeX.DoCmd.RunCommand acCmdZoom100
Intentalo y me comentas.
P.D.: Selección es la cadena que quiero buscar, p.e.: Semana 11 y el nombre del campo que contiene ese dato en el informe se llama Sem y es de tipo texto (por eso va entre ' )
--Saludos--