![]() MyFile = "C:\Users\Edward\Desktop\Extracted Data\Text File\*.txt"įor i = LBound(TextFileArray) To UBound(TextFileArray) Set file = fso.GetFolder(directory).Files Set fso = CreateObject("Scripting.FileSystemObject") The code is as the following: Option Explicitĭim directory As String, FileName As String, file As Object, i As Integer, j As Integer, fso As Object, c As Integer, MyFile As String, Content As String, textline As String, TextFileArray As Variantĭim Path As String, TextFile As Integer, TotalFile As Integer, TFArray As Stringĭirectory = "C:\Users\Edward\Desktop\Extracted Data\Text File" And I'm doing all of this automatically while targeting the files location and the output location. Currently I'm using this code to import, delete and converting the text file to CSV file. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. Archives
June 2023
Categories |