Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Développement Développement Visual Basic Une question plus Crystal report

Une question plus Crystal report

1 réponse
Avatar
Etienne
Bonjour =E0 tous

Je dois imprimer trois =E9tas =E0 la suite l'un de l'autre,=20
sans que cela apparaisse dans le viewer
j'ai donc fais ce qui suit dans le load du formulaire=20
poss=E9dant le viewer :
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D
mCR.LanceRapport
CRViewer.ReportSource =3D mCR.Rapport
CRViewer.DisplayGroupTree =3D False
CRViewer.ViewReport
If SansVisualisation Then
DoEvents
CRViewer.PrintReport ****** ICI
DoEvents
Unload Me
End If
End If
Screen.MousePointer =3D vbDefault
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D

La ou est Marque ICI, mais il apparait alors une combo=20
box, marquant le choix si on doit imprimer tout ou une=20
page.
Je souhaiterais que cette comboBox n'apparaisse pas=20
(comment puis-je faire)

Merci beaucoup
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Etienne
Finalment, je me répond à moi m^me au cas ou les autres
auraient égalment ce soucis

* ========================= ========================= ====
mCR.LanceRapport
If SansVisualisation Then
DoEvents
mCR.Rapport.PrintOut False <=== c'est ici
DoEvents
Unload Me
Else
CRViewer.ReportSource = mCR.Rapport
CRViewer.DisplayGroupTree = False
CRViewer.ViewReport
End If
* ========================= ========================= ====

-----Message d'origine-----
Bonjour à tous

Je dois imprimer trois étas à la suite l'un de l'autre,
sans que cela apparaisse dans le viewer
j'ai donc fais ce qui suit dans le load du formulaire
possédant le viewer :
======================== ========================= =======
mCR.LanceRapport
CRViewer.ReportSource = mCR.Rapport
CRViewer.DisplayGroupTree = False
CRViewer.ViewReport
If SansVisualisation Then
DoEvents
CRViewer.PrintReport ****** ICI
DoEvents
Unload Me
End If
End If
Screen.MousePointer = vbDefault
======================== ========================= =======

La ou est Marque ICI, mais il apparait alors une combo
box, marquant le choix si on doit imprimer tout ou une
page.
Je souhaiterais que cette comboBox n'apparaisse pas
(comment puis-je faire)

Merci beaucoup
.