Bonsoir à toutes et à tous.
Aidez-moi à ne pas devenir fou avant Noël svp ..
Voilà mon soucis, depuis quelques jours, j'ai un Etat (facture) qui ne s'imprime qu'une fois, si, suite à une correction des données par exemple, on souhaite le réimprimer, l'impression se bloque, reste en permanence à l'écran le fenêtre de l’impression (image en pièce jointe) et ça ne bouge plus jusqu'à ce qu'on l'annule.
Les données proviennent d'une requête qui fonctionne sans problème.
Voici l’instruction (procédure) placée sur le clik du bouton pour imprimer :
A noter qu'en mode création l'état s'imprime parfaitement.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 Private Sub ImprFact_Click() Dim stdSuppr As String ' S'il s'agit d'une facture If Forms![Devis_Factures]![F-D] = "F" Then DoCmd.SetWarnings False ' Supprime des éventuelles lignes vides dans la facture stdSuppr = "Supprime lignes vides" DoCmd.OpenQuery stdSuppr, acNormal, acEdit ' Imprime la facture DoCmd.OpenReport "Facture", acNormal ', , "RéfFacture=Forms![Devis_Factures]![RéfFacture]" Else ' Si ce n'est pas une facture, c'est un devis et l’imprime DoCmd.OpenReport "DEVIS", acNormal, , "RéfFacture=Forms![Devis_Factures]![RéfFacture]" End If End Sub
Un grand merci à tous ceux qui pourront se pencher sur ceci.
Une excellente soirée à toutes et à tous.
Partager