Lilla fel. Ändra rst till rs:
Dunkla dbs som databas
Dunkla rs som Recordset
Fastställda dbs = CurrentDb
Fastställda rs = dbs.OpenRecordset (”qryData”)
MsgBox ”slutsumman för” & rs! fldOne & ”för” & rs! fldThreen & ”är” & rs! fldTotal
rs. Nära
dbs. Nära
Fastställda rs = ingenting
Fastställda dbs = ingenting