Ciao a tutti,
ho trovato il modo come importare un file csv in un foglio excel, ma in un PC in particolare (quello del capo) mi inserisce alcuni valori senza senso
ad esempio un 45,1265863 nel file csv lo scrive come 9,5E-09 che equivale ad un 0,0000000095.

ho provato a vedere le impostazioni interazionali dei PC, vesione di win, di office.. tutto coincide.

il file csv (qualche riga)
codice:
288;3,42541;3,4254;3,37;288;0;31,9255;0;
297;3,43339;3,43339;3,37;297;0;32,9232;0;
306;3,44137;3,44137;3,37;306;0;33,9209;0;
315;3,44935;3,44935;3,37;315;0;34,9185;0;
324;3,45367;3,45366;3,37;324;0;35,9162;0;
333;3,45766;3,45766;3,37;333;0;36,9139;0;
342;3,46165;3,46165;3,37;342;0;37,9115;0;
351;3,46564;3,46564;3,37;351;0;38,9092;0;
360;3,46963;3,46963;3,37;360;0;39,9069;0;
369;3,47362;3,47362;3,37;369;0;40,9046;0;
il codice
codice:
Application.DecimalSeparator = ","
With ws.QueryTables.Add(Connection:="TEXT;" & questofile, Destination:=ws.Range(fogliodestinazione))        .TextFileSemicolonDelimiter = True
        .TextFileCommaDelimiter = False
        .TextFileSpaceDelimiter = False
        .TextFileDecimalSeparator = ","
        .TextFileThousandsSeparator = "."
        .TextFileParseType = xlDelimited
        .TextFileOtherDelimiter = ";"       
     .Refresh BackgroundQuery:=False   
End With
la cosa che mi fa impazzire è che nel PC dove funziona non riesco a replicare l'errore