Försöker importera data från en txt fil och lyckas till viss del. Kör följande kod:

'öppnar filen
f = FreeFile
Open strFil_1 For Input As #f

'läsa in textfilsdatan till en kolumn
i = 1
While Not EOF(f)
Line Input #f, strFil_1
Cells(i, 1) = strFil_1
i = i + 1
Wend

Close f

Vissa rader i txt-filen innehåller bara en sträng med siffror. Dessa lyckas jag inte få in i excel på det sätt jag vill. Om txt-filen har en rad med:

6900231659556854266

Dyker detta upp i cell som 69E+18, och klickar jag på cellen visar formelfältet följande

6900231659556850000

Dvs strängen har ändrats! Någon som har något tips om hur jag löser detta??

För info så behandlas allt jag läser in från txt-filen som text, och inte som tal. Jag ska senare läsa ut vad vissa positioner på raden har för tecken te.x.

Tack för hjälpen!