Companheiro coloque apostrofes (
') entre as datas e utilize o formato AAAA/MM/DD conforme abaixo :
SQL1 = "SELECT Produto, SUM(Quantidade_de_entrada) as Total FROM entradamercadoria Where Data_da_Entrada between '" & Data1 & "' and '" & Data2 & "' GROUP BY Produto order by Total"