Discussion :

[franza]

Je "développe" une base access et souhaite à partir d'un formulaire sélectionner un enregistrement et l'éditer via un état. Lorsque l'on fait cette opération, la totalité des enregistrements de la table est imprimée. Soit, si j'ai 10 enregitrements qui correpondent à des factures, j'ai 10 états imprimés or je ne souhaite imprimer via mon état que l'enregistrement affiché via mon formulaire.
Merci de m'adresser vos astuces ou plus simplement la manière de faire.
Slts

[loufab]

Bonjour et bienvenue,

Ce cas est traité toutes les semaines (celle-ci comprise) merci de faire une recherche avant de poster. (le dernier vu est dans le forum IHM)

Cordialement,

[Francoise*]

Bonjour et bienvenue,

Ce cas est traité toutes les semaines (celle-ci comprise) merci de faire une recherche avant de poster. (le dernier vu est dans le forum IHM)

Cordialement,

Bonjour,

Peut-être est-elle traitée toute les semaines mais je dois dire que je ne trouve pas la solution....

Françoise

[loufab]

Bonjour,

Il faut utiliser la clause Where de la commande Docmd.openreport

Pour du Numérique :

Code :

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

Docmd.openreport "nomreport",,,"N°fiche=" & me.N°fiche

ou N°fiche est l'identifiant unique de la fiche présent dans l'état et dans le formulaire (me.N°fiche)

Pour du texte :

Code :

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

