Discussion :

[oghma777]

Je suis désolé de poser une question dont la réponse est surement simple pour la plupart d'entre vous mais mes recherchezs dans le forum et l'aide d'access ont été infructueuses.

J'ai créer un formulaire et dans ce formulaire j'aimerai avoir un bouton imprimer qui me permetteit d'imprimer l état qui correspond à une valeur que j'ai dans mon formulaire.

J' ai réussi a faire que lorsque je clike sur le bouton il me demande la valeur nécéssaire mais ce que je voudrais c kil la récupere directement dans le formulaire

merci d'avance

[coyott]

en fait ut as un etat dont la requete demande une valeur c'est ca ?
en fiat quelque part tu as un truc du style
= [parametre]
si tu veux que ce parametre soit récupérer dans une variable il ne faut qu'a la place de ce quoi précède tu mettes le chemin complet pour arriver au control qui possède la valeur voulu
exemple
=[Formulaires]![frmChoixPeriode]![Date_deb]

où ici frmChoixPeriode représente le formulaire et Date_deb et le nom du control

bien sur il faut que ton formulaire soit ouvert pour que ca fonctionne

[oghma777]

Tous mes états se créent lorsque je rempli mes formulaires
ex : j'ai un champ nofacture dans le formulaire que je retrouve dans mon étét qui se crée tout seul une fois le formulaire rempli

Ce que je voudrais c que lorsque je clique sur un bouton il m'ouvre l'etat qui a le meme nofacture que celui de la page du formulaire ouverte.

un truc du style :

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
 
Private Sub Commande14_Click()
On Error GoTo Err_Commande14_Click
 
    Dim stDocName As String
 
    stDocName = "Facture"
    DoCmd.OpenReport stDocName, acPreview, , nofacture = [formulaires]![factures]![nofacture]
 
Exit_Commande14_Click:
    Exit Sub
 
Err_Commande14_Click:
    MsgBox Err.Description
    Resume Exit_Commande14_Click
 
End Sub

[/code]

[oghma777]

Je vais essayer d'etre plus clair :

J'ai un bouton programmé comme ca :

Code :

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

1
2
3
4
Dim stDocName As String
 
    stDocName = "consultation"
    DoCmd.OpenReport stDocName, acPreview, , "[Référence de la commande]=refcommande"

il me permet d'ouvrir les pages de mon état concernant la valeur refcommande (qui ce trouve donc dans mon état)

En fait je voudrait avoir la meme chose sauf que j'aurais un formulaire avec un champ a remplir "refcommande" et un bouton qui ferait la meme chose que le precedent en recuperant la valeur rentrée à la place de la demander.

[oghma777]

j'ai trouvé sur un autre forum je donne quand meme la solution :

j'ai programmé mon bouton comme ca :

Code :

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

1
2
3
4
5
 
 
Dim Str As String
Str = "[refcommande]='" + valeur.Value + "'"
DoCmd.OpenReport "consultation", acPreview, , Str