Originariamente inviato da mdnet
Posto quello che ho fatto e che non mi restituisce il risultato voluto

Dim dbsDati As Database
Dim Sql As String

Set dbsDati = OpenDatabase("C:\Database\dati.mdb")

Sql = "delete from anagrafica where Comune=ROMA"

grazie
manco copia & incolla

Sql = "delete from anagrafica where Comune='ROMA' "

le stringhe va tra l'apici