Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Timov от 05 июня 2015, 12:24

Название: Открытие текстовых файлов с разделителями
Отправлено: Timov от 05 июня 2015, 12:24
Есть текстовый файл с разделителями. Кодировка - 866, в качестве разделителя используется символ CHR(179) - одиночная вертикальная черта из набора символов псевдографики.
Включаем запись макросов, открываем файл в Эксцеле. Видим полный ОК: строки поделены на колонки.
Запускаем сгенерированный макрос. Строки на колонки не поделены.
Если этот фокус проделать с другим символами, например '|', макрос отрабатывает нормально
Чем Эксцелю не нравится псевдографика?

[вложение удалено администратором]
Название: Re: Открытие текстовых файлов с разделителями
Отправлено: Администратор от 11 июня 2015, 20:45
Timov, в методе "OpenText", используйте такой параметр:
OtherChar:=ChrW(9474)

Логику я описать не могу - случайно пришёл к такому результату.
ChrW - это юникод-кодировка, 9474 - это код вертикальной черты в юникод-таблице. Код я узнал, когда в Excel вставилась вертикальная черта, и у неё узнал её юникод-код.
Название: Re: Открытие текстовых файлов с разделителями
Отправлено: Timov от 11 июня 2015, 21:00
Офигеть. Я бы до такого не додумался.
Спасибо.