Discussion :

[F.guy]

Bonjour,
je souhaite afficher dans mon diaphragme une sélection de véhicule suivant le choix demandé dans le formulaire "Entre" sous le bouton "Planning".
la requête fonctionne bien. mais le module de Mise à jour diaphragme, non. On me dit qu'il manque un paramètre ?
Pouvez-vous m'aider.
Merci d'avance.Gantt.FG.rar

[User]

Bonjour,

Il faut que le formulaire Entre soit ouvert pour quel la requête fonctionne.

[EricDgn]

... et il faut réinstaller la table T_Categorie qui est utilisée pour la liste déroulante Cat contenue dans ce formulaire Entre.

[F.guy]

Bonjour;
Effectivement le formulaire "Entre" reste ouvert tout au long du processus.
J'ai mis à jour la table "Catégorie". Vous le trouverez en pièce jointe.
Le problème reste entier. Merci d'avance.

[EricDgn]

Bonjour,,

Une façon de faire est d'avoir une requête sans critère filtrant et de placer ce filtre au niveau du code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Public Sub MajDiagrammeGantt()
    '... ...
Dim strSQL As String
Dim RsP As DAO.Recordset
Dim RsPL As DAO.Recordset
strSQL = CurrentDb.QueryDefs("R_PlanningTache").SQL
'Debug.Print strSQL
Set RsP = CurrentDb.OpenRecordset(strSQL)
RsP.Filter = "T_Vehicule.Categorie='" & Forms!Entre!Cat & "'"
Set RsPL = RsP.OpenRecordset
    '... ...

Cordialement.

[F.guy]

C'est parfait. Merci beaucoup pour vote aide précieuse.