Bonsoir,
j'ai rencontré un problem avec Crystal Report 8.5, j'ai utiliser une fonction pour convertir en lettres le Montant de la facture, alors pour imprimer une seule facture pas de probleme parceque le montant est figuré dans la zone de texte.
Mais si l'utilisateur choisi d'imprimer par exemple la liste des facture par N°, dans ce cas on peut avoir plusieurs factures, ici le probleme avec la formule que j'utilise, je n'arrive pas a récuperer le Montant de chaque facture.
Aide moi SVP, ca fait 1 semaine, et rien de spécial.
le code source que j'utilise est le suivant :
Private Sub CmdOK_Click()
Dim nD As Long
Dim nF As Long
Dim rsm As New ADODB.Recordset
If TxtPn.Text <> "" And TxtDn.Text <> "" Then
'Premier N° et Dernier N) Facture à imprimer
nD = Val(TxtPn.Text)
nF = Val(TxtDn.Text)
ReportF.GroupSelectionFormula = "{ReqMis.Nfac}>=" & nD & " AND {ReqMis.Nfac}<=" & nF & ""
ReportF.DiscardSavedData
Screen.MousePointer = vbHourglass
'Convertir le nombre en chaine de car dans la zone de texte
ReportF.Text4.SetText UCase(ConvertitLettres2(CrystalReport5.Field13.Value))
RptEdtFact.CRViewer1.ReportSource = ReportF
RptEdtFact.CRViewer1.ViewReport
RptEdtFact.CRViewer1.Zoom (100)
Screen.MousePointer = vbDefault
RptEdtFact.Show
End If
End Sub