Salve,
avrei un piccolo problema.

Estraggo da una tabella Access i dati di due campi e li esporto in due colonne Excel in questo modo:

i = 1
RS.MoveFirst
Do Until RS.EOF
foglioExcel.Cells(i, 1) = RS("Codice").Value
foglioExcel.Cells(i, 2) = RS("Descrizione").Value
RS.MoveNext
i = i + 1
Loop

tutto funziona perfettamente, i dati vengono esportati senza problemi, ma se nel campo Codice è inserito un valore come 01-1965, nella cella di Excel me lo ritrovo come gen-65, in pratica, interpreta alcuni valori come se fossero date.

Ho provato anche a formattare le celle di Excel in vario modo, con il risultato che cambiava di volta in volta solo il formato della data.

Credo debba essere formattato il valore RS("Codice").Value, ma non sono riuscito a trovare il modo.

Il campo Codice nella tabella Access è di tipo testo.
Excel versione 11.

Mi aiutate?

Grazie.