Imprimer en mode aperçu
Fermé
Oholabi12345
Messages postés
498
Date d'inscription
vendredi 21 août 2020
Statut
Membre
Dernière intervention
29 octobre 2022
-
17 avril 2021 à 20:08
Oholabi - 25 avril 2021 à 01:04
Oholabi - 25 avril 2021 à 01:04
A voir également:
- Imprimer en mode aperçu
- Mode sécurisé samsung - Guide
- Mode d'emploi - Guide
- God mode - Guide
- Imprimer en a5 - Guide
- Démarrer en mode sans echec - Guide
2 réponses
Oholabi12345
Messages postés
498
Date d'inscription
vendredi 21 août 2020
Statut
Membre
Dernière intervention
29 octobre 2022
1
17 avril 2021 à 20:15
17 avril 2021 à 20:15
sur le bouton qui permet de lancer l'apercu jai mis ce code sur click:
mais le messagebox qui s'affiche empeche de voir l'apercu (cache une partie de l'apercu)
Private Sub btnImprime_Click()
On Error Resume Next
DoCmd.OpenReport "E_CompteClient", acViewPreview
If Err = 2501 Then Err.Clear
Vchoix = MsgBox("Voulez-vous imprimer l'état ? ", vbYesNo)
If Vchoix = vbYes Then
DoCmd.OpenReport "E_Facture", acViewNormal, , Selection
Else
DoCmd.Close
End If
End Sub
mais le messagebox qui s'affiche empeche de voir l'apercu (cache une partie de l'apercu)
Private Sub btnImprime_Click()
On Error Resume Next
DoCmd.OpenReport "E_CompteClient", acViewPreview
If Err = 2501 Then Err.Clear
Vchoix = MsgBox("Voulez-vous imprimer l'état ? ", vbYesNo)
If Vchoix = vbYes Then
DoCmd.OpenReport "E_Facture", acViewNormal, , Selection
Else
DoCmd.Close
End If
End Sub
Bonsoir,
Tu écris : "DoCmd.OpenReport "E_CompteClient", acViewPreview "
et après : MsgBox ("...", vbYesNo)
Et pourquoi donc ? Pourquoi ne pas demander tout de suite à l'utilisateur de cliquer sur l'icône "Imprimer", ou bien d'ouvrir le volet "Fichier / Imprimer"? Qu'est-ce qu'apporte la boite de dialogue, sinon des complications inutiles?
Tout dépend des accès auxquels tu as droit, mais normalement si tu peux entrer des fonctions VBA, tu devrais avoir accès au volet "fichier", et aussi compléter ta "barre d'accès rapide".
Tu écris : "DoCmd.OpenReport "E_CompteClient", acViewPreview "
et après : MsgBox ("...", vbYesNo)
Et pourquoi donc ? Pourquoi ne pas demander tout de suite à l'utilisateur de cliquer sur l'icône "Imprimer", ou bien d'ouvrir le volet "Fichier / Imprimer"? Qu'est-ce qu'apporte la boite de dialogue, sinon des complications inutiles?
Tout dépend des accès auxquels tu as droit, mais normalement si tu peux entrer des fonctions VBA, tu devrais avoir accès au volet "fichier", et aussi compléter ta "barre d'accès rapide".