Beregn sum og vis i textbox på form

=Dsum("[Pris Ialt]", "OrderLinie")

You may need to use
=Dsum("[Pris Ialt]"; "OrderLinie")

Ok jeg skylder vist lidt mere forklaring...

Jeg har en formular med en underformular bundet sammen af OrderID.

Det er så kun Sum af pris Ialt på orderlinier der har orderID = den aktuelle order.

Do you want me to write in english or is Danish ok ?

danish is just fine :o)

didnt you get an answer in your previous question?

=Dsum("[Pris Ialt]"; "OrderLinie", "OrderID = " & Me.ID)

or something like that

Nej det kan jeg ikke få til at virke... vil dit udtryk ikke også kun vise total af alle orderlinier's "pris ialt" ?
Jeg skal jo kun bruge dem fra underformularen(orderlinier) der har orderID= hovedformularens OrderID

ok hvor præcis vil du skrive dit udtryk ? det skal gerne opdateres hvis der tilføjes ekstra orderlinier til ordren...

I have had a look at your previous question. Do you have a field in ALL "OrdreLinie" containing the [Pris Ialt] for each?

If so, then you should be able to have a text field on the main form where the control source parameter =
= =Dsum("[Pris Ialt]"; "OrderLinie", "OrderID = " & Me.ID)
where OrderID is the foreign key in "OrderLinie" and Me.ID is the primary key in the table on the main form. (The fields linking the master and child forms)

=Dsum("[Pris Ialt]"; "OrderLinie", "OrderID = " & Me.ID)

When you add/alter a new record to the sub form you will also need to refresh the text field.

In the sub forms after update event, and maybe the On Delete event too, you will use something like

Me.Parent.YourTextFieldContainingTotalForOrder.Requery

Jeg tror vi er tæt på nu, jeg kan sagtens forstå hvad du prøver på...
Men jeg kan ikke indtaste din kode i "KontrolElement Kilde" feltet for textboxen

Do you get an error, or is the field read only?
If yoy get an error, what is it?

You must also make sure that the field names are correct

jeg tror det er DSum den ikke kan forstå....
Jeg har indsæt din kode i subform.activate, så burde feltet blive beregnet når jeg tilføjer, men jeg får en compile fejl:
Expected: line number or label or statement or end of statement

Jeg har kontrolleret alle navne nu og den ser ud som følger:

Private Sub Form_Activate()
=Dsum("[Pris Ialt]"; "OrdreLinier", "Ordre-id = " & Me.OrdreID)
End Sub

kom lige i tanke om at feltet "Pris Ialt" er et beregnet felt på subformen - har de nogen betydning ?

You need an UNBOUND text field on the main form. In the text fields "Control Source"

you write

=Dsum("[Pris Ialt]"; "OrdreLinier", "[Ordre-id] = " & Me.OrdreID)

NOTE [Ordre-id]

If it is a calculated field (beregnet felt) then you cant do it this way.

Can I see the code you are using for that?

Ok der kommer også en syntax fejl.
Er du sikker på man kan indtaste Dsum i "Control Source" ?

Jeg er lige begyndt med Access, så jeg ved det ikke....

ok koden til at beregne feltet ser således ud:

Private Sub Antal_BeforeUpdate(Cancel As Integer)
Me![Pris Ialt] = Me!Antal * Me!Pris
End Sub

OK, but you DO have a field in the table named [Pris Ialt]?

So Dsum should work.

Its getting late, so if you can send me your dB then perhaps I canm do it for you. Otherwise I'm afraid you will have to wait!
eksperten@NOSPAMsanthell.dk
remove NOSPAM

OK, I think I can see an error in the code!

=Dsum("[Pris Ialt]"; "OrdreLinier"; "[Ordre-id] = " & Me.OrdreID)

make sure you use ; as the delimiter and if that doesnt work change it to ,

If your regional settings are Danish then you will use ; and English ,

I'm gone for about 15 minutes

Jeg fik løst problemt med lidt hjælp fra kæresten...
Løsningen blev at tilføje et textfelt til subformen der beregnede total vha
=Sum([Pris Ialt]) herefter satte vi den nye textbox på hoved formen = værdi af nyt felt på subform. tilsidst satte vi "visable"=false på feltet på subformen.

Ikke en pæn løsning, men det virker !

Det skal siges at din syntax i dit sidste svar ikke gav compile fejl så DSum kan godt bruges, dog fik jeg bare en "#fejl" i feltet som skulle vise totalen

Jeg acceptere dit svar, da du har prøvet ihærdigt at hjælpe mig.

Tak for hjælpen

Thanks. I'm not sure why it doesnt work, but if your soultion works then great.