Usted no necesita utilizar SelectObject - quitar esa línea.
Su llamada de OpenReport todavía no está correcta. Si se asume que “DriverName” es el campo le están utilizando para filtrar el informe:
Con el rst
.MoveFirst
Mientras que no .EOF
“Informe del sueldo del personal” de DoCmd.OpenReport, acViewPreview, “DriverName='" y. Campos (“StaffName”) y” '“
DoCmd.PrintOut
acReport de DoCmd.Close, “informe del sueldo del personal”
.MoveNext
Wend
Terminar con