Кирилица в латиницу (Excel)

Добрый день.

Часто бывает, что на предприятии ведется справочник товаров как кому угодно, а именно, вместо латинских символов при вводе используется кириллица.

В итоге столкнулся с задачей:
выгрузить справочник в Excel - сделать конвертацию - втянуть обратно в 1С.

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

Может у кого найдется время - поможете?

Примерный файл вложил. Спасибо. :yes:

А зачем через Excel :) Я немного туповат напишите проблему более подробно на мыло вышлю обработку.
Я так понял вам типа перенумерации кодов нужно только номер оставить прежним, а если в нем русский символ заменить на латынь ?

Через Excel - так как реально сделать экспорт/импорт в 1С данных.

Необходимо рядом в столбец записать "поправленные" артикулы напротив кириллицосодержащих :)

Цитата:

---

Сообщение от Евгений_

А зачем через Excel :) Я немного туповат напишите проблему более подробно на мыло вышлю обработку.
Я так понял вам типа перенумерации кодов нужно только номер оставить прежним, а если в нем русский символ заменить на латынь ?

---

Да-да-да :yes:

Знание VB у меня так посредственные но вроде работает только не распознает регистр заглавная, прописная

Спасибо, Евгений!

У Вас вроде не хватает буковки "Т", но я сейчас дорабатываю немного - скоро выложу результат...

По хорошему надо было переводить из символа в код и наоборот
точнее будет
Пример:
Dim MyNumber
MyNumber = Asc("A") ' Returns 65.
MyChar = Chr(97) ' Returns a.
MyChar = Chr(65) ' Returns A.
Но это уже дело техники :)

Евгений_, по хорошему да )

Евгений_, подскажи, где её вытянуть (таблицу кодов)?

Спс.

http://www.firststeps.ru/mfc/msdn/r.php?155

ANSI это стандарт отображения символов, разработанный American National Standards Institute. Стандарт ANSI использует только один байт, чтобы представить каждый знак, соответственно ограничен максимумом 256 знаками, в том числе и пунктуации. Коды от 32 до 126 совпадают со стандартом ASCII. Стандарт ASCII использовался в DOS, ANSI используется в Windows.

Мы всегда забываем что есть поисковые машины :)

Евгений_, Excell использует не ANSI, там Unicode вообще-то. Русская кодовая страница 1251. Просто в процессе обращения происходит преобразование и используются последние 8 бит. Это я к тому, чт не удивляйтесь, если при использовании других языков у вас могут получатся неадекватные результаты.

zoman, самый простой способ создать таблицу самому. В одной колонке код, в другой CHAR() от неё.

zoman, а почему это всё не сделать прямо в 1С?

Ну в общем-то, есть специальные программы... транслитераторы. В них забиваешь русский текст - получаешь латинские буквы. Поищите в интернете.

Цитата:

---

Сообщение от Аноним

Ну в общем-то, есть специальные программы... транслитераторы. В них забиваешь русский текст - получаешь латинские буквы. Поищите в интернете.

---

Пальцем в небо попали!!! Задача стоит что бы именить буквы не похожие по звучанию, а похожие по начертанию.

Всем спасибо, сделал сам :yes:

Выделите ячейку в столбце, который содержит Ваши артикулы и запустите макрос - в результате в соседнем столбце результат, а в следующем либо ничего либо 1 (1 говорит о том, что конвертация произошла).

Только заглавные!!! Кому нужны строчные - дорабатываем сами )

http://uchcom.botik.ru/educ/clerk/Li...ic/kod-win.gif

Привет, простите я далека от всех ITшных заморочек... но очень-очень надо.
Есть список сотрудников (фамилия имя отчество) в кириллице надо перевести в латиницу - вручную нереально 1500 человек... Хотелось бы как то эффективно все это сделать. Как запустить этот макрос? Пожалуйста объясните пошагово, буду очень благодарна.

Транслит:
Сайт planetaexcel - Приемы - Макросы - Транслит.
Там пользовательская функция.

Цитата:

---

Сообщение от vikttur

Транслит:
Сайт planetaexcel - Приемы - Макросы - Транслит.
Там пользовательская функция.

---

Спасибо огромнейшее!!!!!