Access - Ruta para guardar pdf

Hola a tod@s
Estoy intentando guardar un pdf en una ruta determinda. El pdf lo creo a la hora de imprimir, seleccionando por medio de la colección printers, la impresora "virtual" que te crea el Acrobat. Lo que no consigo es darle yo la ruta en la cual quiero que me guarde el pdf, siempre me sale el commondialog para que busque la ruta. La que hay por defecto es Mis documentos.
Pongo el codigo que tengo para que veáis como lo hago.

'Buscar la impresora que se llame Adobe pdf
Dim prtLoop As Printer
Dim X As Integer

For Each prtLoop In Application.Printers
If Application.Printers.Item(X).DeviceName = "Adobe pdf" Then
Exit For
End If
X = X + 1
Next prtLoop

Set Application.Printer = Application.Printers(X)
Set prtDefault = Application.Printer

impresoraActual = Application.Printer.DeviceName

Dim stDocName As String
stDocName = "Oferta"
DoCmd.OpenReport stDocName, acViewNormal
Exit_Comando155_Click:
Exit Sub

Err_Comando155_Click:
MsgBox Err.Description
Resume Exit_Comando155_Click

Un saludo, y gracias por adelantado

Para guardar el PDF en una ruta específica en lugar de mostrar el cuadro de diálogo de selección de ruta, puedes hacer lo siguiente:

1. Modificar el código para imprimir y guardar el PDF:

Añade el siguiente código después de abrir el informe:


2. Especificar la ruta de guardado:

Después de imprimir el PDF, agrega el código para mover o copiar el archivo PDF recién creado a la ubicación deseada. Asegúrate de modificar "C:\Ruta\Destino\" con la ruta completa donde deseas guardar el PDF:


Asegúrate de reemplazar "NombreDelArchivo.pdf" con el nombre deseado para el archivo PDF resultante.

Con estos cambios, el código abrirá el informe en modo de vista previa, imprimirá el informe en la impresora Adobe PDF y luego moverá o copiará el archivo PDF a la ruta de destino especificada.