create this query and run:
update tabelka set [claim number]=replace(replace([claim number], chr(10),""), chr(13), "")
now run your Total query.
or in VBA, immediate window:
currentdb.Execute "update tabelka set [claim number]=replace(replace([claim number], chr(10),''), chr(13), '')