Importazione dati da foglio excel a db acces

[Vincent.Zeno]

e se la stampo a video viene fuori così come servirebbe a me cioè gg-mm-aaaa
Se faccio l'insert invece mi esce 07/07/1894

cosa inserisci... gg-mm-aaaa? e il campo che riceve che formato ha? (data, testo... se data: che formato?) lo sai che le date prima del 1900 non sono trattate come le successive (e che quindi è meglio trattarle come testo o numeriche)?

[Partisan75]

cosa inserisci... gg-mm-aaaa? e il campo che riceve che formato ha? (data, testo... se data: che formato?) lo sai che le date prima del 1900 non sono trattate come le successive (e che quindi è meglio trattarle come testo o numeriche)?

Dunque nel file excel il formato è Data gg-mm-aaaa ma ho provato a cambiare anche con altre impostazioni.

Nel DB access di destinazione il formato è Data/ora.

La cosa che non capisco è che se importo la data dall'excel e la stampo a video con la funzione di cui sotto me la formatta bene cioè gg-mm-aaaa (16-01-2017) ma se faccio l'insert nel db al posto della data vera trovo 07/07/1894...

Function DataToStr2(Data)
Anno = CStr(Year(Data))
Mese = CStr(Month(Data))
If Len(Mese) = 1 Then
Mese = "0" & Mese
End If
Giorno = CStr(Day(Data))
If Len(Giorno) = 1 Then
Giorno = "0" & Giorno
End If
DataToStr2 = Giorno & "-" & Mese & "-" & Anno
End Function