Est-ce que cela est correct d=92=E9crire cette ligne (Qui fonctionne) :
If Forms![frm Mise =E0 jour des Adh=E9rents]![sfm Mise =E0 jour des
Adh=E9rents a].Form!Cocher97.Value =3D 0 _
And Forms![frm Mise =E0 jour des Adh=E9rents]![sfm Mise =E0 jour des
Adh=E9rents a].Form!txtAnn=E9eAdh=E9sion.Value =3D fnMillesime Then
De cette fa=E7ons (Fonctionne pas) :
Dim frm as form
Dim sfm as form
Set frm =3D [frm Mise =E0 jour des Adh=E9rents]
Set sfm =3D [sfm Mise =E0 jour des Adh=E9rents a]
If Forms![frm]![sfm].Form.Cocher97.Value =3D 0 And Forms![frm]!
[sfm].Form.txtAnn=E9eAdh=E9sion.Value =3D fnMillesime Then
Si oui ou se situe mon erreur ?
Merci pour votre aide.
Nota : la premi=E8re ligne fonctionne correctement, mais j=92aimerais la
Simplifier.
frm="frm Mise à jour des Adhérents" sfm="sfm Mise à jour des Adhérents a"
If Forms(frm)(sfm)!Cocher97.Value = 0 And _ Forms(frm)(sfm)!txtAnnéeAdhésion.Value = fnMillesime Then
Eric
Bonjour,
Je pense qu'il faudrait écrire :
Dim frm as string, sfm as string
frm="frm Mise à jour des Adhérents" sfm="sfm Mise à jour des Adhérents a"
If Forms(frm)(sfm)!Cocher97.Value = 0 And _ Forms(frm)(sfm)!txtAnnéeAdhésion.Value = fnMillesime Then
Jacques a écrit :
Bonsoir,
Est-ce que cela est correct d’écrire cette ligne (Qui fonctionne) :
If Forms![frm Mise à jour des Adhérents]![sfm Mise à jour des Adhérents a].Form!Cocher97.Value = 0 _ And Forms![frm Mise à jour des Adhérents]![sfm Mise à jour des Adhérents a].Form!txtAnnéeAdhésion.Value = fnMillesime Then
De cette façons (Fonctionne pas) :
Dim frm as form Dim sfm as form
Set frm = [frm Mise à jour des Adhérents] Set sfm = [sfm Mise à jour des Adhérents a]
If Forms![frm]![sfm].Form.Cocher97.Value = 0 And Forms![frm]! [sfm].Form.txtAnnéeAdhésion.Value = fnMillesime Then
Si oui ou se situe mon erreur ?
Merci pour votre aide.
Nota : la première ligne fonctionne correctement, mais j’aimerais la Simplifier.
Salutations
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour,
Je pense qu'il faudrait écrire :
Dim frm as string, sfm as string
frm="frm Mise à jour des Adhérents"
sfm="sfm Mise à jour des Adhérents a"
If Forms(frm)(sfm)!Cocher97.Value = 0 And _
Forms(frm)(sfm)!txtAnnéeAdhésion.Value = fnMillesime Then
Jacques a écrit :
Bonsoir,
Est-ce que cela est correct d’écrire cette ligne (Qui fonctionne) :
If Forms![frm Mise à jour des Adhérents]![sfm Mise à jour des
Adhérents a].Form!Cocher97.Value = 0 _
And Forms![frm Mise à jour des Adhérents]![sfm Mise à jour des
Adhérents a].Form!txtAnnéeAdhésion.Value = fnMillesime Then
De cette façons (Fonctionne pas) :
Dim frm as form
Dim sfm as form
Set frm = [frm Mise à jour des Adhérents]
Set sfm = [sfm Mise à jour des Adhérents a]
If Forms![frm]![sfm].Form.Cocher97.Value = 0 And Forms![frm]!
[sfm].Form.txtAnnéeAdhésion.Value = fnMillesime Then
Si oui ou se situe mon erreur ?
Merci pour votre aide.
Nota : la première ligne fonctionne correctement, mais j’aimerais la
Simplifier.
Salutations
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
frm="frm Mise à jour des Adhérents" sfm="sfm Mise à jour des Adhérents a"
If Forms(frm)(sfm)!Cocher97.Value = 0 And _ Forms(frm)(sfm)!txtAnnéeAdhésion.Value = fnMillesime Then
Jacques a écrit :
Bonsoir,
Est-ce que cela est correct d’écrire cette ligne (Qui fonctionne) :
If Forms![frm Mise à jour des Adhérents]![sfm Mise à jour des Adhérents a].Form!Cocher97.Value = 0 _ And Forms![frm Mise à jour des Adhérents]![sfm Mise à jour des Adhérents a].Form!txtAnnéeAdhésion.Value = fnMillesime Then
De cette façons (Fonctionne pas) :
Dim frm as form Dim sfm as form
Set frm = [frm Mise à jour des Adhérents] Set sfm = [sfm Mise à jour des Adhérents a]
If Forms![frm]![sfm].Form.Cocher97.Value = 0 And Forms![frm]! [sfm].Form.txtAnnéeAdhésion.Value = fnMillesime Then
Si oui ou se situe mon erreur ?
Merci pour votre aide.
Nota : la première ligne fonctionne correctement, mais j’aimerais la Simplifier.
Salutations
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
jacques
On 14 mar, 09:10, Eric wrote:
Bonjour,
Je pense qu'il faudrait écrire :
Dim frm as string, sfm as string
frm="frm Mise à jour des Adhérents" sfm="sfm Mise à jour des Adhérents a"
If Forms(frm)(sfm)!Cocher97.Value = 0 And _ Forms(frm)(sfm)!txtAnnéeAdhésion.Value = fnMillesime Th en
Bonjour Eric,
Merci pour ta réponse C'est Ok.
Salutations
On 14 mar, 09:10, Eric <f_fra...@hotmail.com> wrote:
Bonjour,
Je pense qu'il faudrait écrire :
Dim frm as string, sfm as string
frm="frm Mise à jour des Adhérents"
sfm="sfm Mise à jour des Adhérents a"
If Forms(frm)(sfm)!Cocher97.Value = 0 And _
Forms(frm)(sfm)!txtAnnéeAdhésion.Value = fnMillesime Th en