1- how to loop the array A just created from code (line by line)
2- the code work with a file arround 25mg but if have a file arround 2 gb?
Code: Select all
Sub TRE()
Dim A() As Long
Dim Test As String ' IS MY LINE
Open "C:\TEMP\TEST.TXT" For Binary As #1
ReDim A(0 To LOF(1) - 1)
Get #1, , A
Close #1
End Sub