DSUM Ergebnis zusammenfassen bzw. damit rechnen?

Computer: Software & Programmierung Microsoft Access
#1

Hallo,

habe folgendes Problem:

ich fasse mit DSUM Datenzeilen zusammen und muss dann z.B. von „Summe3“ die „Summe2“ abziehen…
Leider liegt das Ergebnis von DSUM ja immer als Typ „Variant“ vor und
ich kann damit nicht rechnen :frowning:
Wie kann ich die Ergebnisse umwandeln, damit ich sie zur Berechnung nutzen kann???

Summe1 = DSum(Bezeichnung2 & „* ZHonorar1 / 1000“, „Abfrage gefiltert“, „T1Wurf =“ & Feld)

Summe2 = DSum(Bezeichnung2 & „* ZHonorar2 / 1000“, „Abfrage gefiltert“, "T1Wurf " & Feld)

Summe3 = DSum(Bezeichnung2 & „* ZHonorar2 / 1000“, „Abfrage gefiltert“)

Danke im Voraus
Thomas

#2

Hallo,

Leider liegt das Ergebnis von DSUM ja immer als Typ „Variant“
vor und ich kann damit nicht rechnen :frowning:

?? nö, wenn man Zahlen summiert, kommt i.d.R. auch eine Zahl heraus.

Wie kann ich die Ergebnisse umwandeln, damit ich sie zur
Berechnung nutzen kann???

z.B. so: Ergebnis = VAL(meinText)
ggf. noch
Ergebnis = VAL(Ltrim(Rtrim(meinText)))

Grüße aus Rostock
Wolfgang
(Netwolf)

#3

Hallo,

ich fasse mit DSUM Datenzeilen zusammen und muss dann z.B. von
„Summe3“ die „Summe2“ abziehen…
Leider liegt das Ergebnis von DSUM ja immer als Typ „Variant“
vor und
ich kann damit nicht rechnen :frowning:

und warum nicht??

Wie kann ich die Ergebnisse umwandeln, damit ich sie zur
Berechnung nutzen kann???

es braucht im Grunde keine Umwandlung Access (VBA) macht das von allein.

Vermutlich stolperst Du aber über „NULL-Werte“ (die gar keine Werte sind)

Vernünftig deklariert und mit der nz()-Funktion zur Umwandlung von NULL-Werten sieht das so aus:

Dim Summe1 as Double, Summe2 as Double, Summe3 as Double, GesamtSumme as Double
Dim Bezeichnung2 as String, Feld as Long

Feld= 1
Bezeichnung2 = „[IrgendeinFeldname]“

Summe1 = nz(nz(DSum(Bezeichnung2 & " * ZHonorar1 / 1000", „Abfrage gefiltert“, "T1Wurf = " & Feld),0.0)

Summe2 = nz(DSum(Bezeichnung2 & " * ZHonorar2 / 1000", „Abfrage
gefiltert“, "T1Wurf " & Feld),0.0)

Summe3 = nz(DSum(Bezeichnung2 & " * ZHonorar2 / 1000", „Abfrage
gefiltert“),0.0)

Gesamtsumme= Summe1 + Summe2 + Summe3

Viele Grüße vom Bodensee
Franz , DF6GL

PS: Feedback erwünscht!

#4

Danke für die schnelle Antwort von euch Beiden!
Es war in der Tat das NULL-Problem einer der DSUM Werte, durch das nz
klappt nun die Addition!

Super, auf euch ist Verlaß! :smile:
Grüße, Thomas