текстовые строки
Зачастую требуется в функциях ввести дополнительный параметр, где пользователь может задать ссылку на ячейку Поскольку фантазия некоторых пользователей ничем не ограничена, да и хочется сделать макрос универсальным, необходимо сделать так, чтобы пользователь мог задать параметр ЯчейкаДляВставки в любом виде - будь то ссылка на ячейку, строку или столбец, или же имя столбца или номер строки. Потому и была написана функция GetCell, которую можно использовать следующим образом: Sub ПримерИспользования_GetCell() ' вставляем значение в первую пустую ячейку столбца A ' (вставка производится ниже всех данных в первом столбце листа) GetCell("a").Value = Now ' то же самое, но с другими вариантами параметра функции (все 4 способа равнозначны) GetCell("a:a").Value = 111 GetCell(Columns(1)).Value = 222 GetCell([a:a]).Value = 333 ' ============ вставка в первую незаполненную ячейку третьей строки ================= GetCell(Destination:=3).Value = 1 ' то же самое, но с другими вариантами параметра функции (все 4 способа равнозначны) GetCell("3").Value = 2 GetCell(Rows(3)).Value = 3 GetCell([3:3]).Value = 4 ' ============ другие варианты использования ================= GetCell().Value = "активная ячейка" ' вставка в заданную ячейку (вызов без параметра) GetCell("NewSheet").Value = "на новый лист в ячейку A1" ' создаётся новый лист GetCell("NewWorkbook").Value = "в новую книгу в ячейку A1" ' создаётся новая книга Excel End Sub
|
|||
В данной статье показаны 2 способа быстрого поиска значений в двумерных массивах.Поскольку искомое значение может встретиться в нескольких строках обрабатываемого двумерного массива, оба способа получают на выходе отфильтрованный двумерный массив. Способы формирования отфильтрованных массивов - разные:первый способ использует функцию ArrAutofilterEx второй способ - функцию ArraySearchResults Основные отличия и особенности этих 2 способов поиска:
|
|||
Функции ChangeFileCharset и ChangeTextCharset предназначены для изменения кодировки символов в текстовых файлах и строках. Исходную и конечную (желаемую) кодировку можно задать в параметрах вызова функций. Список доступных на вашем компьютере кодировок можно найти в реестре Windows в ветке Среди доступных кодировок есть koi8-r, ascii, utf-7, utf-8, Windows-1250, Windows-1251, Windows-1252, и т.д. и т.п. Определить исходную и конечную кодировку можно, воспользовавшись онлайн-декодером: Sub ПримерИспользования_ChangeTextCharset() ИсходнаяСтрока = "бНОПНЯ" ' вызываем функцию ChangeTextCharset с указанием кодировок ' (меняем кодировку с KOI8-R на Windows-1251) ПерекодированнаяСтрока = ChangeTextCharset(ИсходнаяСтрока, "Windows-1251", "KOI8-R") MsgBox "Результат перекодировки: """ & ПерекодированнаяСтрока & """", _ vbInformation, "Исходная строка: """ & ИсходнаяСтрока & """" End Sub
|
|||
Надстройка предназначена для быстрого просмотра кодов символов текста, введённого в ячейку.Порой бывают ситуации, когда формулы поиска и сравнения выдают неожиданный результат - одинаковые с виду ячейки для формул оказываются разными. И вот в этих случаях на помощь приходит эта надстройка. С её помощью вы быстро обнаружите, что в похожих ячейках одни и те же буквы набраны в разных раскладках или в разных кодировках, а также сможете отличить обычный пробел (с кодом 32) от неразрывного (с кодом 160). Пользоваться надстройкой очень просто - выделите ячейку, содержащую анализируемый текст, и нажмите комбинацию клавиш Ctrl + Alt + Shift + C При выделении на форме результатов позиции с кодом символа - этот символ подсвечивается (выделяется синим) в поле с содержанием текстовой строки. Можно открыть сразу несколько окон просмотра - выделяйте различные ячейки, и для каждой из них нажимайте вышеозвученную комбинацию на клавиатуре:
|
|||
