Si votre email correspond à un compte, vous recevrez un lien de réinitialisation.
Bonjour j'essaie de programmer une routine en vba mais le IF que j'aiici ne fonctionne pas :Si je roule en debug je vois bien que la valeur sur laquel je fais monif est null mais aucune fois il entre dans la conditionAidez moi !If rsSelectedSite!SiteNiveauDateFin = Null ThenrsTblFactureTelco!TPSFacture = (TPSValue / 100) *rsTblFactureTelco!MontantFacturersTblFactureTelco!TVQFacture = (TVQValue / 100) *(rsTblFactureTelco!MontantFacture + rsTblFactureTelco!TPSFacture)rsTblFactureTelco!DatePaiement = NullrsTblFactureTelco!MontantPaiement = rsTblFactureTelco!MontantFacturersTblFactureTelco!TPSPaiement = (TPSValue / 100) *rsTblFactureTelco!MontantPaiementrsTblFactureTelco!TVQPaiement = (TVQValue / 100) *(rsTblFactureTelco!MontantPaiement + rsTblFactureTelco!TPSPaiement)rsTblFactureTelco!SiteNiveauID = rsSelectedSite!SiteNiveauIDrsTblFactureTelco.UpdatectrAjout = ctrAjout + 1End If
Bonjour j'essaie de programmer une routine en vba mais le IF que j'ai ici ne fonctionne pas : Si je roule en debug je vois bien que la valeur sur laquel je fais mon if est null mais aucune fois il entre dans la condition Aidez moi ! If rsSelectedSite!SiteNiveauDateFin = Null Then rsTblFactureTelco!TPSFacture = (TPSValue / 100) * rsTblFactureTelco!MontantFacture rsTblFactureTelco!TVQFacture = (TVQValue / 100) * (rsTblFactureTelco!MontantFacture + rsTblFactureTelco!TPSFacture) rsTblFactureTelco!DatePaiement = Null rsTblFactureTelco!MontantPaiement = rsTblFactureTelco! MontantFacture rsTblFactureTelco!TPSPaiement = (TPSValue / 100) * rsTblFactureTelco!MontantPaiement rsTblFactureTelco!TVQPaiement = (TVQValue / 100) * (rsTblFactureTelco!MontantPaiement + rsTblFactureTelco!TPSPaiement) rsTblFactureTelco!SiteNiveauID = rsSelectedSite! SiteNiveauID rsTblFactureTelco.Update ctrAjout = ctrAjout + 1 End If
BonjourRemplaceIf rsSelectedSite!SiteNiveauDateFin = Null ThenparIf isnull(rsSelectedSite!SiteNiveauDateFin ) Then@plusMichel"Jpmill" a écrit dans le message denews:Bonjour j'essaie de programmer une routine en vba mais le IF que j'aiici ne fonctionne pas :Si je roule en debug je vois bien que la valeur sur laquel je fais monif est null mais aucune fois il entre dans la conditionAidez moi !If rsSelectedSite!SiteNiveauDateFin = Null ThenrsTblFactureTelco!TPSFacture = (TPSValue / 100) *rsTblFactureTelco!MontantFacturersTblFactureTelco!TVQFacture = (TVQValue / 100) *(rsTblFactureTelco!MontantFacture + rsTblFactureTelco!TPSFacture)rsTblFactureTelco!DatePaiement = NullrsTblFactureTelco!MontantPaiement = rsTblFactureTelco!MontantFacturersTblFactureTelco!TPSPaiement = (TPSValue / 100) *rsTblFactureTelco!MontantPaiementrsTblFactureTelco!TVQPaiement = (TVQValue / 100) *(rsTblFactureTelco!MontantPaiement + rsTblFactureTelco!TPSPaiement)rsTblFactureTelco!SiteNiveauID = rsSelectedSite!SiteNiveauIDrsTblFactureTelco.UpdatectrAjout = ctrAjout + 1End If
Bonjour Remplace If rsSelectedSite!SiteNiveauDateFin = Null Then par If isnull(rsSelectedSite!SiteNiveauDateFin ) Then @plus Michel "Jpmill" <jpmill@gmail.com> a écrit dans le message de news:f0ca9f9c-eeb4-42c7-b1e9-f960244a72ec@r66g2000hsg.googlegroups.com... Bonjour j'essaie de programmer une routine en vba mais le IF que j'ai ici ne fonctionne pas : Si je roule en debug je vois bien que la valeur sur laquel je fais mon if est null mais aucune fois il entre dans la condition Aidez moi ! If rsSelectedSite!SiteNiveauDateFin = Null Then rsTblFactureTelco!TPSFacture = (TPSValue / 100) * rsTblFactureTelco!MontantFacture rsTblFactureTelco!TVQFacture = (TVQValue / 100) * (rsTblFactureTelco!MontantFacture + rsTblFactureTelco!TPSFacture) rsTblFactureTelco!DatePaiement = Null rsTblFactureTelco!MontantPaiement = rsTblFactureTelco! MontantFacture rsTblFactureTelco!TPSPaiement = (TPSValue / 100) * rsTblFactureTelco!MontantPaiement rsTblFactureTelco!TVQPaiement = (TVQValue / 100) * (rsTblFactureTelco!MontantPaiement + rsTblFactureTelco!TPSPaiement) rsTblFactureTelco!SiteNiveauID = rsSelectedSite! SiteNiveauID rsTblFactureTelco.Update ctrAjout = ctrAjout + 1 End If
BonjourRemplaceIf rsSelectedSite!SiteNiveauDateFin = Null ThenparIf isnull(rsSelectedSite!SiteNiveauDateFin ) Then@plusMichel"Jpmill" a écrit dans le message denews:f0ca9f9c-eeb > Bonjour j'essaie de programmer une routine en vba mais le IF que j'a i> ici ne fonctionne pas :> Si je roule en debug je vois bien que la valeur sur laquel je fais mon> if est null mais aucune fois il entre dans la condition> Aidez moi !> If rsSelectedSite!SiteNiveauDateFin = Null Then> rsTblFactureTelco!TPSFacture = (TPSValue / 100) *> rsTblFactureTelco!MontantFacture> rsTblFactureTelco!TVQFacture = (TVQValue / 100) *> (rsTblFactureTelco!MontantFacture + rsTblFactureTelco!TPSFacture)> rsTblFactureTelco!DatePaiement = Null> rsTblFactureTelco!MontantPaiement = rsTbl FactureTelco!> MontantFacture> rsTblFactureTelco!TPSPaiement = (TPSValue / 100) *> rsTblFactureTelco!MontantPaiement> rsTblFactureTelco!TVQPaiement = (TVQValue / 100) *> (rsTblFactureTelco!MontantPaiement + rsTblFactureTelco!TPSPaiement)> rsTblFactureTelco!SiteNiveauID = rsSelect edSite!> SiteNiveauID> rsTblFactureTelco.Update> ctrAjout = ctrAjout + 1> End If
Bonjour Remplace If rsSelectedSite!SiteNiveauDateFin = Null Then par If isnull(rsSelectedSite!SiteNiveauDateFin ) Then @plus Michel "Jpmill" <jpm...@gmail.com> a écrit dans le message denews:f0ca9f9c-eeb 4-42c7-b1e9-f960244a72ec@r66g2000hsg.googlegroups.com... > Bonjour j'essaie de programmer une routine en vba mais le IF que j'a i > ici ne fonctionne pas : > Si je roule en debug je vois bien que la valeur sur laquel je fais mon > if est null mais aucune fois il entre dans la condition > Aidez moi ! > If rsSelectedSite!SiteNiveauDateFin = Null Then > rsTblFactureTelco!TPSFacture = (TPSValue / 100) * > rsTblFactureTelco!MontantFacture > rsTblFactureTelco!TVQFacture = (TVQValue / 100) * > (rsTblFactureTelco!MontantFacture + rsTblFactureTelco!TPSFacture) > rsTblFactureTelco!DatePaiement = Null > rsTblFactureTelco!MontantPaiement = rsTbl FactureTelco! > MontantFacture > rsTblFactureTelco!TPSPaiement = (TPSValue / 100) * > rsTblFactureTelco!MontantPaiement > rsTblFactureTelco!TVQPaiement = (TVQValue / 100) * > (rsTblFactureTelco!MontantPaiement + rsTblFactureTelco!TPSPaiement) > rsTblFactureTelco!SiteNiveauID = rsSelect edSite! > SiteNiveauID > rsTblFactureTelco.Update > ctrAjout = ctrAjout + 1 > End If
la suite...
Bonjour j'essaie de programmer une routine en vba mais le IF que j'aiici ne fonctionne pas :Si je roule en debug je vois bien que la valeur sur laquel je fais monif est null mais aucune fois il entre dans la conditionAidez moi !If isNull(rsSelectedSite!SiteNiveauDateFin) ThenrsTblFactureTelco!TPSFacture = (TPSValue / 100) *rsTblFactureTelco!MontantFacturersTblFactureTelco!TVQFacture = (TVQValue / 100) *(rsTblFactureTelco!MontantFacture + rsTblFactureTelco!TPSFacture)rsTblFactureTelco!DatePaiement = NullrsTblFactureTelco!MontantPaiement = rsTblFactureTelco!MontantFacturersTblFactureTelco!TPSPaiement = (TPSValue / 100) *rsTblFactureTelco!MontantPaiementrsTblFactureTelco!TVQPaiement = (TVQValue / 100) *(rsTblFactureTelco!MontantPaiement + rsTblFactureTelco!TPSPaiement)rsTblFactureTelco!SiteNiveauID = rsSelectedSite!SiteNiveauIDrsTblFactureTelco.UpdatectrAjout = ctrAjout + 1End If
Bonjour j'essaie de programmer une routine en vba mais le IF que j'ai ici ne fonctionne pas : Si je roule en debug je vois bien que la valeur sur laquel je fais mon if est null mais aucune fois il entre dans la condition Aidez moi ! If isNull(rsSelectedSite!SiteNiveauDateFin) Then rsTblFactureTelco!TPSFacture = (TPSValue / 100) * rsTblFactureTelco!MontantFacture rsTblFactureTelco!TVQFacture = (TVQValue / 100) * (rsTblFactureTelco!MontantFacture + rsTblFactureTelco!TPSFacture) rsTblFactureTelco!DatePaiement = Null rsTblFactureTelco!MontantPaiement = rsTblFactureTelco! MontantFacture rsTblFactureTelco!TPSPaiement = (TPSValue / 100) * rsTblFactureTelco!MontantPaiement rsTblFactureTelco!TVQPaiement = (TVQValue / 100) * (rsTblFactureTelco!MontantPaiement + rsTblFactureTelco!TPSPaiement) rsTblFactureTelco!SiteNiveauID = rsSelectedSite! SiteNiveauID rsTblFactureTelco.Update ctrAjout = ctrAjout + 1 End If