Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
Zeke
-
- Начинающий
-
-
- Сообщения: 22
- Зарегистрирован: 08.02.2005 (Вт) 18:16
Zeke » 10.02.2005 (Чт) 11:36
Я пишу в коде макроса
- Код: Выделить всё
Open "C:\file.txt" For Binary As #1
do while true
Put #1, , """" + ActiveSheet.Cells(1, 4).Value + """" +.....
.........
Close #1
и вот, когда это записывается в текстовый файл, то каждая строка в файле начинается с каких-то символов непонятных, а уже потом идет нужный мне текст.
Как-нибудь можно избавиться от этих символов в начале каждой строки?
-
tyomitch
-
- Пользователь #1352
-
-
- Сообщения: 12822
- Зарегистрирован: 20.10.2002 (Вс) 17:02
- Откуда: חיפה
tyomitch » 10.02.2005 (Чт) 11:38
Думаю, что
- Код: Выделить всё
Put #1, , CStr("""" + ActiveSheet.Cells(1, 4).Value + """" +.....)
-
alibek
-
- Большой Человек
-
-
- Сообщения: 14205
- Зарегистрирован: 19.04.2002 (Пт) 11:40
- Откуда: Russia
alibek » 10.02.2005 (Чт) 11:41
Ну в принципе, лучше Cells(...).Text.
Lasciate ogni speranza, voi ch'entrate.
-
tyomitch
-
- Пользователь #1352
-
-
- Сообщения: 12822
- Зарегистрирован: 20.10.2002 (Вс) 17:02
- Откуда: חיפה
tyomitch » 10.02.2005 (Чт) 12:12
А разницы, между тем, никакой:
Object Browser писал(а):Property Text As Variant
-
Zeke
-
- Начинающий
-
-
- Сообщения: 22
- Зарегистрирован: 08.02.2005 (Вт) 18:16
Zeke » 10.02.2005 (Чт) 12:43
tyomitch писал(а):Думаю, что
- Код: Выделить всё
Put #1, , CStr("""" + ActiveSheet.Cells(1, 4).Value + """" +.....)
Спасибо большое, это помогло
Вернуться в Visual Basic 1–6
Кто сейчас на конференции
Сейчас этот форум просматривают: Google-бот, Yandex-бот и гости: 9
