As part of a macro, I have code that prompts user for a text file and then opens. The issue I am is having is the macro automatically converts some of the numbers into scientific notation. For example the number in my text file is 86765E202. When the file opens via use of the macro, the number is coverted to 8.6765E+206. Is there a way I can modify the code or use some other method that will display the number as 86765E202? If I need to, I could open all columns as text but wasn't sure how to incorporate into the code.

    Prompt = "Select the text file to process."
    Path = Application.GetOpenFilename("Text Files (*.txt), *.txt", , Prompt)
    
    Workbooks.OpenText Filename:=Path, Origin:=2, StartRow:=1, DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=False, _
        Comma:=False, Space:=False, Other:=True, OtherChar:="|"
    Set WkbData = ActiveWorkbook