Fra positivt tal til negativt tal i en Access forespørgsel

Opret et nyt felt, f.eks.
  A: Iif(Left([Bilagsnr];1)="9"; -[Antal]; [Antal])

UPDATE Tabel1 SET Tabel1.antal = -[antal], Tabel1.værdi = -[værdi]
WHERE ((Left([bilagsnr],1)=9));

Hej. Hvis jeg indsætter din sætning, så kommer der en boks frem, hvori jeg skal taste "Antal"
Enter parameter value???

Min er afprøvet og fungerer. Hvis du lægger din e-mail kan jeg sende et eksempel.

det var ikke din, mugs - den har jeg ikke prøvet endnu. Du kom med et svar samtidig med jeg lagde kommentar til fdata :-). Jeg prøver

Denne fungerer:
A: IIf(Left([Bilagsnr];1)=9;-[Antal];[Antal])

Jeg gik ud fra at antal og værdi, var feltnavne.
Du skal erstatte Antal med dit eget feltnavn.

PS:
Forskellen på mugs' og min er, at min version kun viser de negative værdier i forespørgslen. mugs' gemmer de negative tal i tabellen.
Du må lige tage stilling til, hvad du vil, inden du trykke på speederen  ;o)

Kan ikke helt finde ud af det pointsystem, Jeg troede jeg gav jer begge 30 - men systemet har delt de 30 mellem jer.Sorry

Don't worry. Point er kun for sjov.
Håber, du fik løst problemet.

Du skulle ikke have spurgt:-)
Det er helt ok et langt stykke hen ad vejen.
Min forespørgsel bliver ok, men derefter laver jeg en pivot, hvor jeg skal lægge disse nye værdier sammen. I en kolonne kan der være både positive såvel som negative tal. I disse kolonner bliver resultatet eksempelvis. 9,59233E-14.  Hele kolonnen bør totalt være 0

Hm. Som jeg har luftet flere gange her på e, er Access en klovn til regne - og specielt afrunde. Værdien, du viser, er et 9-tal i 14. decimal, og det er jo "næsten" nul, og det er det bedste resultat, som Access kan komme frem til.

Du kan delvis løse problemet ved at vise resultatet afrundet; men selve resultatet bliver jo aldrig nul, så en
  If Resultat=0 Then ...
vil være False. Du er derfor nødt til at "udvide" nullet lidt:
  If Abs(Resultat)<0.00001 Then ...
Fejlen ligger ofte ude omkring 6. decimal.

Med andre ord: Kolonnen summerer ganske rigtigt til nul. Access er bare ikke så god til at udtrykke det ;o)


Evt. tvivlere kan muntre sig med kode i stil med:

Sub Regnefejl()
  Dim a As Single
  Dim b As Single
 
  a = 4.01
  b = 4
 
  Debug.Print a, b, a - b
End Sub

Tak skal du ha', fdata. Jeg tror, jeg beholder mit mærkelige tal, det fungerer jo ok, det er mere det visuelle idet.

Velbekomme ;o)