Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: clever77
Здравствуйте, помогите разобраться как можно быстро сохранить большой объем данных в текстовый файл:

Почему спрашиваю:
Если исп цикл для диапазона А50:А1048576 - это займет порядка 8с, а если исп
X = Range("A50:A1048576") - то менее 1с.
Плюс сохранение в файл

FNAME = "C:\TEXT_TXT\VB_txt.txt"
FNUM = FreeFile
Open FNAME For Binary Access Write As FNUM
Put FNUM, , X
Close FNUM

И все файл готов
Единственная проблема в том , что если открыть в текстовом редакторе увидим абра-кадабру, а хотелось бы видеть значения из диапазона А50:А1048576

Можно ли по аналогии, сделать запись файла где будут отражены именно значения данных( разделенных запятой к примеру), а не бинарный код...

Меняю (Binary Access Write) на Output, а (Put) на Write

И…… НЕ работает……
Не могу понять как переменную X преобразовать в строку.....

Спасибо.


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.