OVH Cloud OVH Cloud

IMPRESSION FORMULAIRE

4 réponses
Avatar
ptkppr
bonjour à tous,
apres recherche dans le forum je n'ai pas trouve la reponse vraiment claire
à la question suivante :
est-il possible d'imprimer les données d'un formulaire à l'affichage
directement dans un etat preformaté (par souci de presentation) plutot que
d'envoyer une impression dudit formulaire qui n'est pas par nature destiné à
cela ?
Si oui comment est construite la requete sur laquelle repose l'etat
correspondant ?
Merci d'avance

4 réponses

Avatar
Tisane
Bonjour,

apres recherche dans le forum je n'ai pas trouve la reponse vraiment
claire
à la question suivante :
est-il possible d'imprimer les données d'un formulaire à l'affichage
directement dans un etat preformaté (par souci de presentation) plutot que
d'envoyer une impression dudit formulaire qui n'est pas par nature destiné
à
cela ?
Si oui comment est construite la requete sur laquelle repose l'etat
correspondant ?


Pourtant, de mémoire, quelqu'un t'a déjà répondu. Toujours de mémoire, la
suggestion devait être la suivante :
- sélectionne le formulaire
- menu Fichier | Enregistrer sous
- dans la liste En tant que, sélectionne "Etat"
- modifie l'état obtenu pour que son look soit adapté à l'impression.
Le contenu sera le même que celui de ton formulaire.
Il te restera à placer un bouton sur ton formulaire pour imprimer l'état
correspondant à l'enregistrement en cours.
Ce bouton aura une procédure événementielle "sur clic" qui ressemblera a ce
qui suit :

Private Sub Bt_Imprimer_Click()
On Error Resume Next
DoCmd.OpenReport "Nom_Etat", acPreview, "",
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"
End Sub

Maintenant, si cette réponse ne te paraît pas claire, c'est peut-être que la
question ne l'est pas non plus ;-))

--
Tisane

Avatar
ptkppr
bonjour Tisane,
tout d'abord je te remercie pour ta reponse. apparemment t'as bien compris
ma question... Par contre moi pas tout pigé !
Dans ton script :
=============================== Private Sub Bt_Imprimer_Click()
On Error Resume Next
DoCmd.OpenReport "Nom_Etat", acPreview, "",
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"
End Sub
============================== je n'ai pas compris à quoi sert :
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"

parce que j'ai fait un essai mais rien ne se passe ?



Pourtant, de mémoire, quelqu'un t'a déjà répondu. Toujours de mémoire, la
suggestion devait être la suivante :
- sélectionne le formulaire
- menu Fichier | Enregistrer sous
- dans la liste En tant que, sélectionne "Etat"
- modifie l'état obtenu pour que son look soit adapté à l'impression.
Le contenu sera le même que celui de ton formulaire.
Il te restera à placer un bouton sur ton formulaire pour imprimer l'état
correspondant à l'enregistrement en cours.
Ce bouton aura une procédure événementielle "sur clic" qui ressemblera a ce
qui suit :

Private Sub Bt_Imprimer_Click()
On Error Resume Next
DoCmd.OpenReport "Nom_Etat", acPreview, "",
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"
End Sub

Maintenant, si cette réponse ne te paraît pas claire, c'est peut-être que la
question ne l'est pas non plus ;-))
Avatar
Eric
Bonjour,

En poursuivant la réponse de Tisane,
Private Sub Bt_Imprimer_Click()
DoCmd.OpenReport "Nom_Etat", acPreview,,"[Ton_champ_cle]=" &
[forms]![Ton_Form]![Ton_champ_cle] ' pour du numérique
End Sub

si [Ton_champ_cle] est de type Texte, mettre:
"[Ton_champ_cle]='" & [forms]![Ton_Form]![Ton_champ_cle] & "'"

où [Ton_champ_cle] est le champ qui fait le lien entre le formulaire et
l'état.

bonjour Tisane,
tout d'abord je te remercie pour ta reponse. apparemment t'as bien compris
ma question... Par contre moi pas tout pigé !
Dans ton script :
=============================== > Private Sub Bt_Imprimer_Click()
On Error Resume Next
DoCmd.OpenReport "Nom_Etat", acPreview, "",
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"
End Sub
============================== > je n'ai pas compris à quoi sert :
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"

parce que j'ai fait un essai mais rien ne se passe ?



Pourtant, de mémoire, quelqu'un t'a déjà répondu. Toujours de mémoire, la
suggestion devait être la suivante :
- sélectionne le formulaire
- menu Fichier | Enregistrer sous
- dans la liste En tant que, sélectionne "Etat"
- modifie l'état obtenu pour que son look soit adapté à l'impression.
Le contenu sera le même que celui de ton formulaire.
Il te restera à placer un bouton sur ton formulaire pour imprimer l'état
correspondant à l'enregistrement en cours.
Ce bouton aura une procédure événementielle "sur clic" qui ressemblera a ce
qui suit :

Private Sub Bt_Imprimer_Click()
On Error Resume Next
DoCmd.OpenReport "Nom_Etat", acPreview, "",
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"
End Sub

Maintenant, si cette réponse ne te paraît pas claire, c'est peut-être que la
question ne l'est pas non plus ;-))




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
ptkppr
Rebonjour Eric
Ok donc je dois avoir [ton_champ_cle] pour chaque champ deformulaire
correspondant à un champ de l'etat si je comprends bien la manip ?
Tu parles egalement de champt "texte"... j'ai 2 champs "date" dans ces
documents, le libellé est different j'imagine ?


Bonjour,

En poursuivant la réponse de Tisane,
Private Sub Bt_Imprimer_Click()
DoCmd.OpenReport "Nom_Etat", acPreview,,"[Ton_champ_cle]=" &
[forms]![Ton_Form]![Ton_champ_cle] ' pour du numérique
End Sub

si [Ton_champ_cle] est de type Texte, mettre:
"[Ton_champ_cle]='" & [forms]![Ton_Form]![Ton_champ_cle] & "'"

où [Ton_champ_cle] est le champ qui fait le lien entre le formulaire et
l'état.

bonjour Tisane,
tout d'abord je te remercie pour ta reponse. apparemment t'as bien compris
ma question... Par contre moi pas tout pigé !
Dans ton script :
=============================== > > Private Sub Bt_Imprimer_Click()
On Error Resume Next
DoCmd.OpenReport "Nom_Etat", acPreview, "",
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"
End Sub
============================== > > je n'ai pas compris à quoi sert :
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"

parce que j'ai fait un essai mais rien ne se passe ?



Pourtant, de mémoire, quelqu'un t'a déjà répondu. Toujours de mémoire, la
suggestion devait être la suivante :
- sélectionne le formulaire
- menu Fichier | Enregistrer sous
- dans la liste En tant que, sélectionne "Etat"
- modifie l'état obtenu pour que son look soit adapté à l'impression.
Le contenu sera le même que celui de ton formulaire.
Il te restera à placer un bouton sur ton formulaire pour imprimer l'état
correspondant à l'enregistrement en cours.
Ce bouton aura une procédure événementielle "sur clic" qui ressemblera a ce
qui suit :

Private Sub Bt_Imprimer_Click()
On Error Resume Next
DoCmd.OpenReport "Nom_Etat", acPreview, "",
"[Ton_champ_cle]=[forms]![Ton_Form]![Ton_champ_cle]"
End Sub

Maintenant, si cette réponse ne te paraît pas claire, c'est peut-être que la
question ne l'est pas non plus ;-))




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr