Si votre email correspond à un compte, vous recevrez un lien de réinitialisation.
Oups,bonne idée;je fais donc:Me.Filter = Nz(ContratType = Me!BtSContratType , "*") & _"& And Nz(LevelResp = Me!BtsLevelResp, "*") & _"& And Nz(Categ = Me!BtsCateg, "*")Me.FilterOn = Truela j'ai une erreur (Exprected end of statment)Grrr, ça me prend la tête ..Merci pour ta patience ;-)Frédéric"fth" <infosSPAM?@matloc.be> wrote in messagenews:%rE BONJOUR Fabrice,voici comment j'essaie de résoudre mon probleme:Me.Filter = Nz("ContratType = '" & Me!BtSContratType, "") & "'" AndNz("LevelResp = '" & Me!BtsLevelResp, "") & "'" And Nz("Categ = '" &Me!BtsCateg, "")Me.FilterOn = Truebien entendu, ça coince ...Une iée?D'avance merciFrédéric"Patrice" wrote in messagenews:oui du genre:me.filter="ContratType='" & me!BtCOntratType & "' and titi='" & me!champ1&"' and me!champ2=true"Pas de ' pour du numériqueRe Bonjour,ta solution est elle possible pour plusieurs champs dans la mm form?Frederic"Patrice" wrote in messagenews:bonjourEssaiPrivate Sub BtSContratType_AfterUpdate()me.filter="ContratType='" & me!BtCOntratType & "'"me.filteron=trueend subBonjour,VOici la situation:MaForm avec mes champs.Un comboBox avec les types de contrats existant (BtContratType)et mon champ [contratType]Quand je choisi le type de contrat dans BtContratType, j'attend enretourtoute la table filtrée sur base de ce qu'il y a dans BtContratTypeVoici le code sur lequel je butte lamentablement (faut bien l'dire!)Merci pour vos suggestionsFrédéricPrivate Sub BtSContratType_AfterUpdate()Dim SQL As StringSQL = ("SELECT QyContrat.* " & _"From QyContrat " & _"WHERE (((QyContrat.ContratType)=[BtCOntratType]));")DoCmd.RunSQL SQLEnd Sub
rE BONJOUR Fabrice,voici comment j'essaie de résoudre mon probleme:Me.Filter = Nz("ContratType = '" & Me!BtSContratType, "") & "'" AndNz("LevelResp = '" & Me!BtsLevelResp, "") & "'" And Nz("Categ = '" &Me!BtsCateg, "")Me.FilterOn = Truebien entendu, ça coince ...Une iée?D'avance merciFrédéric"Patrice" wrote in messagenews:oui du genre:me.filter="ContratType='" & me!BtCOntratType & "' and titi='" & me!champ1&"' and me!champ2=true"Pas de ' pour du numériqueRe Bonjour,ta solution est elle possible pour plusieurs champs dans la mm form?Frederic"Patrice" wrote in messagenews:bonjourEssaiPrivate Sub BtSContratType_AfterUpdate()me.filter="ContratType='" & me!BtCOntratType & "'"me.filteron=trueend subBonjour,VOici la situation:MaForm avec mes champs.Un comboBox avec les types de contrats existant (BtContratType)et mon champ [contratType]Quand je choisi le type de contrat dans BtContratType, j'attend enretourtoute la table filtrée sur base de ce qu'il y a dans BtContratTypeVoici le code sur lequel je butte lamentablement (faut bien l'dire!)Merci pour vos suggestionsFrédéricPrivate Sub BtSContratType_AfterUpdate()Dim SQL As StringSQL = ("SELECT QyContrat.* " & _"From QyContrat " & _"WHERE (((QyContrat.ContratType)=[BtCOntratType]));")DoCmd.RunSQL SQLEnd Sub
oui du genre:me.filter="ContratType='" & me!BtCOntratType & "' and titi='" & me!champ1&"' and me!champ2=true"Pas de ' pour du numériqueRe Bonjour,ta solution est elle possible pour plusieurs champs dans la mm form?Frederic"Patrice" wrote in messagenews:bonjourEssaiPrivate Sub BtSContratType_AfterUpdate()me.filter="ContratType='" & me!BtCOntratType & "'"me.filteron=trueend subBonjour,VOici la situation:MaForm avec mes champs.Un comboBox avec les types de contrats existant (BtContratType)et mon champ [contratType]Quand je choisi le type de contrat dans BtContratType, j'attend enretourtoute la table filtrée sur base de ce qu'il y a dans BtContratTypeVoici le code sur lequel je butte lamentablement (faut bien l'dire!)Merci pour vos suggestionsFrédéricPrivate Sub BtSContratType_AfterUpdate()Dim SQL As StringSQL = ("SELECT QyContrat.* " & _"From QyContrat " & _"WHERE (((QyContrat.ContratType)=[BtCOntratType]));")DoCmd.RunSQL SQLEnd Sub
Re Bonjour,ta solution est elle possible pour plusieurs champs dans la mm form?Frederic"Patrice" wrote in messagenews:bonjourEssaiPrivate Sub BtSContratType_AfterUpdate()me.filter="ContratType='" & me!BtCOntratType & "'"me.filteron=trueend subBonjour,VOici la situation:MaForm avec mes champs.Un comboBox avec les types de contrats existant (BtContratType)et mon champ [contratType]Quand je choisi le type de contrat dans BtContratType, j'attend enretourtoute la table filtrée sur base de ce qu'il y a dans BtContratTypeVoici le code sur lequel je butte lamentablement (faut bien l'dire!)Merci pour vos suggestionsFrédéricPrivate Sub BtSContratType_AfterUpdate()Dim SQL As StringSQL = ("SELECT QyContrat.* " & _"From QyContrat " & _"WHERE (((QyContrat.ContratType)=[BtCOntratType]));")DoCmd.RunSQL SQLEnd Sub
bonjourEssaiPrivate Sub BtSContratType_AfterUpdate()me.filter="ContratType='" & me!BtCOntratType & "'"me.filteron=trueend subBonjour,VOici la situation:MaForm avec mes champs.Un comboBox avec les types de contrats existant (BtContratType)et mon champ [contratType]Quand je choisi le type de contrat dans BtContratType, j'attend enretourtoute la table filtrée sur base de ce qu'il y a dans BtContratTypeVoici le code sur lequel je butte lamentablement (faut bien l'dire!)Merci pour vos suggestionsFrédéricPrivate Sub BtSContratType_AfterUpdate()Dim SQL As StringSQL = ("SELECT QyContrat.* " & _"From QyContrat " & _"WHERE (((QyContrat.ContratType)=[BtCOntratType]));")DoCmd.RunSQL SQLEnd Sub
Bonjour,VOici la situation:MaForm avec mes champs.Un comboBox avec les types de contrats existant (BtContratType)et mon champ [contratType]Quand je choisi le type de contrat dans BtContratType, j'attend enretourtoute la table filtrée sur base de ce qu'il y a dans BtContratTypeVoici le code sur lequel je butte lamentablement (faut bien l'dire!)Merci pour vos suggestionsFrédéricPrivate Sub BtSContratType_AfterUpdate()Dim SQL As StringSQL = ("SELECT QyContrat.* " & _"From QyContrat " & _"WHERE (((QyContrat.ContratType)=[BtCOntratType]));")DoCmd.RunSQL SQLEnd Sub
Oups, bonne idée; je fais donc: Me.Filter = Nz(ContratType = Me!BtSContratType , "*") & _ "& And Nz(LevelResp = Me!BtsLevelResp, "*") & _ "& And Nz(Categ = Me!BtsCateg, "*") Me.FilterOn = True la j'ai une erreur (Exprected end of statment) Grrr, ça me prend la tête .. Merci pour ta patience ;-) Frédéric "fth" <i nfosSPAM?@matloc.be> wrote in message news:%238ZuLybdGHA.4224@TK2MSFTNGP04.phx.gbl... rE BONJOUR Fabrice, voici comment j'essaie de résoudre mon probleme: Me.Filter = Nz("ContratType = '" & Me!BtSContratType, "") & "'" And Nz("LevelResp = '" & Me!BtsLevelResp, "") & "'" And Nz("Categ = '" & Me!BtsCateg, "") Me.FilterOn = True bien entendu, ça coince ... Une iée? D'avance merci Frédéric "Patrice" <Patrice@discussions.microsoft.com> wrote in message news:4B2BDA79-ED07-47F2-A10C-D2C1D339D210@microsoft.com... oui du genre: me.filter="ContratType='" & me!BtCOntratType & "' and titi='" & me!champ1 & "' and me!champ2=true" Pas de ' pour du numérique Re Bonjour, ta solution est elle possible pour plusieurs champs dans la mm form? Frederic "Patrice" <Patrice@discussions.microsoft.com> wrote in message news:861C6674-A0FA-4CBE-822D-0824972FB9CC@microsoft.com... bonjour Essai Private Sub BtSContratType_AfterUpdate() me.filter="ContratType='" & me!BtCOntratType & "'" me.filteron=true end sub Bonjour, VOici la situation: MaForm avec mes champs. Un comboBox avec les types de contrats existant (BtContratType) et mon champ [contratType] Quand je choisi le type de contrat dans BtContratType, j'attend en retour toute la table filtrée sur base de ce qu'il y a dans BtContratType Voici le code sur lequel je butte lamentablement (faut bien l'dire!) Merci pour vos suggestions Frédéric Private Sub BtSContratType_AfterUpdate() Dim SQL As String SQL = ("SELECT QyContrat.* " & _ "From QyContrat " & _ "WHERE (((QyContrat.ContratType)=[BtCOntratType]));") DoCmd.RunSQL SQL End Sub
rE BONJOUR Fabrice, voici comment j'essaie de résoudre mon probleme: Me.Filter = Nz("ContratType = '" & Me!BtSContratType, "") & "'" And Nz("LevelResp = '" & Me!BtsLevelResp, "") & "'" And Nz("Categ = '" & Me!BtsCateg, "") Me.FilterOn = True bien entendu, ça coince ... Une iée? D'avance merci Frédéric "Patrice" <Patrice@discussions.microsoft.com> wrote in message news:4B2BDA79-ED07-47F2-A10C-D2C1D339D210@microsoft.com... oui du genre: me.filter="ContratType='" & me!BtCOntratType & "' and titi='" & me!champ1 & "' and me!champ2=true" Pas de ' pour du numérique Re Bonjour, ta solution est elle possible pour plusieurs champs dans la mm form? Frederic "Patrice" <Patrice@discussions.microsoft.com> wrote in message news:861C6674-A0FA-4CBE-822D-0824972FB9CC@microsoft.com... bonjour Essai Private Sub BtSContratType_AfterUpdate() me.filter="ContratType='" & me!BtCOntratType & "'" me.filteron=true end sub Bonjour, VOici la situation: MaForm avec mes champs. Un comboBox avec les types de contrats existant (BtContratType) et mon champ [contratType] Quand je choisi le type de contrat dans BtContratType, j'attend en retour toute la table filtrée sur base de ce qu'il y a dans BtContratType Voici le code sur lequel je butte lamentablement (faut bien l'dire!) Merci pour vos suggestions Frédéric Private Sub BtSContratType_AfterUpdate() Dim SQL As String SQL = ("SELECT QyContrat.* " & _ "From QyContrat " & _ "WHERE (((QyContrat.ContratType)=[BtCOntratType]));") DoCmd.RunSQL SQL End Sub
oui du genre: me.filter="ContratType='" & me!BtCOntratType & "' and titi='" & me!champ1 & "' and me!champ2=true" Pas de ' pour du numérique Re Bonjour, ta solution est elle possible pour plusieurs champs dans la mm form? Frederic "Patrice" <Patrice@discussions.microsoft.com> wrote in message news:861C6674-A0FA-4CBE-822D-0824972FB9CC@microsoft.com... bonjour Essai Private Sub BtSContratType_AfterUpdate() me.filter="ContratType='" & me!BtCOntratType & "'" me.filteron=true end sub Bonjour, VOici la situation: MaForm avec mes champs. Un comboBox avec les types de contrats existant (BtContratType) et mon champ [contratType] Quand je choisi le type de contrat dans BtContratType, j'attend en retour toute la table filtrée sur base de ce qu'il y a dans BtContratType Voici le code sur lequel je butte lamentablement (faut bien l'dire!) Merci pour vos suggestions Frédéric Private Sub BtSContratType_AfterUpdate() Dim SQL As String SQL = ("SELECT QyContrat.* " & _ "From QyContrat " & _ "WHERE (((QyContrat.ContratType)=[BtCOntratType]));") DoCmd.RunSQL SQL End Sub
Re Bonjour, ta solution est elle possible pour plusieurs champs dans la mm form? Frederic "Patrice" <Patrice@discussions.microsoft.com> wrote in message news:861C6674-A0FA-4CBE-822D-0824972FB9CC@microsoft.com... bonjour Essai Private Sub BtSContratType_AfterUpdate() me.filter="ContratType='" & me!BtCOntratType & "'" me.filteron=true end sub Bonjour, VOici la situation: MaForm avec mes champs. Un comboBox avec les types de contrats existant (BtContratType) et mon champ [contratType] Quand je choisi le type de contrat dans BtContratType, j'attend en retour toute la table filtrée sur base de ce qu'il y a dans BtContratType Voici le code sur lequel je butte lamentablement (faut bien l'dire!) Merci pour vos suggestions Frédéric Private Sub BtSContratType_AfterUpdate() Dim SQL As String SQL = ("SELECT QyContrat.* " & _ "From QyContrat " & _ "WHERE (((QyContrat.ContratType)=[BtCOntratType]));") DoCmd.RunSQL SQL End Sub
bonjour Essai Private Sub BtSContratType_AfterUpdate() me.filter="ContratType='" & me!BtCOntratType & "'" me.filteron=true end sub Bonjour, VOici la situation: MaForm avec mes champs. Un comboBox avec les types de contrats existant (BtContratType) et mon champ [contratType] Quand je choisi le type de contrat dans BtContratType, j'attend en retour toute la table filtrée sur base de ce qu'il y a dans BtContratType Voici le code sur lequel je butte lamentablement (faut bien l'dire!) Merci pour vos suggestions Frédéric Private Sub BtSContratType_AfterUpdate() Dim SQL As String SQL = ("SELECT QyContrat.* " & _ "From QyContrat " & _ "WHERE (((QyContrat.ContratType)=[BtCOntratType]));") DoCmd.RunSQL SQL End Sub
Bonjour, VOici la situation: MaForm avec mes champs. Un comboBox avec les types de contrats existant (BtContratType) et mon champ [contratType] Quand je choisi le type de contrat dans BtContratType, j'attend en retour toute la table filtrée sur base de ce qu'il y a dans BtContratType Voici le code sur lequel je butte lamentablement (faut bien l'dire!) Merci pour vos suggestions Frédéric Private Sub BtSContratType_AfterUpdate() Dim SQL As String SQL = ("SELECT QyContrat.* " & _ "From QyContrat " & _ "WHERE (((QyContrat.ContratType)=[BtCOntratType]));") DoCmd.RunSQL SQL End Sub
