Kleine Störungen. Rst zu den rs ändern:
Dbs als Datenbank verdunkeln
Rs als Recordset verdunkeln
Dbs = CurrentDb einstellen
Rs = dbs.OpenRecordset („qryData“) einstellen
MsgBox „die Gesamtmenge für“ u. rs! fldOne u. „für“ u. rs! fldThree u. „ist“ u. rs! fldTotal
rs. Abschluss
dbs. Abschluss
Rs einstellen = nichts
Dbs einstellen = nichts