Функция SplitLanguages предназначена для отделения русских слов от английских
(для разбиения заданной текстовой строки на две, в одной из которых будут только русские слова, а в другой - только английские)
Знаки препинания, пробелы, и прочие символы, не относящиеся к конкретному языку, попадают в обе строки.
Например, дана исходная строка "Разработка VBA макросов для программы Microsoft Excel"
Функция возвратит 2 строки: русскую "Разработка макросов для программы", и английскую "VBA Microsoft Excel"
Sub ПримерИспользования() txt = "Разработка VBA макросов для программы Microsoft Excel" РусскаяЧасть = SplitLanguages(txt)(0) АнглийскаяЧасть = SplitLanguages(txt)(1) Debug.Print РусскаяЧасть ' результат: "Разработка макросов для программы" Debug.Print АнглийскаяЧасть ' результат: "VBA Microsoft Excel" End Sub