Discussion :

[jclm230759]

Bonjour

J'ai coonsulté pas mal de réponse par rapport à ce sujet et modifié maligne plusieurs foid, mais je ne trouve pas la solution. Je refais certainement la même erreur mais je ne l'a voie pas.
Pouvez vous m'aider

Merci d'avance

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Public Sub OuvrirFormSaisie(Plan_NomTrajet As String, j As Integer)
Dim DateJ As Date

DateJ = CDate(Forms!F_Planning!DateD)


DoCmd.OpenForm "F_Saisie", , , "[Plan_NomTrajet]=" & NomTrajet & " And [Plan_NomPlace]=" & j & " And ([DateTrajet]=" & FDateUs(DateJ) & ")"
Forms!F_Saisie!Plan_NomTrajet.Value = NomTrajet
Forms!F_Saisie!Plan_NomPlace.Value = j

Forms!F_Saisie!Jour.Value = DateJ
End Sub

[Robert1957]

Bonjour jclm230759,

erreur 3075 absence d'opérateur

Est surement lié à ton filtre.

Code :

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

DoCmd.OpenForm "F_Saisie", , , "[Plan_NomTrajet]=" & NomTrajet & " And [Plan_NomPlace]=" & j & " And ([DateTrajet]=" & FDateUs(DateJ) & ")"

Première partie du filtre doit être numérique selon ton code. Si c'est du texte comme je le crois:

Code :

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

"[Plan_NomTrajet]=" & chr(34) & NomTrajet & chr(34) & "

Deuxième partie du filtre doit être numérique.
Troisième partie du filtre doit être numérique encore une fois selon ton code. Si c'est une date comme il me semble:

Code :

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

" And ([DateTrajet]=#" & FDateUs(DateJ) & "#)"

Texte = "Le texte désiré"
Numérique = rien
Date = #2014-09-19#

Bonne journée

[jclm230759]

Bonjour Robert 1957

J'ai adapté suivant vos remarques mais cela ne fonctionne tjrs pas

pour info

"Plan_NomTrajet" = texte
"Plan_NomPlace" = texte

Merci quand même

Jclm

[Robert1957]

Bonjour jclm230759,

Si "Plan_NomPlace" = texte alors le paramètre de ton Sub:

Code :

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

Public Sub OuvrirFormSaisie(Plan_NomTrajet As String, j As Integer)

n'est pas bon, j devrait être un String. De plus tu devras modifier le filtre pour respecter le format texte comme indiqué dans mon autre post.

Ensuite je viens de voir que tu déclares Plan_NomTrajet dans ton sub, mais dans ton filtre tu mets "NomTrajet" ce qui est incohérent.

Bonne journée