Visual Basic - Imprimir Informe Access VB

Hola a todos, hace unos dias puse mi duda sobre como imprimir por impresora un informe de access, y ya tengo contestación que adjunto, como podria decirle que solo me imprimiera la ultima pagina? O una pagina determinada?

Gracias

Aqui va el codigo...

command1-click()

Dim strArchivo, _
acApp

strArchivo = "C:\Sistema\BDproyecto.mdb" 'ubicacio de base de datos

' creo un objeto Access
Set acApp = CreateObject("Access.Application")

' puedo mostrarlo o no
acApp.Visible = False
' abro la base de datos
acApp.OpenCurrentDatabase strArchivo

' Imprimo el informe

acApp.DoCmd.OpenReport "Cliente_Proveedor" 'tabla, reporte o informe a imprimir

' cierro y salgo

acApp.Quit

Set acApp = Nothing

En el post anterior sobre el mismo tema yo te había contestado. Va de nuevo:

Public oAcces As Access.Application

Private Sub Command1_Click()

'incluir la referencia "Microsoft Access Object Library" al proyecto

Dim npgs as string

Set oAcces = New Access.Application
'oAcces.Visible = False
oAcces.OpenCurrentDatabase "nombre_base_de_datos.mdb"
oAcces.Visible = False
oAcces.DoCmd.OpenReport "nombre_reporte", acViewPreview

npgs = Reports("nombre_reporte").paginas.Value
oAcces.DoCmd.PrintOut acPages, npgs, npgs

oAcces.CloseCurrentDatabase
oAcces.Quit
Set oAcces = Nothing

End Sub

El reporte debe tener un textbox llamado paginas con su propiedad OrigenDelControl = [Páginas]
El textbox pude tener su propiedad visible = False para que no se imprima.

Imprime el reporte sin mostrar la ventana de access (solo un instante)
Imprime el reporte en la impresora seleccionada en el reporte.