I have a simple issue. The following UDF I am using to export array of values to text file .. It is working well
Function ArrayToTextFile(a As Variant, strPath As String)
Dim fso As Object, fn As Object, i As Long
Set fso = CreateObject("Scripting.FileSystemObject")
Set fn = fso.OpenTextFile(strPath, 2, True)
For i = LBound(a) To UBound(a)
But I have noticed at the end of the text file ouput a new empty line. How can I get rid of it?