Крякозябры при сохранении в Excel

[ZOD]

Скачал откуда-то с интернета дллки для работы из VB c Excel-евскими файлами, без самого Excel. Штука суперская, можно делать все тоже, что и с помощью VBA, но намного удобней.
Но возникла проблема: вместо русских букв в ячейках появляются иероглифы, причем изменение кодировки на ANSI_Cirillyc в свойствах не помогает.
Когда установил в первый раз, с русскими буквами было все хорошо, но после переустановки винды, да и на всех остальных компах, появилась эта проблема.
Подскажите, пожалуйста, как это можно исправить. Библиотеки и исходники во вложении.

[ZOD]

Ребята, может будут какие-нибудь идеи, что-нибудь попробовать?
Очень нужно!
Заранее спасибо.

[gjghjc]

Может какого шрифта не хватает???

[ZOD]

Со шрифтами все в порядке. Там есть возможность выбора. Ни с одним шрифтом корректно сохранить не получилось.

[kinrew]

Попробуй вот это: http://maxoness.h16.ru/windows/registry/regs.html
А именно:

Порой бывает, что в основном русские буквы отображаются нормально, но в некоторых программах, в частности продуктах фирмы Adobe, вместо русских букв иероглифы. Это возникает из-за неправильного отображения кодировок. Данный reg-файл позволяет устранить проблему отображения русских букв:
Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\CodePage]
"1252"="c_1251.nls"
-= reg file =-

У меня на компьютере русские буквы в коде Visual Basic печатались как китайские . Данная операция помогла.

[GSerg]

Это забавно.
Все просто ставят шрифт Courier Cyr, а kinrew правит реестр, гробя нормальную работу некоторых других программ.

[Me!]

некоторых других программ.

приведи пример, пожалуйста! я тоже так иногда исправляю, хотелось бы знать каких сюрпризов ждать.

[iGrok]

Да не надо особо ждать сюрпризов, их не будет... Я не припомню, чтобы чем-то использовалась win-1252... Но чисто теоретически, они могут возникнуть.

[ZOD]

К сожалению способ, предложенный kinrew не сработал.
При выставлеии CharSet`a на csSynbolic в ячейках значение пишется на русском языке, но в строке формул так - ÇÀßÂÊÀ.
Может быть можно как-то кодами символы задавать? Или заменить эти длл-ки на что-нибудь другое? Какие еще есть способы сохранения в Excel без использования VBA?

[kinrew]

Там при открытии файла на запись или при самой записи можно выбирать кодировку записи?
Как-то мне нужно было в текстовый файл писать строки, так тоже "кракозябры" получались, а оказалось что нужно было выставить необязательный параметр True в операторе открытия (последний параметр):

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

Set txtTempFile = FSO.CreateTextFile(fldPRSFolder.Path & "\docs.w", , True)

Тогда он начинал писать в юникоде и текст нормально читался

[ZOD]

kinrew
Да, есть. В формате ячейки можно выбрать набор символов. Но она не работает.