Prova con

queryString = "Data = #" & dataInserita & "#"

( non usare l'apice ma il carattere # )