IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

champs calculés sous access


Sujet :

VBA Access

  1. #1
    Candidat au Club
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 2
    Points : 2
    Points
    2
    Par défaut champs calculés sous access
    Comment peut on obtenir les résultats suivants dans une formule sous condition (IIf) ?:
    *condition * TVA 5.5 * tva 19.6
    * 1 * ht*0.055 *
    * 2 * * ht *0.196
    * 3 * ht*2/3*0.055 * ht*1/3*0.196
    Ceci en prévision d'établir une facture, ou le total tva par taux doit être ajouté.
    C'est la condition 3 qui me gêne.
    Merci
    Myriam

  2. #2
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 331
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 331
    Points : 23 786
    Points
    23 786
    Par défaut
    Je te déconseille fortement de traiter tes taux de TVA ainsi car les taux peuvent varier. Si tu les mets en 'dur' il faudra que tu modifie ton appli à chaque changement.

    Une solution classique est la suivante :

    Créer une table des taux

    table Taux
    ClefTaux
    DateDebut
    DateFin
    Pourcentage

    Après tu peux utliser la fonction suivante :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
     
    public function TauxCourant(prmClefTaux as long, prmDate) as double
       dim result as variant
       result=DFirst("[Pourcentage]","Taux","[ClefTaux]=" & prmClefTaux & " AND #" & format$(prmDate,"yyyy-mm-dd") & "# between [DateDebut] and [DateFin]"
     
      if isNull(result) then
          result=CDbl(0)
      end if
     
      TauxCourant=CDbl(Result)
     
    end function
    pour répondre à ta question sur les iif() tu pourrais l'écrire ainsi :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    iif([Taux]=5.5; [ht]*5.5/100; iif([Taux]=19.6; [ht]*19.6/100; ([ht]*5.5/100*2/3) + ([ht]*19.6/100*1/3)))
    A+
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

Discussions similaires

  1. formulaire avec champ calcules sur access
    Par tobisko dans le forum Access
    Réponses: 3
    Dernier message: 08/09/2006, 13h52
  2. champs calculés sous access
    Par grandarry dans le forum Access
    Réponses: 4
    Dernier message: 30/08/2006, 03h17
  3. Champs calculé en Access 2003 - débutant
    Par Geniale dans le forum Access
    Réponses: 2
    Dernier message: 03/06/2006, 01h29
  4. Calculs sous Access 2000
    Par didoo6 dans le forum Access
    Réponses: 1
    Dernier message: 24/04/2006, 14h53
  5. calcul sous access
    Par ALAMARQU dans le forum VBA Access
    Réponses: 4
    Dernier message: 28/02/2006, 10h03

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo