Riferimento a query SQL con campo calcolato in VBA

Buongiorno a tutti,

Per motivi che qui tralascio, ho necessità di richiamare il RecordSource di una maschera in VBA.
Il predicato SQL della query è il seguente

SELECT DISTINCT tabPrestazioni.Data, tabPrestazioni.CognomeCl, tabPrestazioni.DevePagare, tabPrestazioni.IDPrestazione, FormatCurrency(DSum("[SubTotale]","tabDettagliPrestazioni","[IDPrestazione]=" & [tabPrestazioni]![IDPrestazione])) AS Totale, tabPrestazioni.IDCarta, tabPrestazioni.Fattura, tabPrestazioni.IDCliente, tabPrestazioni.DomicilioPascal, tabPrestazioni.DomicilioTom
FROM tabPrestazioni INNER JOIN tabDettagliPrestazioni ON tabPrestazioni.IDPrestazione = tabDettagliPrestazioni.IDPrestazione
ORDER BY tabPrestazioni.Data DESC , tabPrestazioni.CognomeCl;

In VBA ho difficoltà a gestire la parte del campo calcolato "Totale" cioè questa:

FormatCurrency(DSum("[SubTotale]","tabDettagliPrestazioni","[IDPrestazione]=" & [tabPrestazioni]![IDPrestazione])) AS Totale

Se in VBA imposto il RecordSource della maschera in questo modo:

Me.subfrmPrestazioniElenco.Form.RecordSource= "SELECT DISTINCT tabPrestazioni.Data, tabPrestazioni.CognomeCl, tabPrestazioni.DevePagare, tabPrestazioni.IDPrestazione, FormatCurrency(DSum("[SubTotale]","tabDettagliPrestazioni","[IDPrestazione]=" & [tabPrestazioni]![IDPrestazione])) AS Totale, tabPrestazioni.IDCarta, tabPrestazioni.Fattura, tabPrestazioni.IDCliente, tabPrestazioni.DomicilioPascal, tabPrestazioni.DomicilioTom" & _
" FROM tabPrestazioni INNER JOIN tabDettagliPrestazioni ON tabPrestazioni.IDPrestazione = tabDettagliPrestazioni.IDPrestazione" & _
" ORDER BY tabPrestazioni.Data DESC , tabPrestazioni.CognomeCl;"

Ottengo errori a causa della presenza dei doppi apici nel campo calcolato che non so come gestire.

Potreste aiutarmi?

Grazie mille!