Ce sujet a été abordé plusieurs fois, me semble-t'il, mais je n'ai pu y trouver
mon bonheur.
J'ai un formulaire (basé sur une table) dont les enregistrements s'affichent
en mode continu. Dans la partie entete de ce formulaire j'ai une zone de texte
et un bouton. Lorsque je clique sur le bouton, j'exécute une procedure
evenementielle qui applique le filtre suivant sur le formulaire :
DoCmd.ApplyFilter , "[N°Responsable]=[Forms]![Formulaire1]![Filtre_Resp]"
'[N°Responsable] est un champ de ma table
'[Formulaire1] est mon formulaire
'[Filtre_Resp] est la zone de texte dans l'entete du formulaire
Cela marche tres bien.
Lorsque pour des raisons de presentation j'inclu ce formulaire (Formulaire1)
dans un autre formulaire (nommé Form_Principal), mon formulaire initial devient
donc un sous-formulaire et mon bouton ne marche plus.
Un message d'erreur m'indique que la commande ApplyFilter ne peut pas se faire
car il n'y a pas de source de donnees sur mon formulaire principal.
J'ai essaye d'activer mon sous-formulaire par different moyen avant
d'executer ma commande ApplyFilter, mais rien n'y fait.
Quelqu'un aurait-il la solution à mon pb ? Merci de votre aide.
-- -------------------------------------------- Merci de répondre sur le NG Toutes remarques bienvenues !
Pour un contact direct, utiliser: en enlevant nospam. --------------------------------------------
"Bruno" a écrit dans le message de news: | Ce sujet a été abordé plusieurs fois, me semble-t'il, mais je n'ai pu y trouver | mon bonheur. | | J'ai un formulaire (basé sur une table) dont les enregistrements s'affichent | en mode continu. Dans la partie entete de ce formulaire j'ai une zone de texte | et un bouton. Lorsque je clique sur le bouton, j'exécute une procedure | evenementielle qui applique le filtre suivant sur le formulaire : | DoCmd.ApplyFilter , "[N°Responsable]=[Forms]![Formulaire1]![Filtre_Resp]" | '[N°Responsable] est un champ de ma table | '[Formulaire1] est mon formulaire | '[Filtre_Resp] est la zone de texte dans l'entete du formulaire | Cela marche tres bien. | | Lorsque pour des raisons de presentation j'inclu ce formulaire (Formulaire1) | dans un autre formulaire (nommé Form_Principal), mon formulaire initial devient | donc un sous-formulaire et mon bouton ne marche plus. | | Un message d'erreur m'indique que la commande ApplyFilter ne peut pas se faire | car il n'y a pas de source de donnees sur mon formulaire principal. | J'ai essaye d'activer mon sous-formulaire par different moyen avant | d'executer ma commande ApplyFilter, mais rien n'y fait. | | Quelqu'un aurait-il la solution à mon pb ? Merci de votre aide.
Bonjour,
je pense qu'il faut que tu fasses références au sous-formulaire.
Et donc essayer ceci:
--
--------------------------------------------
Merci de répondre sur le NG
Toutes remarques bienvenues !
Pour un contact direct, utiliser:
nospampizza.mpl@tiscali.fr en enlevant nospam.
--------------------------------------------
"Bruno" <bruno.brochard@ineo.com> a écrit dans le message de news: 5df9b66b.0411201440.1bc8d506@posting.google.com...
| Ce sujet a été abordé plusieurs fois, me semble-t'il, mais je n'ai pu y trouver
| mon bonheur.
|
| J'ai un formulaire (basé sur une table) dont les enregistrements s'affichent
| en mode continu. Dans la partie entete de ce formulaire j'ai une zone de texte
| et un bouton. Lorsque je clique sur le bouton, j'exécute une procedure
| evenementielle qui applique le filtre suivant sur le formulaire :
| DoCmd.ApplyFilter , "[N°Responsable]=[Forms]![Formulaire1]![Filtre_Resp]"
| '[N°Responsable] est un champ de ma table
| '[Formulaire1] est mon formulaire
| '[Filtre_Resp] est la zone de texte dans l'entete du formulaire
| Cela marche tres bien.
|
| Lorsque pour des raisons de presentation j'inclu ce formulaire (Formulaire1)
| dans un autre formulaire (nommé Form_Principal), mon formulaire initial devient
| donc un sous-formulaire et mon bouton ne marche plus.
|
| Un message d'erreur m'indique que la commande ApplyFilter ne peut pas se faire
| car il n'y a pas de source de donnees sur mon formulaire principal.
| J'ai essaye d'activer mon sous-formulaire par different moyen avant
| d'executer ma commande ApplyFilter, mais rien n'y fait.
|
| Quelqu'un aurait-il la solution à mon pb ? Merci de votre aide.
-- -------------------------------------------- Merci de répondre sur le NG Toutes remarques bienvenues !
Pour un contact direct, utiliser: en enlevant nospam. --------------------------------------------
"Bruno" a écrit dans le message de news: | Ce sujet a été abordé plusieurs fois, me semble-t'il, mais je n'ai pu y trouver | mon bonheur. | | J'ai un formulaire (basé sur une table) dont les enregistrements s'affichent | en mode continu. Dans la partie entete de ce formulaire j'ai une zone de texte | et un bouton. Lorsque je clique sur le bouton, j'exécute une procedure | evenementielle qui applique le filtre suivant sur le formulaire : | DoCmd.ApplyFilter , "[N°Responsable]=[Forms]![Formulaire1]![Filtre_Resp]" | '[N°Responsable] est un champ de ma table | '[Formulaire1] est mon formulaire | '[Filtre_Resp] est la zone de texte dans l'entete du formulaire | Cela marche tres bien. | | Lorsque pour des raisons de presentation j'inclu ce formulaire (Formulaire1) | dans un autre formulaire (nommé Form_Principal), mon formulaire initial devient | donc un sous-formulaire et mon bouton ne marche plus. | | Un message d'erreur m'indique que la commande ApplyFilter ne peut pas se faire | car il n'y a pas de source de donnees sur mon formulaire principal. | J'ai essaye d'activer mon sous-formulaire par different moyen avant | d'executer ma commande ApplyFilter, mais rien n'y fait. | | Quelqu'un aurait-il la solution à mon pb ? Merci de votre aide.
bruno.brochard
Merci pour ta réponse mais cela ne fonctionne pas : Avec Form_Principal j'ai l'erreur comme quoi ce formulaire (Form_Principal) n'existe pas.
Dans mon bouton j'ai la proc suivante : Je teste si le champ texte qui me servira pour le filtre n'est pas vide et seulement s'il y a une valeur j'applique le filtre. Le test fonctionne mais l'apply filter est refusé toujours pour les mêmes raisons.
If [Forms]![Formulaire1]![Fille2].[Form]![Filtre_Resp] <> "" Then DoCmd.ApplyFilter , "[N°Responsable]= _
Forms![Formulaire1]![Fille2].Form![Filtre_Resp]" End If
Merci pour ta réponse mais cela ne fonctionne pas :
Avec Form_Principal j'ai l'erreur comme quoi ce formulaire
(Form_Principal) n'existe pas.
Dans mon bouton j'ai la proc suivante :
Je teste si le champ texte qui me servira pour le filtre n'est pas
vide et seulement s'il y a une valeur j'applique le filtre. Le test
fonctionne mais l'apply filter est refusé toujours pour les mêmes
raisons.
If [Forms]![Formulaire1]![Fille2].[Form]![Filtre_Resp] <> "" Then
DoCmd.ApplyFilter , "[N°Responsable]= _
Forms![Formulaire1]![Fille2].Form![Filtre_Resp]"
End If
Merci pour ta réponse mais cela ne fonctionne pas : Avec Form_Principal j'ai l'erreur comme quoi ce formulaire (Form_Principal) n'existe pas.
Dans mon bouton j'ai la proc suivante : Je teste si le champ texte qui me servira pour le filtre n'est pas vide et seulement s'il y a une valeur j'applique le filtre. Le test fonctionne mais l'apply filter est refusé toujours pour les mêmes raisons.
If [Forms]![Formulaire1]![Fille2].[Form]![Filtre_Resp] <> "" Then DoCmd.ApplyFilter , "[N°Responsable]= _
Forms![Formulaire1]![Fille2].Form![Filtre_Resp]" End If
RaphK34
Salut, tu as essayé un DoEvents avant?
-- -------------------------------------------- Merci de répondre sur le NG Toutes remarques bienvenues !
Pour un contact direct, utiliser: en enlevant nospam. --------------------------------------------
"Bruno" a écrit dans le message de news: | Merci pour ta réponse mais cela ne fonctionne pas : | Avec Form_Principal j'ai l'erreur comme quoi ce formulaire | (Form_Principal) n'existe pas. | | Dans mon bouton j'ai la proc suivante : | Je teste si le champ texte qui me servira pour le filtre n'est pas | vide et seulement s'il y a une valeur j'applique le filtre. Le test | fonctionne mais l'apply filter est refusé toujours pour les mêmes | raisons. | | If [Forms]![Formulaire1]![Fille2].[Form]![Filtre_Resp] <> "" Then | DoCmd.ApplyFilter , "[N°Responsable]= _ | | Forms![Formulaire1]![Fille2].Form![Filtre_Resp]" | End If
Salut,
tu as essayé un DoEvents avant?
--
--------------------------------------------
Merci de répondre sur le NG
Toutes remarques bienvenues !
Pour un contact direct, utiliser:
nospampizza.mpl@tiscali.fr en enlevant nospam.
--------------------------------------------
"Bruno" <bruno.brochard@ineo.com> a écrit dans le message de news: 5df9b66b.0411220019.755b19e7@posting.google.com...
| Merci pour ta réponse mais cela ne fonctionne pas :
| Avec Form_Principal j'ai l'erreur comme quoi ce formulaire
| (Form_Principal) n'existe pas.
|
| Dans mon bouton j'ai la proc suivante :
| Je teste si le champ texte qui me servira pour le filtre n'est pas
| vide et seulement s'il y a une valeur j'applique le filtre. Le test
| fonctionne mais l'apply filter est refusé toujours pour les mêmes
| raisons.
|
| If [Forms]![Formulaire1]![Fille2].[Form]![Filtre_Resp] <> "" Then
| DoCmd.ApplyFilter , "[N°Responsable]= _
|
| Forms![Formulaire1]![Fille2].Form![Filtre_Resp]"
| End If
-- -------------------------------------------- Merci de répondre sur le NG Toutes remarques bienvenues !
Pour un contact direct, utiliser: en enlevant nospam. --------------------------------------------
"Bruno" a écrit dans le message de news: | Merci pour ta réponse mais cela ne fonctionne pas : | Avec Form_Principal j'ai l'erreur comme quoi ce formulaire | (Form_Principal) n'existe pas. | | Dans mon bouton j'ai la proc suivante : | Je teste si le champ texte qui me servira pour le filtre n'est pas | vide et seulement s'il y a une valeur j'applique le filtre. Le test | fonctionne mais l'apply filter est refusé toujours pour les mêmes | raisons. | | If [Forms]![Formulaire1]![Fille2].[Form]![Filtre_Resp] <> "" Then | DoCmd.ApplyFilter , "[N°Responsable]= _ | | Forms![Formulaire1]![Fille2].Form![Filtre_Resp]" | End If
bruno.brochard
Je ne connais pas du tout cette commande et encore moins comment l'utiliser. J'ai lu dans l'aide quelle rendait la main à l'OS et je ne vois pas en quoi cela peut m'aider.
Je ne connais pas du tout cette commande et encore moins comment
l'utiliser.
J'ai lu dans l'aide quelle rendait la main à l'OS et je ne vois pas en
quoi cela peut m'aider.
Je ne connais pas du tout cette commande et encore moins comment l'utiliser. J'ai lu dans l'aide quelle rendait la main à l'OS et je ne vois pas en quoi cela peut m'aider.
RaphK34
slut, En fait, si tu viens de renseigner une donnée par une opération, il se peut qu' Access ne l'ai pas encore "assimilée", placé un DoEvents, permet dans ce cas de l'"assimiler". Par exemple:
... Me.Test="a" DoEvents If Me.Test = "a" then ...
-- -------------------------------------------- Merci de répondre sur le NG Toutes remarques bienvenues !
Pour un contact direct, utiliser: en enlevant nospam. --------------------------------------------
"Bruno" a écrit dans le message de news: | Je ne connais pas du tout cette commande et encore moins comment | l'utiliser. | J'ai lu dans l'aide quelle rendait la main à l'OS et je ne vois pas en | quoi cela peut m'aider.
slut,
En fait, si tu viens de renseigner une donnée par une opération, il se peut qu' Access ne l'ai pas encore "assimilée", placé un
DoEvents, permet dans ce cas de l'"assimiler".
Par exemple:
...
Me.Test="a"
DoEvents
If Me.Test = "a" then ...
--
--------------------------------------------
Merci de répondre sur le NG
Toutes remarques bienvenues !
Pour un contact direct, utiliser:
nospampizza.mpl@tiscali.fr en enlevant nospam.
--------------------------------------------
"Bruno" <bruno.brochard@ineo.com> a écrit dans le message de news: 5df9b66b.0411230317.55d22a36@posting.google.com...
| Je ne connais pas du tout cette commande et encore moins comment
| l'utiliser.
| J'ai lu dans l'aide quelle rendait la main à l'OS et je ne vois pas en
| quoi cela peut m'aider.
slut, En fait, si tu viens de renseigner une donnée par une opération, il se peut qu' Access ne l'ai pas encore "assimilée", placé un DoEvents, permet dans ce cas de l'"assimiler". Par exemple:
... Me.Test="a" DoEvents If Me.Test = "a" then ...
-- -------------------------------------------- Merci de répondre sur le NG Toutes remarques bienvenues !
Pour un contact direct, utiliser: en enlevant nospam. --------------------------------------------
"Bruno" a écrit dans le message de news: | Je ne connais pas du tout cette commande et encore moins comment | l'utiliser. | J'ai lu dans l'aide quelle rendait la main à l'OS et je ne vois pas en | quoi cela peut m'aider.
