Har en cell i Excel med datum (YYYY-MM-DD)

Vill föra över den till Access-databas med VB-kod (kolumnen i Access är optimerad för Date/Time).


Överföring av numbers och text går bra, men vad gäller datum så skrivs endast en nolla i Access.

Något tips?

Jag har Office XP

Hur överför du data? Visa gärna lite kod.

Dim t As Long

(kopplingar och allt funkar och här är lilla proceduren för att föra över datumet, som står i cell K3 på Exceldokumentet).

t = 3

Do Until Len(Range("K" & t).Formula)
t = t + 1
Loop

Set rs = New ADODB.Recordset
rs.Open "SELECT * FROM Stores WHERE Store_Name =" & SQLText(HusNamn),
cn, adOpenKeyset, adLockOptimistic

rs("Dim_Date") = Range("K" & t).Value

rs.Update

Har du testat:
<code>
rs("Dim_Date") = CDate(Range("K" & t).Value)
</code>

Andreas! Du är en klippa.

Funkar PERFEKT. Tack!!!