Как сделать на английском excel?

После установки надстройки появится новая функция =ПЕРЕВОД(ТЕКСТ;ЯЗЫК). Функция имеет всего 2 аргумента:

  • ТЕКСТ — Собственно текст, который необходимо перевести. Максимальная длина текста составляет 10 000 символов
  • ЯЗЫК — Направление для перевода. Может задаваться одним из следующих способов:
  1. В виде пары кодов языков («с какого»-«на какой»), разделенных дефисом. Например, «en-ru» обозначает перевод с английского на русский.
  2. В виде кода конечного языка (например «ru»). В этом случае сервис Яндекс.Перевод пытается определить исходный язык автоматически.

После установки надстройки, функцией можно будет пользоваться аналогично встроенной. Вот так выглядит стандартное окно ввода параметров функции ПЕРЕВОД. Далее приводятся различные примеры применения функций перевода.

Как сделать на английском excel?

Пример 1

Как уже было сказано переменную ЯЗЫК можно задавать двумя способами. Проще всего указать код конечного языка. В этом случае Яндекс сам попытается определить язык источника.

Как сделать на английском excel?

Пример 2

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

Как сделать на английском excel? Сравнивая результаты перевода с явным указанием источника перевода и без. Мне они показались идентичными. Скорость работы функции тоже не изменилась.

Упрощенные функции перевода

Как правило, мы пользуемся двумя языками: русским и английским. Чтобы упростить жизнь себе и пользователям я сделал еще 4 разновидности функции:

=ПереводRu(ТЕКСТ) — Переводит текст практически с любого языка на русский язык, используя сервис Яндекс.Перевод (язык источника указывать не нужно)

Пример

Вам необходимо указать только текст, который вы хотите перевести. Сервис Яндекс.Перевод автоматически попытается определить исходный язык текста.

Как сделать на английском excel?

=ПереводEn(ТЕКСТ) — Переводит текст с любого языка на английский язык, используя сервис Яндекс.Перевод (язык источника указывать не нужно).

Пример

Вам необходимо указать только текст, который вы хотите перевести. Сервис Яндекс.Перевод автоматически попытается определить исходный язык текста.

Как сделать на английском excel?

=ПереводEnRu(ТЕКСТ) — Переводит текст с английского языка на русский язык, используя сервис Яндекс.Перевод.

Пример

Упрощенная функция для перевода с английского на русский язык. Вам необходимо указать только текст, который вы хотите перевести.

Как сделать на английском excel?

=ПереводRuEn(ТЕКСТ) — Переводит текст с русского языка на английский язык, используя сервис Яндекс.Перевод.

Пример

Упрощенная функция для перевода с русского на английский язык. Вам необходимо указать только текст, который вы хотите перевести.

Как сделать на английском excel?

Язык   Код
албанский sq
английский en
арабский ar
армянский hy
азербайджанский az
белорусский be
болгарский bg
боснийский bs
вьетнамский vi
венгерский hu
голландский nl
греческий el
грузинский ka
датский da
иврит he
индонезийский id
итальянский it
исландский is
испанский es
каталанский ca
китайский zh
корейский ko
латышский lv
литовский lt
малайский ms
мальтийский mt
македонский mk
немецкий de
норвежский no
польский pl
португальский pt
румынский ro
русский ru
сербский sr
словацкий sk
словенский sl
тайский th
турецкий tr
украинский uk
финский fi
французский fr
хорватский hr
чешский cs
шведский sv
эстонский et
японский ja

Ограничение на перевод

К сожалению, в сутки Яндекс позволяет перевести бесплатно не более 1 млн символов. В связи с ростом пользователей, этот объем стал достигаться достаточно часто. В 00:00 по Мск ограничение снимется и функция опять заработает. При превышении объема, функция возвращает значение  «Текст не может быть переведен».

Источник: https://micro-solution.ru/projects/addin_vba-excel/translate

Как транслитерировать текст в Excel (русский текст преобразовать в английский транслит)

Такое, например, может понадобиться для импорта данных в какую-нибудь программу, базу данных, которая не поддерживает русские буквы. Задача распространенная, но стандартными средствами Excel не решается.

Как сделать на английском excel?

Мы предлагаем вам два варианта решения данной задачи.

Первый способ транслита русского текста достаточно топорный — с использованием приложения Punto Switcher от Яндекс.

Punto Switcher — программа, которая автоматически переключает раскладку клавиатуры. Она знает, что «ghbdtn» — это «привет», а «пщщв ьщктштп» — это «good morning». 

Так вот, данная программа, помимо своей основной функции можете переводить текст в транслит, менять регистр выделенного текста (сделать из «иванов» в «ИВАНОВ») и другое.

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

Как сделать на английском excel?

Если зайти в настройки (правой кнопкой мыши по значку, выбрать настройки, горячие клавиши), то можно увидеть, что по умолчанию установлено переводить текст в транслит с помощью горячих клавиш Alt+Scroll Lock

Как сделать на английском excel?

