Access - Imprimir XXX copias en Accessq

Desde un formulario deseo indicarle en un campo del mismo la cantidad de copias a imprimir de un informe, como es el código para que tome la cantidad de copias desde ese campo?

Private Sub cmdImprimir_Click()
Dim intCopias As Integer
intCopias = Me.txtCopias
DoCmd.OpenReport "NOMBRE_INFORME", acViewPreview
DoCmd.PrintOut acPages, , , , intCopias
DoCmd.Close acReport, "NOMBRE_INFORME"
End Sub

muchas gracias, lo pude hacer perfectamente. gracias.

muchas gracias, pero como puedo agregarle a este codigo que me deseleccione la Opcion Intercalar al imprimir, es decir, que esa funcion no esta habilitada.

muchas gracias

Para intercalar copias el valor es verdadero (-1), y para no intercalar Falso (0).
Sí no se pone nada, por defecto es verdadero (-1)

DoCmd.PrintOut acPages,,,,intCopias,0