Discussion :

[swissmade]

Bonjour,

J'ai un meme état pour lequel j'ai plusieur requete différente.
Au lieu de devoir faire un etat pour chaque requete je voulai savoir s'il était possible d'associer plusieurs requete et de faire un choix avec un formulaire (et un peu de VBA)

Merci d'avance

[Jeannot45]

Bonjour,

C'est possible mais l'affectation des champs se fait par VBA. Dans ton état, tes controles sont tous indépendants.

Voici une petite procédure que tu pourras aménager

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
19
20
21
Private Sub Report_Open(Cancel As Integer)
    Dim rstImpression as DAO.Recordset
    ' Récupération du jeu à imprimer dans une variable
    Set rstImpression = CurrentDb.OpenRecordset(NomRequete)
    With rstImpression
        If .BOF = True And .EOF = True Then
            MsgBox "Il n'y a rien à imprimer sur le planning de : " & strNomAtelier
            boolImprimer = False
            Cancel = True
        Exit Sub
        End If
        .MoveFirst
 
        Reports("NomDeLetat").RecordSource = strSqlImpression
        ' Affectation des champs de la requete aux champs de l'état
        Me.OF.ControlSource = .Fields(1).Name
        Me.NomClient.ControlSource = .Fields(2).Name
        Me.DesignationArticle.ControlSource = .Fields(3).Name
        Me.UbAtelier.ControlSource = .Fields(4).Name
    End With
End Sub

[swissmade]

ok merci je vais essayer ca!