К сожалению, в самом Excel программа транслитерировать текст не сможет, необходимо промежуточное действие. Копируем столбец с русскими буквами, открываем блокнот на компьютере (Notepad) и вставляем туда текст, далее выделяем текст в блокноте и нажимаем клавиши Alt+Scroll Lock, текст автоматически поменяется на транслит.

  • Далее вы просто копируете этот текст и вставляете обратно в Excel.
  • Это удобно если нужно например перевести в translit, например один объемный столбец данных на русском языке, но иногда преобразование текста в транслит требуется с помощью формул Excel, поэтому рассмотрим второй способ с использованием пользовательской функции Excel, написанной на VBA
  • Есть специальный макрос для создания пользовательской функции.
  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
  27. 27
  28. 28
  29. 29
  30. 30
  31. 31
  32. 32
  • Function Translit(Txt As String) As String
  •  Dim Rus As Variant
  •  Rus = Array(«а», «б», «в», «г», «д», «е», «ё», «ж», «з», «и», «й», «к», _
  •  «л», «м», «н», «о», «п», «р», «с», «т», «у», «ф», «х», «ц», «ч», «ш», _
  •  «щ», «ъ», «ы», «ь», «э», «ю», «я», «А», «Б», «В», «Г», «Д», «Е», _
  •  «Ё», «Ж», «З», «И», «Й», «К», «Л», «М», «Н», «О», «П», «Р», _
  •  «С», «Т», «У», «Ф», «Х», «Ц», «Ч», «Ш», «Щ», «Ъ», «Ы», «Ь», «Э», «Ю», «Я»)
  •  Dim Eng As Variant
  •  Eng = Array(«a», «b», «v», «g», «d», «e», «jo», «zh», «z», «i», «j», _
  •  «k», «l», «m», «n», «o», «p», «r», «s», «t», «u», «f», «kh», «ts», «ch», _
  •  «sh», «sch», «''», «y», «'», «e», «yu», «ya», «A», «B», «V», «G», «D», _
  •  «E», «JO», «ZH», «Z», «I», «J», «K», «L», «M», «N», «O», «P», «R», _
  •  «S», «T», «U», «F», «KH», «TS», «CH», «SH», «SCH», «''», «Y», «'», «E», «YU», «YA»)
  •  For I = 1 To Len(Txt)
  •  с = Mid(Txt, I, 1)
  •  flag = 0
  •  For J = 0 To 65
  •  If Rus(J) = с Then
  •  outchr = Eng(J)
  •  flag = 1
  •  Exit For
  •  End If
  •  Next J
  • If flag Then outstr = outstr & outchr Else outstr = outstr & с
  •  Next I
  •  Translit = outstr
  • End Function

Переключите раскладку на русский язык!! Копируем данный код, открываем среду VBA, для это нажмите правой кнопкой на активный лист и выберите пункт «Исходные данные», либо нажмите Alt+F11далее через меню выберите новый программный модуль (Insert — Module)

Как сделать на английском excel?

  1. и в открывшееся окно вставляете данный код и закрываете это окно.
  2. После этого в любом месте данного листа (а при вставке кода с помощью Insert — Module — в любом месте данной книги) вы сможете использовать пользовательскую функцию, которую можно вызвать выбрав:
  3. Вставка — Функция (Insert — Function)
  4. в Excel 2013 Функция — Вставить функцию
  5. Выбираем Категория: определенные пользователем, в данном списке должна появится наша функция Translit

Как сделать на английском excel?

Можно просто в нужной ячейке набрать =Transit (ссылка_на_русский_текст) 

Как сделать на английском excel?

  • После этого протягиваем формулу и получаем нужный нам результат.
  • Если вы присмотритесь в полученный результат, то увидите, что данные немного отличаются, например
  • Ivanov Sergej Petrovich и Ivanov Sergey Petrovich

то есть буква «й» преобразовалась по-разному, если для вас это критично, то нужно будет немного поменять указанный выше код. В коде есть две таблицы — одна на русском языке, другая латиницей.

Не трудно догадаться, что вам необходимо поменять нужные вам буквы.

В данном случае в коде нужно найти «j» и поменять на «y», если требуется, то по аналогии поступаем с другими буквам.

Важно!

  • Начиная с Excel 2007 не забудьте сохранить файл в формате поддержки макросов — xlsm, иначе макрос не сохранится;
  • Данный макрос необходимо вставлять в каждую отдельную книгу, в которой вы хотите, чтобы он работал;
  • Иногда требуется, чтобы была не встроенная функция, а макрос при запуске которого текст будет переводится в транслит, в этом случае нужно вставить код, указанный ниже. В итоге, для перевода текста в transit необходимо выделить нужный текст на русском языке (диапазон ячеек) и запустить макрос «Translit» и данный текст будет обработан.
  • Важно! Перед копированием данного кода, обязательно переключите раскладку клавиатуры на русский язык.
  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
  27. 27
  28. 28
  29. 29
  30. 30
  31. 31
  32. 32
  33. 33
  34. 34
  35. 35
  36. 36
  37. 37
  38. 38
  39. 39
  40. 40
  41. 41
  • Sub Translit()
  • Dim Txt As Variant
  • Dim i As Integer
  • Dim J As Integer
  • Dim c As String
  • Dim flag As Integer
  • Dim outchr As String
  • Dim outstr As String
  •  Dim Rus As Variant
  •  Rus = Array(«а», «б», «в», «г», «д», «е», «ё», «ж», «з», «и», «й», «к», _
  •  «л», «м», «н», «о», «п», «р», «с», «т», «у», «ф», «х», «ц», «ч», «ш», _
  •  «щ», «ъ», «ы», «ь», «э», «ю», «я», «А», «Б», «В», «Г», «Д», «Е», _
  •  «Ё», «Ж», «З», «И», «Й», «К», «Л», «М», «Н», «О», «П», «Р», _
  •  «С», «Т», «У», «Ф», «Х», «Ц», «Ч», «Ш», «Щ», «Ъ», «Ы», «Ь», «Э», «Ю», «Я»)
  •  Dim Eng As Variant
  •  Eng = Array(«a», «b», «v», «g», «d», «e», «jo», «zh», «z», «i», «j», _
  •  «k», «l», «m», «n», «o», «p», «r», «s», «t», «u», «f», «kh», «ts», «ch», _
  •  «sh», «sch», «''», «y», «'», «e», «yu», «ya», «A», «B», «V», «G», «D», _
  •  «E», «JO», «ZH», «Z», «I», «J», «K», «L», «M», «N», «O», «P», «R», _
  •  «S», «T», «U», «F», «KH», «TS», «CH», «SH», «SCH», «''», «Y», «'», «E», «YU», «YA»)
  •  For Each Txt In Selection.Cells
  •  outstr = Empty
  •  For i = 1 To Len(Txt)
  •  с = Mid(Txt, i, 1)
  •  flag = 0
  •  For J = 0 To 65
  •  If Rus(J) = с Then
  •  outchr = Eng(J)
  •  flag = 1
  •  Exit For
  •  End If
  •  Next J
  •  If flag Then outstr = outstr & outchr Else outstr = outstr & с
  •  Next i
  •  Txt.Value = outstr
  •  Next Txt
  • End Sub
  1. Итак, надеюсь вы нашли ответ на свой вопрос о том, как проще всего транслитерировать текст в Excel (преобразовать текст на русском языке в транслит).
  2. Ставьте лайки, подписывайтесь на наши группы в социальных сетях и следите за следующими уроками.
  3. SirExcel — безграничные возможности Excel
Читайте также:  Как сделать выборку в excel по цвету?

Источник: http://internet-pages.blogspot.com/2016/08/excel_29.html

Перевод в Excel

11 Май

Добрый день, уважаемые читатели и подписчики. Сегодня мы поговорим о непривычном функционале Excel — переводе с одного языка на другой.

Стандартными возможностями перевода можно воспользоваться на вкладке «Рецензирование», выбрать «Перевод».

Как сделать на английском excel?

Таким образом, нужно всего лишь иметь текст, выделить его и нажать кнопку «Перевод». Предложенные варианты можно вставить рядом с исходным текстом, для этого нужно перейти в ячейку и нажать кнопку «Вставить» в панели перевода.

Как сделать на английском excel?

Все эти возможности предоставлены функцией Microsoft Translator, которая, к сожалению, не всегда отрабатывает корректно. Что делать если нужно воспользоваться более продвинутыми инструментами перевода для составления контрактов или договоров на другом языке? 

В этом случае понадобится самостоятельно подключить тот переводчик — Гугл или Яндекс. Остальные, на мой взгляд, оставляют желать лучшего на данный момент. Я воспользуюсь вторым.

Яндекс переводчик

Для его корректно работы нам понадобится специальный api-ключ. Его можно получить на странице Яндекс.Переводчика. Естественно, нужно обладать аккаунтом на Яндексе, иначе ничего не получится.

После перехода останется всего лишь щёлкнуть «Создать ключ». Ключ будет создан, нужно будет ввести его описание.

Как сделать на английском excel?

Когда ключ будет создан, останется правильно оформить таблицу для перевода. В таблице должны быть:

  • список выбора языка;
  • поля для ввода текста;
  • настройки запроса.

Картина будет следующей (мы пройдёмся по всем ей составляющим).

Как сделать на английском excel?

Итак, первое — мы размещаем в ячейки О1 и О2 языки (русский, английский) и делаем с помощью них проверку данных (для создания списка выбора) в ячейке С3. Подробнее про создание выпадающих списков можно узнать здесь.

Второе — выделяем место под поля для ввода текста, который будем переводить, оформляем их границами. Делается это выделением ячеек и объединением (На вкладке «Главная» выбираем кнопку «Объединить и поместить в центре»). В ячейку H6 вставляем формулу =ФИЛЬТР.XML(C18;»//text»), она поможет извлечь из XML ответа текст перевода.

Перейдём к самому важному полю — настройки. 

В ячейку С15 поместим формулу проверки языка =ЕСЛИ(C3=»Русский»;»ru»;»en»). Это позволит нам автоматически менять язык в ячейке С15 при выборе языка из списка в ячейке С3.

Ключ, ячейка С16 — сюда нужно будет вставить ключ, полученный выше. Свой я не указываю, так как вы сможете выпустить его самостоятельно. Помните об одном — у Яндекса есть ограничения на количество символов, переводимых бесплатно. Если объёмы текста будут большие — лучше купить подписку.

Запрос, ячейка С17 — здесь мы разместим URL запрос к сервису Яндекса. Приведу его полностью.

=»https://translate.yandex.net/api/v1.5/tr/translate?key=»&C16&»&lang=»&C15&»&text=»&КОДИР.URL(B6)&»&format=html»

  • в первой части мы должны указать куда посылаем запрос (https://translate.yandex.net/api/v1.5/tr/translate?);
  • вторая часть — key=»&C16&», показывает из какой ячейки забрать api-ключ;
  • третья часть — lang=»&C15&», настраиваем направление перевода (en->ru, ru->en);
  • четвёртая честь — «&text=»&КОДИР.URL(B6)&»&format=html» указываем в какой кодировке мы забираем текст и в каком формате представлен запрос.

Ответ XML, ячейка С18 — здесь будет представлен ответ по xml запросу, который мы отправляли переводчику. Тут используется функция =ВЕБСЛУЖБА(C17), она расшифровывает запрос из ячейки С17 и переводит его в XML формат.

Вот и всё, нам остаётся только вводить текст в одно поле, а программа автоматически будет его переводить в другом. 

Для большей наглядности прикладываю файл (без ключа, его вы выпустите и вставите сами). Не обращайте внимания на ошибки #ЗНАЧ — они появляются из-за отсутствия ключа.

СКАЧАТЬ ФАЙЛ с примером.

Надеюсь, так перевод в Excel будет несколько проще.

Источник: http://pcandlife.ru/perevod-v-excel/

Язык формул в MS Excel 2016 — есть ли выбор?

Всем привет.
Какая же прелесть этот MS Excel. Присев на версию MS Excel 2016 не сразу обнаружил что все названия формул выпадают только на английском языке. Хорошо, переключил интерфейс MS Excel на русский,  и формулы все стали другими. Прелестно! 
Хорошо, тогда смотрю я в MS Excel 2010 а там часть формул на русском, а небольшая часть на английском. И что логично, названия разноязычных формул не совместимы на одном листе, т.е. нельзя в одном месте написать например =(SUBSTITUTE(A1;»А»;» . _ «) а чуть дальше ее же как =(ПОДСТАВИТЬ(A1;»А»;» . _ «). Кому так нужно? Скорее никому, но дело не в этом.

Ладно, проводим тест — пишем полностью англоязычный вариант SUBSTITUTE вычислений и проверяем работу MS Excel 2010 рус. Работает!

Проверяем его же в MS Excel 2016 англ. Работает!

Исправляем тест на русскоязычный вариант ПОДСТАВИТЬ  вычислений и проверяем работу MS Excel 2010. Работает!

Проверяем в MS Excel 2016. Гм, работает! Но по своему. Не желает знать MS Excel 2016 про такое как «ПОДСТАВИТЬ» написание формулы. И MS Excel 2016 сам(!)  меняет «ПОДСТАВИТЬ» на SUBSTITUTE. Ай точно, ведь и 2010-й менял все англоязычные формулы на русские на первом тесте. С какой то стороны удобно, ваш проект работает, с другой — сможете ли вы так же легко ориентироваться в новом написании формул?) А вот и новое — я поменял язык MS Excel 2016 на украинский. И все, мой MS Excel 2016 понимает только англоязычные формулы. Вывод: мой MS Excel 2016 может отработать по формулам или по английскому названию или по локализованному (русскому) согласно установленной Windows.

Как быть дальше? В сети есть рецепты как дать понять MS Excel 2016 чтобы он нормально, т.е. ВСЕГДА относился к русскоязычным формулам лояльно. Только зачем? Не логичнее ли будет начать привыкать к оригинальным названиям? Тем более что частенько это не простой перевод по словарю. Вот полюбуйтесь на фрагмент таблицы соответствий:

Как сделать на английском excel?

  • Кстати эта табличка найдена здесь 
  • C:Program FilesMicrosoft OfficeOffice161049FUNCS.XLS2
  • Расширение файла пусть вас не смущает, смело можете его открывать в MS Excel 2016 как xls. 

Разумеется если у вас написан проект на русскоязычных формулах, и он вам нужен рабочий на сегодня, то ищите соответствующий языковой пакет для MS Excel 2016. Но будет разумно потихоньку его переписывать на английскую версию).

Попутно нашел еще одну очень полезную вещицу. Есть в панельке «Формулы» кнопка для онлайн проверки расчета по определенной формуле «Evaluate Formula». Становитесь на ячейку с формулой и пошагово давите кнопку «Evaluate». В окошке «Evaluation» каждый раз меняется значение в зависимости от проведенного расчета. Выполненные вычисления обозначаются наклонным шрифтом. 

Как сделать на английском excel?
Да здравствует MS Excel 2016! 

Всем удачи.

Источник: http://nyukers.blogspot.com/2016/11/ms-excel-2016.html

Транслитерация текста в Excel

Разберем пользовательскую функцию для транслитерации текста в Excel из кириллицы (русского текста) на латиницу (английский транслит), к примеру «Слон» в «Slon».

Иногда возникают ситуации, когда нам необходимо преобразовать текст на кириллице в транслит и наоборот.

Если это разовое преобразование, то можно воспользоваться одним из множества сервисов в интернете, однако если перевод носит систематический характер и имеет определенную специфику использования в Excel, то такой вариант уже не подойдет.

Рассмотрим 2 различных способа транслитерации текста:

  • Формула. Транслит текста можно получить с помощью функции ПОДСТАВИТЬ и последовательной замены символов из кириллицы на символ из латиницы (например, замена «б» на «b», «в» на «v», «г» на «g» и т.д.);
  • Пользовательская функция (UDF), макрос. Аналогичная процедура написанная на языке VBA.

В первом случае (вариант формулы) нам придется воспользоваться функцией ПОДСТАВИТЬ 66 раз (для преобразования 33 букв из русского алфавита в нижнем и верхнем регистрах), что делает применение данного варианта неудобным из-за размера применяемой формулы, поэтому подробно остановимся на варианте с пользовательской функцией.

Читайте также:  Как сделать линию разреза в word?

Функция транслита в Excel

Как и всегда при создании пользовательской функции, сначала переходим в редактор Visual Basic (сочетание клавиш Alt + F11), затем создаем новый модуль и вставляем в него следующий код:

Function TranslitText(RusText As String) As String
Dim RusAlphabet As Variant 'массив из букв русского алфавита
RusAlphabet = Array(«а», «б», «в», «г», «д», «е», «ё», «ж», «з», «и», «й», «к», «л», «м», «н», «о», «п», «р», «с», «т», «у», «ф», «х», «ц», «ч», «ш», «щ», «ъ», «ы», «ь», «э», «ю», «я»)

Dim EngAlphabet As Variant 'массив из букв английского алфавита
EngAlphabet = Array(«a», «b», «v», «g», «d», «e», «e», «zh», «z», «i», «i», «k», «l», «m», «n», «o», «p», «r», «s», «t», «u», «f», «kh», «tc», «ch», «sh», «shch», «», «y», «», «e», «iu», «ia»)

Dim EngText As String, Letter As String, Flag As Boolean

For i = 1 To Len(RusText) 'цикл по всем символам русского текста
Letter = Mid(RusText, i, 1)
Flag = 0
For j = 0 To 32 'цикл по всем буквам русского алфавита
If RusAlphabet(j) = LCase(Letter) Then 'если символ из текста совпал с буквой из русского алфавита…
Flag = 1
If RusAlphabet(j) = Letter Then 'проверка на регистр (верхний или нижний)
EngText = EngText & EngAlphabet(j) '… то добавляем соответствующую букву из английского алфавита
Exit For
Else
EngText = EngText & UCase(EngAlphabet(j))
Exit For
End If
End If
Next j
If Flag = 0 Then EngText = EngText & Letter 'если символа из текста в алфавите нет (например, знаки препинания и т.п.), то добавляем символ без изменения
Next i
TranslitText = EngText
End Function

Function TranslitText(RusText As String) As String    Dim RusAlphabet As Variant 'массив из букв русского алфавита    RusAlphabet = Array(«а», «б», «в», «г», «д», «е», «ё», «ж», «з», «и», «й», «к», «л», «м», «н», «о», «п», «р», «с», «т», «у», «ф», «х», «ц», «ч», «ш», «щ», «ъ», «ы», «ь», «э», «ю», «я»)    Dim EngAlphabet As Variant 'массив из букв английского алфавита    EngAlphabet = Array(«a», «b», «v», «g», «d», «e», «e», «zh», «z», «i», «i», «k», «l», «m», «n», «o», «p», «r», «s», «t», «u», «f», «kh», «tc», «ch», «sh», «shch», «», «y», «», «e», «iu», «ia»)    Dim EngText As String, Letter As String, Flag As Boolean    For i = 1 To Len(RusText) 'цикл по всем символам русского текста        Letter = Mid(RusText, i, 1)        For j = 0 To 32 'цикл по всем буквам русского алфавита            If RusAlphabet(j) = LCase(Letter) Then 'если символ из текста совпал с буквой из русского алфавита…                If RusAlphabet(j) = Letter Then 'проверка на регистр (верхний или нижний)                    EngText = EngText & EngAlphabet(j) '… то добавляем соответствующую букву из английского алфавита                    EngText = EngText & UCase(EngAlphabet(j))        If Flag = 0 Then EngText = EngText & Letter 'если символа из текста в алфавите нет (например, знаки препинания и т.п.), то добавляем символ без изменения

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

Если есть необходимость скорректировать какие-либо правила перевода под свои задачи, то это легко можно сделать в теле функции (изменив массив EngAlphabet в строке 6).

Вызвать пользовательскую функцию в Excel мы можем стандартным способом — либо непосредственно ввести формулу в ячейку, либо воспользоваться мастером функций (выбрав из категории Определенные пользователем):

Как сделать на английском excel?

Обратная транслитерация (с английского на русский)

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

Например, ряд символов «sch» можно интерпретировать и как букву «щ«, так и как набор букв «сч«, и множество других подобных сочетаний, где нет однозначного соответствия между буквами русского и английского алфавитов.

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

Скачать файл с примером

Удачи вам и до скорых встреч на страницах блога Tutorexcel.ru!

  • Формула номера листа и страницы в Excel
  • Как убрать лишние пробелы в Excel?

Источник: https://tutorexcel.ru/makrosy-vba/transliteraciya-teksta-v-excel/

3 options for translating Excel documents

We often run into complications when translating documents, even more so in the case of Excel files. Here, we will look at our options for translating this type of file.

Automatic translation of Microsoft Excel

One of the fastest and easiest options is the program's own translation function. To translate content, just follow these steps:

1. Select the text you wish to translate.2. On the «Review» tab, click «Translate».

The following dialog box will pop up automatically, with a language selector where you will choose the target language. Once selected, you'll see the text instantly translated.

If you want to copy the translation straight into the corresponding Excel cell, you can do so by clicking «Insert».

Как сделать на английском excel?

This type of machine translation solution my be useful for giving us a basic idea of the text content, however, it's important to bear in mind that it does not preserve the full meaning and, much less, the tone of the text.

Online translation tools

There is a vast array of online tools offering Excel document translation. These free tools generate an automatic translation of the document. Here are some examples:

DocTranslator

This tool allows us to translate Excel document content, in addition to other document types, such as: .doc, .docx, .ppt, .pptx, .xls, .xlsx, .odt, .ods, .odp, .pdf, .srt, or .txt.

− Machine translation.− Up to 104 languages.− Respects the formatting of the original document.− No size limit for document translation.

Prompsit

Very similar to the previous option. In this tool there are less languages available, but it is more compatible than a large number of formats: .docx, .xml, .rtf, .odt, .ods, .odp, .html, .pptx, .xls, .txt, LaTeX (UTF-8) or LaTeX (ASCII).

− Machine translation.− Up to 15 languages.− Respects the formatting of the original document.− No size limit for document translation.

WorldLingo

This solution is the most limiting both in the number of languages available for translation and the translation limit.

− Machine translation.− Up to 15 languages.− Does not preserve the formatting of the original document.− 500 word translation limit.

Professional translation tool

If you want a quality translation of Excel documents, the smartest option is to go for professional translation solutions, using tools that have no type of translation limit and respect the formatting of the original document.

Our recommendation is AT Translation Services, our simple and intuitive document translation solution. How does it work? All you have to do is upload the document and select the source and target language and

Источник: https://www.at-languagesolutions.com/ru/atblog/como-traducir-documento-excel

Excel — перевод, произношение, транскрипция

амер.  |ɪkˈsel| Тег audio не поддерживается вашим браузером.  

брит.  |ɪkˈsɛl| Тег audio не поддерживается вашим браузером.  

5 845

превосходить, выделяться, изощряться, выдаваться - превосходить

to excel one's teacher — превзойти своего учителя not to be excelled — быть непревзойдённым a babe all babes excelling — дитя, каких не видел свет

- (часто in, at) выделяться (чем-л. хорошим); отличаться, выдаваться

to excel at games — отличаться в спортивных играх to excel as an orator — быть выдающимся оратором to excel in shooting — превосходно /отлично/ стрелять he excelled in nothing at all at school — в школе он не отличался успехами ни по одному предмету

to excel as a tailor — быть замечательным портным   to excel in running — отлично бегать   to excel one's father — превзойти своего отца   to import into Excel — импортировать в Excel   excel in discus-throwing — превзойти всех в метании диска   excel as an orator — быть выдающимся оратором   excel at games — отличаться в спортивных играх   excel at — превосходить; отличаться; выдаваться   excel in quality — превосходить качеством   excel in shooting — превосходно стрелять; отлично стрелять  

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

She excels everyone else in sports. 

В спорте она превосходит всех остальных. / В спорте ей нет равных. ☰

  • She designed to excel in her studies. 
  • Она намеревалась превзойти всех в учёбе. ☰
  • Rick has always excelled at foreign languages. 
  • Рик всегда был хорош в изучении иностранных языков. ☰
  • He almost burst with pride when his son began to excel at football. 
  • Он был переполнен гордостью от успехов своего сына в футболе. ☰
Читайте также:  Как сделать разгруппировку в Excel?

Источник: https://WooordHunt.ru/word/excel

Есть английский языковой пакет Office интерфейс?

существует разница между офисом language interface pack и в должности language pack. пакеты язык Office, поддерживаемые версии до и включая Office 2013 не бесплатно. Office языковые пакеты интерфейса для office 2003 для Office 2013 были свободный. Microsoft прекратить продажу Office 2003 и Office 2007 языковые пакеты в июле 2011

языковые интерфейсные пакеты (Lip) изменение языка ленты и команды для некоторых Офисные приложения и включают проверку орфографии для их язык. Губы доступно только для языков, перечисленных в ссылки на раздел Free LIP downloads.

Office language interface pack (LIP) загрузки

официальная позиция Microsoft по этому вопросу следующая:

при наличии Office 2010 или более ранней версии языковые пакеты прекращено и больше не доступный.

возможно, вы сможете найти стороннюю компанию, которая будет продавать английский языковой пакет. Я смог найти кого-то, кто продал следующий многоязычный пакет Office 2007 на Amazon

Microsoft Office 2007

языковые пакеты для текущих поддерживаемых версий Office не поддерживают Office 2007. Вот официальное заявление по этому поводу.

Microsoft больше не предлагает языковые пакеты Office 2003 или 2007 для розничные покупки по состоянию на июль 2011 года. Обратите внимание на язык Office 2010 пакеты не будут работать с другими версиями Office (XP, 2003, 2007 и др.)

языковые пакеты Office 2003/2007 больше недоступны!

обратите внимание:

Я должен отметить, что Microsoft больше не продает языковые пакеты Office 2010 либо. Информация, которую я процитировал, относится к Office 2003 и Office 2007. это означает, что только языковые пакеты, продаваемые корпорацией Майкрософт для Office 2013.

Office 2016 языковые пакеты на самом деле бесплатно.

языковой пакет для Office 2016 и Office 2016-English Language Pack

следующая диаграмма относится к Office 2007, но она объясняет, какие языки языковые пакеты интерфейса и какие языки языковые пакеты. У меня нет причин верить информации между Office 2007 и Office 2010.

в чем разница между языковым пакетом Office 2010 (LIP) и языковым пакетом Office 2010?

где можно найти английский языковой пакет для office 2007?

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

Источник: https://kompsekret.ru/q/is-there-an-english-office-language-interface-pack-112724/

функции excel на английском — Bing

результаты: 1 830 000Дата Язык Регион

  1. https://sirexcel.ru/sootvetstvie-funkcij-na-anglijskom-i-russkom-yazykake-v-excel

    Как правило у многих пользователей в России и других странах СНГ установлена русская версия MS Excel, но есть ряд зарубежных компаний, которые используют только английские версии Excel

  2. https://brusentsov.com/2009/12/27/3519

    А большинство коллег пользуется русской версией MS Excel. Проблема состояла в том, что большинство функций в русском Excel называется совершенно не так, как в английском.

  3. Список функций Excel с переводом с / на английский язык. Ниже Вы найдете на английском и русском переводе Excel 2010 функций и формул.

  4. https://support.office.com/ru-ru/article/Переводчик-функций-в-Excel…

    В этой статье приведены сведения о настройке и использовании надстройки Переводчик функций в Excel. Переводчик функций будет полезен тем, кто использует разные языковые версии Excel

  5. https://my-excel.ru/vba/excel-pstr-na-anglijskom.html

    8 — это то функция ПСТРБ и Функция имеет следующую синтаксическую что номер месяца другом с формулами лист на английском функций на английском… формулы в ячейках пожалуйста.

  6. https://my-excel.ru/vba/excel-poiskpoz-na-anglijskom.html

    жмем на кнопку «Тип сопоставления» числу количества аргументов указано значение Excel является функция в списке баллов, это равносильно ISNUMBER в которой указывается что позволяет выдавать Принцип работы в основном …

  7. https://my-excel.ru/formuly/funkcija-scepit-v-excel-na-anglijskom.html

    Главная » Формулы » Функция сцепить в excel на английском Функция СЦЕПИТЬ в Excel, включая примеры Смотрите также Igor67 E2 и F2 использовать вместо нее воспользоваться специальной опцией так что перейдем человека.

  8. https://my-excel.ru/excel/excel-levsimv-na-anglijskom.html

    Функция ЛЕВСИМВ() в ms excel Функция ЛЕВСИМВ(), английский вариант left(), возвращает первые знаки текстовой строки исходя из заданного количества…

  9. https://4analytics.ru/chto-vajno-znat-o/funkcii-excel-na-angliieskom-i-russkom.html

    Но функции в vba надо писать на английском, т.к. на русском vba их не воспринимает. В данной статье вы найдете файл с переводом функций с русского на английский и наоборот.

  10. https://support.office.com/ru-ru/article/СЧЁТЕСЛИ-функция…

    Вы всегда можете задать вопрос специалисту Excel Tech Community, попросить помощи в сообществе Answers community, а также предложить новую функцию или улучшение на веб-сайте Excel User Voice. См. также

    • РекламаВыполняем проекты в Excel на заказ. Коллектив специалистов. · круглосуточно
    • РекламаЗнаешь, как научиться смотреть английские фильмы с оригинальной звуковой дорожки?

Источник: https://www.windowssearch-exp.com/search?q=%D1%84%D1%83%D0%BD%D0%BA%D1%86%D0%B8%D0%B8+excel+%D0%BD%D0%B0+%D0%B0%D0%BD%D0%B3%D0%BB%D0%B8%D0%B9%D1%81%D0%BA%D0%BE%D0%BC&first=31&FORM=PERE2

Как отделить / отфильтровать текст на английском языке с китайского языка в Excel

Я работаю над проектом, который включает в себя несколько файлов Excel с ячейками, содержащими английский, китайский или английский и китайский.

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

Я наткнулся на следующие 3 функции, которые могли бы помочь мне пометить контент соответственно, но они, похоже, не работают должным образом, и я не могу понять, почему.

Function ExtractChn(txt As String) Dim i As Integer Dim ChnTxt As String For i = 1 To Len(txt) If Asc(Mid(txt, i, 1)) < 0 Then ChnTxt = ChnTxt & Mid(txt, i, 1) End If Next i ExtractChn = ChnTxt End Function Function ExtractEng(txt As String) Dim i As Integer Dim EngTxt As String For i = 1 To Len(txt) If Asc(Mid(txt, i, 1)) >= 0 Then EngTxt = EngTxt & Mid(txt, i, 1) End If Next i ExtractEng = EngTxt End Function Function CheckTxt(txt) Dim i As Integer Dim Eng As Integer Dim Chn As Integer Chn = 0 Eng = 0 For i = 1 To Len(txt) If Asc(Mid(txt, i, 1)) > 0 Then Eng = 1 Else: Chn = 1 End If Next i If Chn = 1 And Eng = 1 Then 'Contains Both Eng & Chn CheckTxt = «BOTH» Else: If Chn = 1 And Eng = 0 Then 'Chn CheckTxt = «CHN» Else: If Chn = 0 And Eng = 1 Then 'Eng CheckTxt = «ENG» End If End If End If End Function

Человек, создавший их, даже предоставил файл, демонстрирующий работу этих функций. Я прикрепляю ссылку на файл, который имеет следующую структуру:

Text|English part of it|Chinese part of it|ExtractEng|ExtractChn|CheckTxt

Согласно намерениям автора, результат CheckTxt должен отображать либо CH , ENG , либо BOTH . Тем не менее, это только отображение ENG во все времена, и я не могу понять, почему.

Любые идеи, как заставить его работать? Если нет более простого способа «предварительного фильтра» содержимого в Excel? Любая помощь будет высоко ценится.

Проверить файл Excel от разработчика

Это звучит как работа для регулярных выражений!

Function getCharSet(Target As Range) As String Const ChinesePattern = «[u4E00-u9FFFu6300-u77FFu7800-u8CFFu8D00-u9FFF]+» Const EnglishPattern = «[A-Za-z]» Dim results As String Dim Data, v Dim Regex1 As Object Set Regex1 = CreateObject(«VBScript.RegExp») Regex1.Global = True If Target.Count = 1 Then Data = Array(Target.Value2) Else Data = Target.Value2 End If For Each v In Data If Not InStr(results, «CHN») Then Regex1.Pattern = ChinesePattern If Regex1.Test(v) Then If Len(results) Then getCharSet = «CHN» & » — » & results Exit Function Else results = «CHN» End If End If End If If Not InStr(results, «ENG») Then Regex1.Pattern = EnglishPattern If Regex1.Test(v) Then If Len(results) Then getCharSet = results & » — ENG» Exit Function Else results = «ENG» End If End If End If Next getCharSet = results End Function

Основной подход:

Sub Main() Dim sh As Worksheet Set sh = ActiveSheet Dim rng As Range Set rng = sh.Range(«A6:D10») Call Separate_English_Chinese(rng) End Sub Sub Separate_English_Chinese(rng) Dim sh As Worksheet Set sh = rng.Parent Dim EnglishCharacters As String Dim colEng As Long, colChn As Long, colContains As Long Dim a As String, i As Long, k As Long Dim colFullText As Long, txtEnglish As String, txtChinese As String Dim Result As Long, Contains As String Dim First As Long, Last As Long First = rng.Row Last = rng.Rows.Count + rng.Row — 1 EnglishCharacters = «qwertyuiopasdfghjklzxcvbnm» EnglishCharacters = UCase(EnglishCharacters) & LCase(EnglishCharacters) colFullText = 1 colEng = 2 colChn = 3 colContains = 4 For i = First To Last a = sh.Cells(i, colFullText).Value txtEnglish = «» txtChinese = «» For k = 1 To Len(a) If InStr(EnglishCharacters, Mid(a, k, 1)) Then txtEnglish = txtEnglish & Mid(a, k, 1) Else txtChinese = txtChinese & Mid(a, k, 1) End If Next sh.Cells(i, colEng).Value = txtEnglish sh.Cells(i, colChn).Value = txtChinese Result = 0 If txtEnglish «» Then Result = Result + 1 If txtChinese «» Then Result = Result + 10 Select Case Result Case 1 Contains = «ENG» Case 10 Contains = «CHN» Case 11 Contains = «BOTH» Case Else Contains = «» End Select sh.Cells(i, colContains).Value = Contains Next End Sub

Источник: https://excel.bilee.com/x441-239.html

Ссылка на основную публикацию
Adblock
detector