Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/переводчик - Мир MS Excel

Старая форма входа
  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » переводчик
переводчик
row Дата: Понедельник, 26.12.2011, 21:36 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 136
Репутация: 0 ±
Замечаний: 0% ±

Уважаемые форумчане. Столкнулся проблемой по переводу текста в Excelе. Если в одном листе "Словарь" написать все слова по-русски,а рядом его перевод.А в другом листе я хотел бы писать по-русски предложение.Возможен ли соседнем ячейке каждое слово переводилось и составлялось предложение. Спасибо
 
Ответить
СообщениеУважаемые форумчане. Столкнулся проблемой по переводу текста в Excelе. Если в одном листе "Словарь" написать все слова по-русски,а рядом его перевод.А в другом листе я хотел бы писать по-русски предложение.Возможен ли соседнем ячейке каждое слово переводилось и составлялось предложение. Спасибо
Автор - row
Дата добавления - 26.12.2011 в 21:36
light26 Дата: Понедельник, 26.12.2011, 22:05 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Возможно. Только это будет что-то вроде.

i'll be back - я буду задом.

Лучше воспользуйтесь программой, специально написанной для перевода текстов с одного языка на другой. Кстати, даже их перевод далек от совершенства.

Я не волшебник. Я только учусь
 
Ответить
СообщениеВозможно. Только это будет что-то вроде.

i'll be back - я буду задом.

Лучше воспользуйтесь программой, специально написанной для перевода текстов с одного языка на другой. Кстати, даже их перевод далек от совершенства.
Автор - light26
Дата добавления - 26.12.2011 в 22:05
row Дата: Вторник, 27.12.2011, 05:03 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 136
Репутация: 0 ±
Замечаний: 0% ±

Словарь буду составлять я сам (технический). Такого словаря нет в интернете (я искал). Мне просто надо чтоб при написании одного слова вставлялся перевод.
 
Ответить
СообщениеСловарь буду составлять я сам (технический). Такого словаря нет в интернете (я искал). Мне просто надо чтоб при написании одного слова вставлялся перевод.
Автор - row
Дата добавления - 27.12.2011 в 05:03
KuklP Дата: Вторник, 27.12.2011, 05:52 | Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
Ровшан, именно так как Вы написали от Вчера, 21:36, Сообщение № 1. Простым ВПР-ом.

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728

Сообщение отредактировал KuklP - Вторник, 27.12.2011, 05:53
 
Ответить
СообщениеРовшан, именно так как Вы написали от Вчера, 21:36, Сообщение № 1. Простым ВПР-ом.
Автор - KuklP
Дата добавления - 27.12.2011 в 05:52
row Дата: Вторник, 27.12.2011, 06:28 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 136
Репутация: 0 ±
Замечаний: 0% ±

KuklP. Отдельные слова можно сделать ВПР, если целое предложение
 
Ответить
СообщениеKuklP. Отдельные слова можно сделать ВПР, если целое предложение
Автор - row
Дата добавления - 27.12.2011 в 06:28
row Дата: Вторник, 27.12.2011, 06:35 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 136
Репутация: 0 ±
Замечаний: 0% ±

Прошу посмотреть файл
К сообщению приложен файл: 5679529.xls (19.0 Kb)
 
Ответить
СообщениеПрошу посмотреть файл
Автор - row
Дата добавления - 27.12.2011 в 06:35
Serge_007 Дата: Вторник, 27.12.2011, 10:39 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Предлагаю так (см. вложение).
К сообщению приложен файл: row_lingvo.xls (8.5 Kb)

ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеПредлагаю так (см. вложение).
Автор - Serge_007
Дата добавления - 27.12.2011 в 10:39
KuklP Дата: Вторник, 27.12.2011, 11:17 | Сообщение № 8
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
Вариант.
П.С. Серег, а че я вставлял твой файл с тем же именем, а выдало цифру?
К сообщению приложен файл: 0977866.xls (9.0 Kb)

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728

Сообщение отредактировал KuklP - Вторник, 27.12.2011, 11:19
 
