Comment faire pour importer le numéro de long à partir de csv pour excel sans avoir à les convertir à la notation scientifique en VBA

J'ai ouvert le point-virgule délimitée fichier txt avec ce code ci-dessous
et à long numéro de compte est apparu que la notation scientifique après l'enregistrement pour excel, indépendamment de la mise en forme de texte de la colonne.

Qu'ai-je fait de mal?

    Application.ScreenUpdating = False
    Workbooks.OpenText fileName:=Filetxt, Origin:=xlWindows, StartRow _
    :=2, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
    ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=True, Comma:=False, _
    Space:=False, Other:=False, Local:=True, _
    FieldInfo:=Array(Array(1, 4), Array(2, xlTextFormat)
    'Save text file as csv file
    Set wb = ActiveWorkbook
    Application.DisplayAlerts = False
    wb.SaveAs fileName:=fileXls, FileFormat:=6, _
    ReadOnlyRecommended:=False, _
    CreateBackup:=False
    Application.DisplayAlerts = True
    wb.Close savechanges:=True

Enregistrer dans un fichier txt ressemble à ceci:
2011-12-21;100,00;"21375000120000010020601764"

Et quand je ouvrir le fichier nouvellement enregistré, je vois 2.117500012 E+25 au lieu de ce chiffre.
quel est le problème ici?

OriginalL'auteur Zulu Z | 2012-12-05