Impression un état à partir du formulaire sans l'ouvrir en aperçu
FONGBE
Messages postés
147
Date d'inscription
Statut
Membre
Dernière intervention
-
Castours -
Castours -
Bonjour à tous. j'ai une préoccupation. Pour imprimer un état, je créée une macro relier à un bouton de commande. cette macro ouvre l'état en aperçu et puis je l'imprime. mais je voudrais avoir un code vba ou macro qui me permet d'imprimer un état sans passe par l'aperçu de l'état. c'est à dire je clique sur un bouton qui est sur le formulaire et l'état s'imprime. merci à tous. est ce possible sous Access?
A voir également:
- Impression un état à partir du formulaire sans l'ouvrir en aperçu
- Spouleur d'impression - Guide
- Whatsapp formulaire opposition - Guide
- Comment ouvrir un fichier epub ? - Guide
- Creer un groupe whatsapp a partir d'un autre groupe - Guide
- Comment ouvrir un fichier bin ? - Guide
8 réponses
Bonjour
Dans cet exemple , tu as
une visualisation en impression avec acNormal
Apercu
Private Sub Commande69_Click()
On Error GoTo Err_Commande69_Click
Dim stDocName As String
stDocName = "eta_Consommation annuelle par type d'energie"
DoCmd.OpenReport stDocName, acNormal
Exit_Commande69_Click:
Exit Sub
Err_Commande69_Click:
MsgBox Err.Description
Resume Exit_Commande69_Click
End Sub
Dans cet exemple , tu as
une visualisation en apercu avec acPreview
Apercu
Private Sub Commande69_Click()
On Error GoTo Err_Commande69_Click
Dim stDocName As String
stDocName = "eta_Consommation annuelle par type d'energie"
DoCmd.OpenReport stDocName, acPreview
Exit_Commande69_Click:
Exit Sub
Err_Commande69_Click:
MsgBox Err.Description
Resume Exit_Commande69_Click
End Sub
acNormal pour imprimer
acPreview pour apercu
Dans cet exemple , tu as
une visualisation en impression avec acNormal
Apercu
Private Sub Commande69_Click()
On Error GoTo Err_Commande69_Click
Dim stDocName As String
stDocName = "eta_Consommation annuelle par type d'energie"
DoCmd.OpenReport stDocName, acNormal
Exit_Commande69_Click:
Exit Sub
Err_Commande69_Click:
MsgBox Err.Description
Resume Exit_Commande69_Click
End Sub
Dans cet exemple , tu as
une visualisation en apercu avec acPreview
Apercu
Private Sub Commande69_Click()
On Error GoTo Err_Commande69_Click
Dim stDocName As String
stDocName = "eta_Consommation annuelle par type d'energie"
DoCmd.OpenReport stDocName, acPreview
Exit_Commande69_Click:
Exit Sub
Err_Commande69_Click:
MsgBox Err.Description
Resume Exit_Commande69_Click
End Sub
acNormal pour imprimer
acPreview pour apercu
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
bonjour
peux tu mettre ta base compressée en zip dans un lien de ci joint.com que tu copies dans un message de comment ca marche
peux tu mettre ta base compressée en zip dans un lien de ci joint.com que tu copies dans un message de comment ca marche
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour, quelle commande as-tu utilisée dans la macro?
as-tu utilisé "imprimer"?
https://support.microsoft.com/fr-fr/office/imprimer-action-de-macro-44b8569c-926d-45d6-ba6b-beea5c801750?ui=fr-fr&rs=fr-fr&ad=fr
as-tu utilisé "imprimer"?
https://support.microsoft.com/fr-fr/office/imprimer-action-de-macro-44b8569c-926d-45d6-ba6b-beea5c801750?ui=fr-fr&rs=fr-fr&ad=fr