Использование binary в Open

[Zeke]

Я пишу в коде макроса

Код: Выделить всё

Open "C:\file.txt" For Binary As #1
do while true
Put #1, ,  """" + ActiveSheet.Cells(1, 4).Value + """" +.....
.........
Close #1

и вот, когда это записывается в текстовый файл, то каждая строка в файле начинается с каких-то символов непонятных, а уже потом идет нужный мне текст.
Как-нибудь можно избавиться от этих символов в начале каждой строки?

[tyomitch]

Думаю, что

Код: Выделить всё

Put #1, ,  CStr("""" + ActiveSheet.Cells(1, 4).Value + """" +.....)


[alibek]

Ну в принципе, лучше Cells(...).Text.

[tyomitch]

А разницы, между тем, никакой:

Property Text As Variant

[Zeke]

Думаю, что

Код: Выделить всё

Put #1, ,  CStr("""" + ActiveSheet.Cells(1, 4).Value + """" +.....)


Спасибо большое, это помогло