Ciao Gianni,
come di consueto ti ringrazio per il tuo tempo.
Il metodo che mi hai suggerito funziona alla perfezione!
Nel frattempo ho identificato un'altra possibile soluzione ma non so quanto sia ortodossa.
Nell'evento Current della Maschera principale ho impostato:
Private Sub Form_Current()
Dim Tempo As Long
Tempo = DSum("[Durata]", "qryReportSeduta", "[DataSeduta] = GetSeduta()")
Me.txtTempo = Tempo
End Sub
Dove qryReportSeduta è la sorgente dei dati della sottomachera e GetSeduta() è una funzione che già utilizzavo per prendere la data selezionata dall'utente e riportarla nel titolo del Report relativo.
Che ne pensi ?