Transposition code VBA EN SQL
Résolu
castours
Messages postés
2955
Date d'inscription
Statut
Membre
Dernière intervention
-
castours Messages postés 2955 Date d'inscription Statut Membre Dernière intervention -
castours Messages postés 2955 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je voudrai transposer ces conditions VBA ci-dessous dans une requete SQL
Les champs suivants sont utilisés: CoéfCharge, QuotePart,NbMoiset Franchise.
Le champ CoéfCharge est le champ qui doit recevoir le resultat.
Merci de votre aide
If NbMois > Vetuste Then
CoéfCharge = QuotePart
End If
If NbMois < Franchise Then
CoéfCharge = 100
End If
CoéfCharge = 100 - ((NbMois - Franchise) * PctMens)
Je voudrai transposer ces conditions VBA ci-dessous dans une requete SQL
Les champs suivants sont utilisés: CoéfCharge, QuotePart,NbMoiset Franchise.
Le champ CoéfCharge est le champ qui doit recevoir le resultat.
Merci de votre aide
If NbMois > Vetuste Then
CoéfCharge = QuotePart
End If
If NbMois < Franchise Then
CoéfCharge = 100
End If
CoéfCharge = 100 - ((NbMois - Franchise) * PctMens)
A voir également:
- Transposition code VBA EN SQL
- Code ascii - Guide
- Code puk bloqué - Guide
- Comment déverrouiller un téléphone quand on a oublié le code - Guide
- Code activation windows 10 - Guide
- Code blocks - Télécharger - Langages
5 réponses
Je verais bien quelque chose comme ca :
SELECT 'CoéfCharge' = CASE WHEN NbMois > Vetuste THEN QuotePart WHEN NbMois < Franchise THEN 100 ELSE 100 - ((NbMois - Franchise) * PctMens) END FROM Ta_Table
SQL ne permet pas de sélectionner des données avec des structures conditionnelles.
Au passage, tout ceci ne sert à rien, puisque que l'on passe ou non dans tes structures conditionnelles, CoéfCharge sera toujours égal à 100 - ((NbMois - Franchise) * PctMens).
Au passage, tout ceci ne sert à rien, puisque que l'on passe ou non dans tes structures conditionnelles, CoéfCharge sera toujours égal à 100 - ((NbMois - Franchise) * PctMens).
salut host et castours
je suis en collaboration avec castours sur ce sujet
le hic c'est que le % age dépasse le 100 % avec cette formule de calcul et c'est ce qu'on ne veut pas car ensuite il sert dans un calcul général de prix TTC
ex: 100% de 100e = 100e et 139% de 100e font plus...
nb. possible de t'envoyer l'exemple?
je suis en collaboration avec castours sur ce sujet
le hic c'est que le % age dépasse le 100 % avec cette formule de calcul et c'est ce qu'on ne veut pas car ensuite il sert dans un calcul général de prix TTC
ex: 100% de 100e = 100e et 139% de 100e font plus...
nb. possible de t'envoyer l'exemple?
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour a tous
Je vous remercie d'etre pencher sur mon probléme. D'autre part, j'ai une petite base qui me serre d'exemple pour le calcul d'ou on applique la fonction de calcul.
On choisit un enregistrement qui affiche les données, puis un bouton qui nous renvoi le resultat dans unMsgBox.
Si cela peut vous aider a touver une solution a mon problème je peux la joindre sur le forum et joindre la requete en SQL.
Je vous remercie
Je vous remercie d'etre pencher sur mon probléme. D'autre part, j'ai une petite base qui me serre d'exemple pour le calcul d'ou on applique la fonction de calcul.
On choisit un enregistrement qui affiche les données, puis un bouton qui nous renvoi le resultat dans unMsgBox.
Si cela peut vous aider a touver une solution a mon problème je peux la joindre sur le forum et joindre la requete en SQL.
Je vous remercie
Je vous remercie
J'integre votre solution dans la requète si dessous?
Je vais l'essayer..
SELECT T_Facturation.CoéfCharge = case, T_Facturation.Franchise, T_Facturation.NbMois, T_Facturation.IdChif, T_Facturation.N°Fam, T_Facturation.Code, T_Facturation.[Dégradations imputables], T_Facturation.PrixUni, T_Facturation.Quantité, T_Facturation.Unité, T_Facturation.PctMens, T_Facturation.TVA, T_Facturation.Vetuste, T_Facturation.QuotePart, Nz([Quantité]*[PrixUni]) AS [Prix HT], Nz([MontantHt]*(1+[TVA])) AS [Prix TTC], T_Facturation.Observations, T_Facturation.MontantHt
WHEN NbMois > Vetuste Then QuotePart
WHEN NbMois < Franchise Then 100
ELSE 100 - ((NbMois - Franchise) * PctMens)
FROM T_Facturation;
J'ai intégré la formule comme ceci.
Est ce la bonne Syntaxe?
SELECT T_Facturation.CoéfCharge = case, T_Facturation.Franchise, T_Facturation.NbMois, T_Facturation.IdChif, T_Facturation.N°Fam, T_Facturation.Code, T_Facturation.[Dégradations imputables], T_Facturation.PrixUni, T_Facturation.Quantité, T_Facturation.Unité, T_Facturation.PctMens, T_Facturation.TVA, T_Facturation.Vetuste, T_Facturation.QuotePart, Nz([Quantité]*[PrixUni]) AS [Prix HT], Nz([MontantHt]*(1+[TVA])) AS [Prix TTC], T_Facturation.Observations, T_Facturation.MontantHt
WHEN NbMois > Vetuste Then QuotePart
WHEN NbMois < Franchise Then 100
ELSE 100 - ((NbMois - Franchise) * PctMens)
FROM T_Facturation;
J'ai essayé mais cela ne fonctionne pas
Un message me dit:
erreur de syntaxe opérateur absent sur les trois lignes ci dessus
case
when ... then
else
end
Ca donne donc plutôt :
J'ai essayé mais toujours le meme message d'erreur.
Erreur de syntaxe et opérateur absent dans l'espression.
Manque t il des vergule, tréma ou autre signe de séparation ou de ponctuation?
Si Oui lesquelles et Ou?
merci de votre aide