Double impression

Le
batieres
Bonjour,

Voici une de mes commandes qui me permet en automatique de sortir un etat.
Pouvez-vous me dire ce que je dois rajouter pour pouvoir avoir une double
impression.

Merci D'avance


Private Sub Commande22_Click()
On Error GoTo Err_Commande22_Click


DoCmd.Close
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal

Exit_Commande22_Click:
Exit Sub

Err_Commande22_Click:
MsgBox Err.Description
Resume Exit_Commande22_Click

End Sub
--
Avoir raison c''est avoir le tort des autres
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Fabien
Le #6328941
Bonjour,

Voici une de mes commandes qui me permet en automatique de sortir un etat.
Pouvez-vous me dire ce que je dois rajouter pour pouvoir avoir une double
impression.

Merci D'avance


Private Sub Commande22_Click()
On Error GoTo Err_Commande22_Click


DoCmd.Close
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal

Exit_Commande22_Click:
Exit Sub

Err_Commande22_Click:
MsgBox Err.Description
Resume Exit_Commande22_Click

End Sub
bonjour,

...
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal
...

Tout simplement ?

batieres
Le #6328931
Merci FABIEN,

Comme je dis toujours

La simplicite n'est reservé qu'aux gens simples!!

Bonne fin de journée
--
Avoir raison c''est avoir le tort des autres



Bonjour,

Voici une de mes commandes qui me permet en automatique de sortir un etat.
Pouvez-vous me dire ce que je dois rajouter pour pouvoir avoir une double
impression.

Merci D'avance


Private Sub Commande22_Click()
On Error GoTo Err_Commande22_Click


DoCmd.Close
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal

Exit_Commande22_Click:
Exit Sub

Err_Commande22_Click:
MsgBox Err.Description
Resume Exit_Commande22_Click

End Sub
bonjour,

....
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal
....

Tout simplement ?




Docteur Jekyll
Le #6328751
Pour avoir tout je fais:

nombre=inputbox("Combien de copies désirez vous")
for i= 1 to nombre
impression
next I

"Fabien" 470f87fd$0$27392$
Bonjour,

Voici une de mes commandes qui me permet en automatique de sortir un
etat.
Pouvez-vous me dire ce que je dois rajouter pour pouvoir avoir une double
impression.

Merci D'avance


Private Sub Commande22_Click()
On Error GoTo Err_Commande22_Click


DoCmd.Close
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal
Exit_Commande22_Click:
Exit Sub

Err_Commande22_Click:
MsgBox Err.Description
Resume Exit_Commande22_Click
End Sub
bonjour,

...
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal
DoCmd.OpenReport "ETAT COMMANDE", acViewNormal
...

Tout simplement ?



Publicité
Poster une réponse
Anonyme