Ответить
СообщениеВариант.
П.С. Серег, а че я вставлял твой файл с тем же именем, а выдало цифру?
Автор - KuklP
Дата добавления - 27.12.2011 в 11:17
Jhonson Дата: Вторник, 27.12.2011, 12:23 | Сообщение № 9
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
Репутация: 169 ±
Замечаний: 0% ±

Можно еще такой вариант, только придется добавлять пробел между "500" и "мл"
К сообщению приложен файл: translation.xls (37.0 Kb)

"Ничто не приносит людям столько неприятностей, как разум."
 
Ответить
СообщениеМожно еще такой вариант, только придется добавлять пробел между "500" и "мл"
Автор - Jhonson
Дата добавления - 27.12.2011 в 12:23
Serge_007 Дата: Вторник, 27.12.2011, 12:25 | Сообщение № 10
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (KuklP)
я вставлял твой файл с тем же именем, а выдало цифру?

Одинаковые названия недопустимы

ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (KuklP)
я вставлял твой файл с тем же именем, а выдало цифру?

Одинаковые названия недопустимы
Автор - Serge_007
Дата добавления - 27.12.2011 в 12:25
KuklP Дата: Вторник, 27.12.2011, 12:26 | Сообщение № 11
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация: 486 ±
Замечаний: 0% ±

2003-2010
Ок.

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеОк.
Автор - KuklP
Дата добавления - 27.12.2011 в 12:26
MCH Дата: Вторник, 27.12.2011, 12:35 | Сообщение № 12
Группа: Админы
Ранг: Старожил
Сообщений: 2004
Репутация: 752 ±
Замечаний: ±

Вариант с UDF
P.S. для расширения словаря, просто добавляйте нужные слова на лист "Словарь",
P.P.S. работает только с кириллицей

Добавил комментарии в текст UDF
К сообщению приложен файл: row.xls (36.5 Kb)


Сообщение отредактировал MCH - Вторник, 27.12.2011, 13:57
 
Ответить
СообщениеВариант с UDF
P.S. для расширения словаря, просто добавляйте нужные слова на лист "Словарь",
P.P.S. работает только с кириллицей

Добавил комментарии в текст UDF
Автор - MCH
Дата добавления - 27.12.2011 в 12:35
light26 Дата: Вторник, 27.12.2011, 12:48 | Сообщение № 13
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Вот я и говорю:
i'll be back - я буду задом.

Я не волшебник. Я только учусь
 
Ответить
СообщениеВот я и говорю:
i'll be back - я буду задом.
Автор - light26
Дата добавления - 27.12.2011 в 12:48
light26 Дата: Вторник, 27.12.2011, 12:50 | Сообщение № 14
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Quote (Serge_007)
Предлагаю так (см. вложение).

Привет, Серж.
Я думал сделать через ЕСЛИ и ВПР и ПОИСКПОЗ.
Глянь, пожалуйста.
Не могу свести их во едино. Или этого и не получится?
К сообщению приложен файл: _5679529.xls (25.5 Kb)

Я не волшебник. Я только учусь

Сообщение отредактировал light26 - Вторник, 27.12.2011, 12:57
 
Ответить
Сообщение
Quote (Serge_007)
Предлагаю так (см. вложение).

Привет, Серж.
Я думал сделать через ЕСЛИ и ВПР и ПОИСКПОЗ.
Глянь, пожалуйста.
Не могу свести их во едино. Или этого и не получится?
Автор - light26
Дата добавления - 27.12.2011 в 12:50
Serge_007 Дата: Вторник, 27.12.2011, 13:00 | Сообщение № 15
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (light26)
Я думал сделать через ЕСЛИ и ВПР и ПОИСКПОЗ.

Зачем?!

ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (light26)
Я думал сделать через ЕСЛИ и ВПР и ПОИСКПОЗ.

Зачем?!
Автор - Serge_007
Дата добавления - 27.12.2011 в 13:00
light26 Дата: Вторник, 27.12.2011, 13:05 | Сообщение № 16
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Quote (Serge_007)
Зачем?!