Docmd.openreport "nomreport",,,"Nomfiche=""" & me.Nomfiche & """

Notez que OpenReport et OpenForm on exactement la même structure. Le Where fonctionne à l'identique.

Cordialement,

[Francoise*]

Bonjour Loufab,

Te serait-il possible de m'aider un peu plus je dois dire que je suis un peu perdue dans VB

j'ai fait deux tables:
une table "clients" et l'autre "factures"

J'ai aussi fait un Etat à partir de mes factures qui se nomme "Etat Facturier"

Ensuite j'ai fait un formulaire avec un sous-formulaire affiché par client.
Dans le sous-formulaire j'ai ajouté une commande "imprimer Etat" dans cet Etat, il y a un exemple 56 enregistrement et j'aimerais qu'il m'imprime le dernier enregistrement. J'ai essayé comme tu dis mais cela ne fonctionne pas, je ne sais pas comment l'incorporer ...

à "N°fiche=" suis-je obligée d'inscrire quelque chose ? mais quoi

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
Private Sub Commande19_Click()
On Error GoTo Err_Commande19_Click
 
    Dim stDocName As String
 
    stDocName = "Etat Facturier"
    DoCmd.OpenReport stDocName, , , "N°fiche=" & Me.N°fiche
 
 
 
Exit_Commande19_Click:
    Exit Sub
 
Err_Commande19_Click:
    MsgBox Err.Description
    Resume Exit_Commande19_Click
 
End Sub

Merci d'avance
Françoise

[Renardo]

Bonjour
N° fiche doit être remplacé par le nom du champ de l'état et le nom du champ de ton formulaire qui permet de définir la relation entre l'état et le formulaire de l'enregistrement a imprimer
dans ton cas ça pourrait être N°Facture

[Francoise*]

stDocName = "Etat Facturier"
ceci est bien une variable qui donne le nom de l'état?

Et je dois changer le n° de facture chaque fois?

Désolée je ne comprends pas comment faire pourriez-vous me montrer un exemple, merci

Françoise

[loufab]

stDocName = "Etat Facturier"
ceci est bien une variable qui donne le nom de l'état?

Et je dois changer le n° de facture chaque fois?

Désolée je ne comprends pas comment faire pourriez-vous me montrer un exemple, merci

Françoise

stDocName est bien une variable contenant le nom de l'état (en l'occurence).

Le N° de facture est conditionné par me.N°fiche ou N°fiche doit être remplacé par ton nom de champ contenant le n° unique de ta facture.

Normalement dans le formulaire et dans l'état ce nom de champ est le même, c'est pour cela que l'on met N°fiche des 2 cotés.

"N°fiche=" est le nom du champ dans l'état.
Me.N°fiche ou Me. représente le formulaire et N°fiche le nom du champ. C'est le N° de facture de l'enregistrement courant qui sera pris en compte. Pas nécessairement le dernier.

Espérant avoir éclairé vos lumières.

Cordialement,

[Francoise*]

Super !

Cela fonctionne....

Merci à tous, mais surtout à Loufab pour son aide, je donne le code pour les débutants(es) comme moi.

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
Private Sub Commande19_Click()
On Error GoTo Err_Commande19_Click
 
    Dim stDocName As String
 
    stDocName = "Etat Facturier"
    DoCmd.OpenReport stDocName, , , "ReferenceFacture=" & Me.ReferenceFacture
 
 
 
Exit_Commande19_Click:
    Exit Sub
 
Err_Commande19_Click:
    MsgBox Err.Description
    Resume Exit_Commande19_Click
 
End Sub

Maintenant lorsque je suis sur une facture et que je veux l'imprimer (pas nécessairement la dernière comme le dit Loufab) elle sort par magie (et je n'ai plus ce problème que toutes les factures s'impriment ...)

Merci à vous
Françoise

[Doudou doux]

J'avais le même probléme un vrai et maintenant ça marche

[rached2005]

"Bonjour"

çà me tue cette erreur

"Merci"

[Invité]

Bonsoir
Avec aussi peu de politesse et aussi peu de renseignements, il ne risque pas d'y avoir de réponses....

[rached2005]

je ne pensais pas du tout être impolie dsl mais cette erreur ma rendu fou dsl encore

[jb.43]

Bonjour à tous.

Les échanges ci-dessus sont très explicites et permettent d'avancer pas à pas et utiles pour des débutants comme moi.

Je relance la discussion car je souhaiterais savoir comment utiliser la commande DoCmd.OpenReport avec des enregistrements identifiés par une double clé primaire?

Je m'explique: j'ai une table "INDIVIDUS_MARQUES" où chaque enregistrement est identifié par un champ "SITE" ('01' ou '39') et un champ "ID_ANIMAL" (exemple: 'CHEV_0001').

Je souhaiterais à partir d'un bouton sur le formulaire "F_INDIVIDUS_MARQUES" ouvrir l'état "INDIV_MARQUE" correspondant uniquement à enregistrement en cours identifié par cette double clé.

Est-ce possible ?

Par ailleurs, de cette manière, peut-on associer dans l'état en question, des champs issus du formulaires, mais aussi d'autres issus de requêtes ou autres tables, sans que cela ne remette en cause la condition?

Merci d'avance.

JB

[hyperion13]

Et peut-on savoir pourquoi vous avez une clé composée ?

[jb.43]

Et peut-on savoir pourquoi vous avez une clé composée ?

Parce que les futurs utilisateurs seront basés sur deux sites d'étude (39/01) et sur chaque site, les individus pourront avoir le même nom (CHEV_001 dans le 39 et CHEV_001 dans le 01).

[hyperion13]

A tester

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub Commande19_Click()
On Error GoTo Err_Commande19_Click
    DoCmd.OpenReport "NomDelEtat", acViewPreview, , "ID_ANIMAL =" & "'" & Me!ID_ANIMAL & "'" & "AND SITE=" & "'" & Me!SITE & "'" 'si SITE est alphanum
    'ou
    'DoCmd.OpenReport "NomDelEtat", acViewPreview, , "ID_ANIMAL =" & "'" & Me!ID_ANIMAL & "'" & "AND SITE=" & Me!SITE 'si SITE est num
Exit_Commande19_Click:
    Exit Sub
Err_Commande19_Click:
    MsgBox Err.Description
    Resume Exit_Commande19_Click
 End Sub

[jb.43]

A tester

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub Commande19_Click()
On Error GoTo Err_Commande19_Click
    DoCmd.OpenReport "NomDelEtat", acViewPreview, , "ID_ANIMAL =" & "'" & Me!ID_ANIMAL & "'" & "AND SITE=" & "'" & Me!SITE & "'" 'si SITE est alphanum
    'ou
    'DoCmd.OpenReport "NomDelEtat", acViewPreview, , "ID_ANIMAL =" & "'" & Me!ID_ANIMAL & "'" & "AND SITE=" & Me!SITE 'si SITE est num
Exit_Commande19_Click:
    Exit Sub
Err_Commande19_Click:
    MsgBox Err.Description
    Resume Exit_Commande19_Click
 End Sub

Bonjour!

Le code semble fonctionner. Merci !

En revanche, pouvez-vus me confirmer ce point : il est impossible, sur l'état en question, d'intégrer des champs issus d'autres sources que le formulaire sur lequel le bouton est inséré ?

Merci d'avance.

JB

[hyperion13]

Salut,
Votre form pourrait ne contenir que les champs idAnimal et Site et votre état pourrait quant à lui contenir d'autres champs dépendants d'idAnimal et Site voire d'autres tables. Après tout dépend de l'organisation de votre bdd.

[jb.43]

Salut,
Votre form pourrait ne contenir que les champs idAnimal et Site et votre état pourrait quant à lui contenir d'autres champs dépendants d'idAnimal et Site voire d'autres tables. Après tout dépend de l'organisation de votre bdd.

Finalement je me suis un peu avancé, cela ne fonctionne pas. lorsque je clique sur le bouton, une console s'ouvre me demandant d'indiquer la valeur pour : ID_ANIMAL & ", " & SITE.

Je n'arrive pas vraiment à trouver l'erreur...