Discussion :

[Superpat9999]

Bonjour, je veux rajouter un champ qui reproduit celui de la colonne "Amount" pour les valeurs négatives et bien sûr, je le ferai pour les valeurs positives.

J'ai essayé une formule, mais le résultat est -1 et je souhaite que ce soit le nombre négatif (-22.87 pour le premier).
Question subsidiaire, peut-on convertir ce résultat en positif ? Si oui, le résultat se présentera comment dans ma colonne Amount ultérieurement lorsque dans mon formulaire je remplirai ou modifiera ce champ, Positif ou négatif ?
Merci de votre aide

[marot_r]

Bonjour.

Pour AFFICHER le champ il suffit de faire un truc du genre iif([TaSource].[TonChamp]<0;[TaSource].[TonChamp];""). iif va être traduit par Access mais je ne me souviens plus en quoi.
Si ti veux simplement faire sauter le signe tu peux utiliser abs([TaSource].[TonChamp]) qui va prendre la valeur absolue. Ici aussi Access va traduire abs en français, et là aussi je ne me souviens plus en quoi.
Les champs calculés ne peuvent servir à la saisie.

Et le -1 est normal avec ton code, c'est la valeur numérique pour Vrai qu'utilise Access (Faux c'est 0) et tu as écrit ce qu'on appelle une expression booléenne donc un "calcul" qui te donne Vrai ou Faux.

Si cela ne répond pas pleinement à tes questions n'hésite pas à demander des précisions.

A+

[Superpat9999]

Merci marot_r, tout fonctionne parfaitement, le code a été mofifié automatiquement par Access.

[Superpat9999]

marot_r, j'ai encore un problème, il me semble que le formule me change le genre de mon champ numérique, les décimales sont parties.

De même lorsque je fais un tri, le résultat n'est pas concluant. Je dois sans doute rajouter un autre paramètre pour reconvertir en décimale (Format ?)

[marot_r]

Bonjour.

il me semble que le formule me change le genre de mon champ numérique, les décimales sont parties.

Oui, tu as raison c'est parce que cela mélange texte ("") et nombre.

La formule ci-dessous devrait résoudre ce problème.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

iif([TaSource].[TonChamp]<0;[TaSource].[TonChamp];Null)+0

Le +0 force Access à considérer le Null comme un null de type numérique.

A+

[Superpat9999]

Merci beaucoup pour ta réponse.
Cela s'améliore (on est passé du coté droit de la force), maintenant pour les décimales, faut-que je rajoute une close de format.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Débit: VraiFaux([t_Complete].[Amount]<0;[t_Complete].[Amount];Null+0)

Car j'ai perdu mes 2 décimales et mon tri se fait mal, on dirait sur le 1er et 2eme chiffre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Private Sub Bas_Debit_Click()
    strNomProcedure = "Bas_Debit_Click"
 
    On Error GoTo errSub
    Me.OrderByOn = True
    If gBolDebit = False Then
         Me.OrderBy = "Débit asc"
         gBolDebit = True
    Else
         Me.OrderBy = "Débit desc"
         gBolDebit = False
    End If
Exitsub:
         On Error GoTo 0
         Exit Sub
errSub:
         Select Case fGestError(strNomProcedure, Err, Erl, Err.Description)
Case vbAbort
                   Exit Sub
Case vbRetry
                   Resume
Case vbIgnore
                   Resume Next
         End Select
 
End Sub

[Superpat9999]

Je continue avec des essais :


Mais je n'arrive pas à combiner pour obtenir un absolu, 2 décimales et toujours le tri > 0

[Superpat9999]

Et bien c'est entièrement de ma faute j'avais oublié d'enregistrer la requête, donc tout se passe bien, je vais essayer de positionner l'absolu
C'est fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Débit: Abs(VraiFaux([t_Complete].[Amount]<0;[t_Complete].[Amount];Null+0))

Et encore merci, de ne pas se savoir seul, ça encourage

PS) Peux-tu regarder ma requête Cumul qui est sur un autre message ?