Discussion :

[LedZeppII]

Bonsoir,

Pas simple
J'ai du mettre des Debug.Print partout pour voir ce qui se passait.

Il y a effectivement un problème si on fait un apperçu, et qu'on imprime depuis l'apperçu.
Le recordset ne revient pas au début.
Donc quand on imprime depuis l'apperçu, l'état commence à la position en cours du recordset (début page 2 en page 1 par exemple).
Si le recordset est à la fin du jeu d'enregistrement, ça n'imprime que du vide.
Si on imprime directement (sans passer par l'apperçu) ça fonctionne.

Comme l'en-tête d'état est la toute première section, on peut ramener le recordset au début dans l'événement «Sur impression» :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub EntêteÉtat_Print(Cancel As Integer, PrintCount As Integer)
If Not rstEnregistrement Is Nothing Then
   rstEnregistrement.MoveFirst
End If
End Sub

A+

[popofpopof]

ok je rajoute donc cette valeur en début de l'état et le reste du code reste donc inchangé c'est bien sa?

[LedZeppII]

oui, c'est juste un ajout de code pour forcer la position du recordset au premier enregistrement.

La modif précédente du 21/03/2011 reste valable :

Bonjour,

Mets en commentaire ou supprime la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

            rstEnregistrement.MoveNext

de la procédure événementielle Private Sub EntêteGroupe0_Print(..)

Selon moi, le déplacement vers l'enregistrement suivant ne doit se faire que dans la procédure Détail_Print(..).

A+

[popofpopof]

Merci sa marche j'avais un autre problème actualisation et j'ai trouve mon problème

Super