Мне показалось, что можно... Да вот в тупик встал.
только половину дела сделал. Да и то не уверен, что правильно sad

Я не волшебник. Я только учусь
 
Ответить
Сообщение
Quote (Serge_007)
Зачем?!

Мне показалось, что можно... Да вот в тупик встал.
только половину дела сделал. Да и то не уверен, что правильно sad
Автор - light26
Дата добавления - 27.12.2011 в 13:05
Serge_007 Дата: Вторник, 27.12.2011, 13:07 | Сообщение № 17
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (light26)
Мне показалось, что можно...

Можно. НО ЗАЧЕМ?!

ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (light26)
Мне показалось, что можно...

Можно. НО ЗАЧЕМ?!
Автор - Serge_007
Дата добавления - 27.12.2011 в 13:07
light26 Дата: Вторник, 27.12.2011, 13:22 | Сообщение № 18
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Quote (Serge_007)
Можно. НО ЗАЧЕМ?!

Ну, все искали варианты, предлагали их.
Вот и мне захотелось быть полезным :). Но не сумел sad

Я не волшебник. Я только учусь
 
Ответить
Сообщение
Quote (Serge_007)
Можно. НО ЗАЧЕМ?!

Ну, все искали варианты, предлагали их.
Вот и мне захотелось быть полезным :). Но не сумел sad
Автор - light26
Дата добавления - 27.12.2011 в 13:22
row Дата: Вторник, 27.12.2011, 13:52 | Сообщение № 19
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 136
Репутация: 0 ±
Замечаний: 0% ±

Уважаемые форумчане. Огромное Вам спасибо. Нашел что искал. Спасибо
 
Ответить
СообщениеУважаемые форумчане. Огромное Вам спасибо. Нашел что искал. Спасибо
Автор - row
Дата добавления - 27.12.2011 в 13:52
Hugo Дата: Пятница, 24.02.2012, 11:04 | Сообщение № 20
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Написал альтернативный вариант UDF для файла MCH (работает только на файле, где словарь в Range("lingvo"))
Есть отличия от варианта Михаила - слова должны быть отделены пробелами (кроме запятой, она автоматически отделяется от слова перед заменой).
Но зато переводятся слова не только с кириллицы, а любые.
Т.е. любому отдельному сочетанию символов (слову) можно задать пару для замены.
[vba]
Code
Function RowLingvoDict(txt As String) As String
     Dim a, i&, t$
     txt = Replace(txt, ",", " , ")
     a = Range("lingvo").Value
     With CreateObject("Scripting.Dictionary")
         .CompareMode = 1
         For i = 1 To UBound(a): .Item(a(i, 1)) = a(i, 2): Next
         a = Split(txt)
         For i = 0 To UBound(a)
             t = Trim(a(i))
             If .exists(t) Then a(i) = .Item(t)
         Next
     End With
     RowLingvoDict = Replace(Join(a), " , ", ",")
End Function
[/vba]

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеНаписал альтернативный вариант UDF для файла MCH (работает только на файле, где словарь в Range("lingvo"))
Есть отличия от варианта Михаила - слова должны быть отделены пробелами (кроме запятой, она автоматически отделяется от слова перед заменой).
Но зато переводятся слова не только с кириллицы, а любые.
Т.е. любому отдельному сочетанию символов (слову) можно задать пару для замены.
[vba]
Code
Function RowLingvoDict(txt As String) As String
     Dim a, i&, t$
     txt = Replace(txt, ",", " , ")
     a = Range("lingvo").Value
     With CreateObject("Scripting.Dictionary")
         .CompareMode = 1
         For i = 1 To UBound(a): .Item(a(i, 1)) = a(i, 2): Next
         a = Split(txt)
         For i = 0 To UBound(a)
             t = Trim(a(i))
             If .exists(t) Then a(i) = .Item(t)
         Next
     End With
     RowLingvoDict = Replace(Join(a), " , ", ",")
End Function
[/vba]
Автор - Hugo
Дата добавления - 24.02.2012 в 11:04
Мир MS Excel » Вопросы и решения » Вопросы по Excel » переводчик
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!