Как переменную преобразовать в строку?

[Hugo121]

Может так - взять нужные данные в массив, создать новую книгу, выгрузить в неё массив, сохранить как текст?
Быстро, просто, без циклов.

Sub tt()
Dim x
x = [a1:c10]
With Workbooks.Add
.Sheets(1).[a1:c1].Resize(UBound(x)) = x
.Sheets(1).SaveAs Filename:="C:\output.txt", FileFormat:=xlTextWindows
.Close 0
End With
End Sub