Convert ASCII file to an excel spreadsheet

[Abdoula]

Hello everyone.
I need your help , i wanna know if there another method or software that i can use to convert ASC file to Excel? because i have a lot of ASC file and i can't use excel to convert one by one. Thank you for reading me.

 

[tonyyy]

Hello,
I'm not familiar with ASC files, but I think they're similar to text files. If you can open a .ASC with excel and save it as a .xlsx then the code below may work for you.

Copy the code into a new workbook and save the workbook into the same folder as your project files. I strongly suggest you test this on a sample folder with a few sample files. When you run the code, excel will open each .ASC file, save it as a new workbook with the .xlsx extension, then close the file.

Sub LoopThroughFiles()
'''''   Place this macro workbook in the same folder as your project files
Dim wb As Workbook
Dim direktory As String, fName As String, fName2 As String

direktory = ThisWorkbook.Path & "\"
fName = Dir(direktory & "*.ASC")

Do While fName <> ""
    Set wb = Workbooks.Open(direktory & fName)
    fName2 = Left(fName, Len(fName) - 4) & ".xlsx"
    ActiveWorkbook.SaveAs fileName:=direktory & fName2, _
        FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
    wb.Close savechanges:=False
    fName = Dir
Loop
End Sub

Cheers,
Tony