Il codice per fare quello che chiedi esiste, devi solo capire dove metterlo. Prova sotto form.load di [MascheraAgenziaGenerale]
rs = Me.SottomascheraAccodamentoFoglioCassaAgenziaGenerale.Form.RecordSource
Me.SommaImportoRate = DSum("ImportoRataQuietanza", rs)