записать в текстовый файл

[peq]

добрый вечер!

есть лист excel:
a1=10.09.2014
a2=12.09.2014
b1=200
b2=101

требуется range("A1:B2") сохранить в файл .txt
на форуме нашел вариант:
txt = "": For Each cell In ra.Cells: txt = txt & cell.Text & vbNewLine: Next cell
но как можно сохранять в одну строку не одно значение, а два значения? чтобы на выходе текстовый файл имел не такой вид:
10.09.2014
200
12.09.2014
101,
а такой:
10.09.2014 200
12.09.2014 101
что-то сижу.. не могу сообразить.
сохранять важно то, как число выглядит, а не то, чем оно является по сути

[IgorGO]

txt = [a1] & " " & [b1] & chr(10) & [a2] & " " [b2]

[doober]

Можно так.
Если нужен пробел,то замените vbTab на " "

txt = "": t = 0
For Each cell In Range("A1:B2").Cells
If t Mod 2 = 0 Then
txt = txt & cell.Text & vbTab
Else
txt = txt & cell.Text & vbNewLine
End If
t = t + 1
Next cell

[peq]

sorry за поздний ответ - навалилось что-то всего, творчеством заниматься совсем было сложно..
за ответы большое спасибо.

по операции ="": все же не понятно, после нее можно писать совсем любой код vba? и до какого предела он будет относиться к оператору, а до какого внешней процедуре/функции/циклу? или можно только один For Each .. Next - а внутри него уже свобода?