Макросы и программы для Excel в категории «текстовые строки»
Макросы и функции для обработки текстовых строк, сравнение и обработка текстовых переменных
-
Наверняка, вы сталкивались с ситуацией, когда необходимо производить поиск некоторого значения по всей книге Excel (искать частичное совпадение на всех листах активной книги) Штатными средствами Excel вывести поле для поиска на панель инструментов не удаётся, а вызывать каждый раз диалоговое окно нажатием комбинации клавиш Ctrl + F не всегда удобно. На помощь придёт эта...
-
Функции ChangeFileCharset и ChangeTextCharset предназначены для изменения кодировки символов в текстовых файлах и строках. Исходную и конечную (желаемую) кодировку можно задать в параметрах вызова функций. ВНИМАНИЕ: Функции чтения и сохранения текста в файл в заданной кодировке Список доступных на вашем компьютере кодировок можно найти в реестре Windows в ветке HKEY_CLASSES_ROOT\MIME\Database\...
-
Данные функции предназначены для работы с текстовыми файлами из VBA Excel. Используя эти функции, вы при помощи одной строки кода сможете записать текст из переменной в файл, или наоборот, загрузить содержимое текстового файла в переменную. Подразумевается, что текстовые файлы имеют формат ANSI (он же ASCII, он же windows-1251) ВНИМАНИЕ: См. также функции чтения и сохранения текста в файл в...
-
Макрос запрашивает строку для поиска, после чего ищет введенный текст в первом столбце листа, и подсвечивает результаты поиска. При запуске макроса появляется диалоговое окно (InputBox), позволяющее задать текст для поиска. Макрос подсвечивает красным цветом внутри ячейки текст, совпадающий с искомым (+ выделяет найденное полужирным начертанием) Перед началом поиска, цвет всех ячеек... -
В данной статье показаны 2 способа быстрого поиска значений в двумерных массивах. Поскольку искомое значение может встретиться в нескольких строках обрабатываемого двумерного массива, оба способа получают на выходе отфильтрованный двумерный массив. Способы формирования отфильтрованных массивов - разные: первый способ использует функцию ArrAutofilterEx второй способ - функцию ...
-
Макрос предназначен для создания текстовых файлов в кодировке UTF-8. Исходными данными является таблица Excel из 12 столбцов. Сначала, макрос создаёт папку для будущих текстовых файлов. Папка создаётся в том же каталоге, где расположена книга Excel. Далее, для каждой строки таблицы, макрос формирует подпапку, используя в качестве её названия текст из 7-го столбца таблицы. И потом, когда папка...
-
Данный макрос предназначен для поиска адресов электронной почты на листе Excel, с последующим выводом найденных адресов на отдельный лист. В прикреплённом файле, на первом листе ("исходные данные"), ячейки заполнены неструктурированной информацией (смесь фамилий, адресов почты, прочей ненужной информации) Макрос вычленяет из текста ячеек адреса электронной почты, и выводит все найденные...
-
Надстройка предназначена для быстрого просмотра кодов символов текста, введённого в ячейку. Порой бывают ситуации, когда формулы поиска и сравнения выдают неожиданный результат - одинаковые с виду ячейки для формул оказываются разными. И вот в этих случаях на помощь приходит эта надстройка. С её помощью вы быстро обнаружите, что в похожих ячейках одни и те же буквы набраны в разных... -
Надстройка для транслитерации или кодирования (замены символов их кодами) выделенного диапазона ячеек Excel При запуске надстройки в Excel формируется панель инструментов, при помощи которой можно выполнять следующие действия: Нажатием кнопки RU->EN выполнить транслитерацию выделенного диапазона ячеек Нажатием кнопки EN->RU выполнить транслитерацию выделенного диапазона ячеек В... -
При попытке сохранить файл под именем, заданным пользователем, вы можете получить ошибку - если в имени файла (папки) присутствуют запрещённые символы. Этого легко избежать, если в процессе формирования имени файла удалить из него недопустимые символы, заменив их символом подчёркивания: Function Replace_symbols(ByVal txt As String) As String St$ = "~!@/\#$%^&*=|`""...
-
При помощи функции Environ() можно получить значение переменной окружения Windows Этот макрос создаст новую книгу, и выведет в неё список из 31 переменной, с примерами вызова функции для получения каждого из параметров: Sub ВывестиПеременныеОкружения() On Error Resume Next Dim sh As Worksheet, param$ Application.ScreenUpdating = False: Set sh = Workbooks.Add.Worksheets(1...
-
Зачастую требуется в функциях ввести дополнительный параметр, где пользователь может задать ссылку на ячейку (например, место для вставки данных) Поскольку фантазия некоторых пользователей ничем не ограничена, да и хочется сделать макрос универсальным, необходимо сделать так, чтобы пользователь мог задать параметр ЯчейкаДляВставки в любом виде - будь то ссылка на ячейку, строку или столбец, или...
-
Пользовательская функция ParseFormula предназначена для отображения промежуточных результатов вычисления простейших формул в Excel. В данной версии функции ParseFormula поддерживаются только 2 формулы: СУММ и ПРОИЗВЕД Пример её использования - в прикреплённом файле. В примере в голубых ячейках - исходные данные для формул, в оранжевых ячейках - формулы типа =ПРОИЗВЕД(A1... -
Функция позволяет произвести замену в текстовой строке кодов символов Unicode на их значения В функции используются регулярные выражения (RegExp) Пример использования функции ReplaceUnicodeChars: Sub ЗаменаКодовСимволовВСтроке() ' исходная текстовая строка, содержащая коды символов Unicode txt$ = "Санаторий\u2013профилакторий \u201dЛесная сказка\u201d приглашает Вас!...
-
Данные функции могут быть полезны, если вы хотите спрятать некоторые значения в книге Excel Функция SaveValue предназначена для создания (изменения существующих) имён в книге, а функция GetValue - для получения ранее сохранённых значений. Sub SaveValue(ByRef WB As Workbook, ByVal Parameter As String, ByVal NewValue As String) ' создаёт в книге WB скрытое имя Parameter со значением NewValue...
-
Этот макрос позволяет преобразовать HTML-код, хранящийся в ячейках Excel, в обычный текст (без HTML-тегов) Особенность кода: теги перевода строки «br /» сохраняются. Пример использования процедуры Convert_HTML_Range_To_Text: (для этого примера, преобразования выполняются для диапазона ячеек в столбце С, начиная с 4 строки) Sub Макрос1() ' получаем ссылку на диапазон ячеек Dim ra As Range...
-
Функция ParseColumnsStringEx предназначена для преобразования введенного пользователем списка столбцов в одномерный массив числовых значений. Назначение функции: исключить ошибки пользовательского ввода, преобразовать буквенные названия столбцов в числовые значения. Пример использования: Private Sub ПримерИспользования_ParseColumnsStringEx() Dim txt$, txt1$, txt2$ ' исходная строка с...
