Строковые функции VBA
Содержание
- Строковые функции VBA в Excel
- Список шести лучших строковых функций в VBA
- # 1 – Функция LEN
- # 2 – Функция LEFT
- # 3 – Функция RIGHT
- # 4 – Функция MID
- # 5 – Функция TRIM
- # 6 – Функция Instr
- Рекомендуемые статьи
Строковые функции VBA не заменяют строку, а являются результатом этого functions создает новую строку. В VBA есть много строковых функций, и все они разделены на строковые или текстовые функции, некоторые из важных функций – это функция LEFT для получения значения слева и функция RIGHT для получения значения справа или функция MID, функция LEN и INSTR .
Строковые функции так важны. Сразу после определения количества символов в предоставленной строке мы можем извлечь любые символы из строки. Мы можем извлекать символы из левой части строки, мы можем извлекать из правой части строки, мы можем извлекать из середины строки, мы можем объединять два текста, и мы можем разделять их одновременно .
Важно иметь достаточные знания обо всех этих функциях VBA как части большого проекта.
Список шести лучших строковых функций в VBA
- Функция LEN
- Функция LEFT
- Функция RIGHT
- Функция MID
- Функция TRIM
- Функция Instr
Я хотел бы сказать, что « строковые функции VBA – это текстовые функции на листе ».
Вы, должно быть, уже использовали функции excel LEN, LEFT, RIGHT, MID, SUBSTITUTE, чтобы поиграть с данными. В VBA мы также можем использовать их, чтобы поиграть с данными.
Мы обсудим некоторые важные функции в этой статье.
Вы можете скачать это Шаблон Excel для строковых функций VBA здесь – Шаблон Excel для строковых функций VBA
# 1 – Функция LEN
LEN означает «ДЛИНА». Это даст нам количество символов, используемых в предоставленной строке. Например, если вы укажете слово «Hello», LEN в функции excel вернет 5 в качестве результата, потому что в слове «Hello» 5 символов.
В приведенном ниже коде будет показан пример. .
Код:
Sub LEN_Example () Dim TotalCount как String TotalCount = Len ("Привет") MsgBox TotalCountEnd Sub Это покажет результат в окне сообщения как 5.
# 2 – Функция LEFT
Чтобы извлечь символы из левой части строки, нам нужно использовать функция VBA LEFT. Взгляните на синтаксис функции LEFT.
- Строка – это строка, которую мы пытаемся извлечь.
- Длина – это не что иное, как много символов, которые вам нужны, с левой стороны предоставленной String .
Sub LEFT_Example () Dim FirstName As String FirstName = Left ("Sachin Tendulkar", 6) MsgBox FirstNameEnd Sub Это извлечет первые 6 символов из строки «Sachin Tendulkar». Таким образом, результат будет иметь имя, то есть «Sachin».
Популярные курсы в этой категории
Обучение VBA (3 курса, 12+ проектов)
4,6 (247 оценок) 3 курса | 12 практических проектов | 43+ часов | Полный пожизненный доступ | Сертификат прохождения
->
Просмотр Курс
# 3 – Функция RIGHT
Подобно тому, как мы извлекали значения из левой части строки, мы можем извлечь из правой части строки также.
Синтаксис функции RIGHT точно такой же, как и функции LEFT.
- Строка – это строка, которую мы пытаемся извлечь.
- Length – это не что иное, как количество символов, которое вам нужно, с правой стороны предоставленной
Код:
Sub RIGHT_Example () Dim LastName As String LastName = Right ("Sachin Tendulkar", 9) MsgBox LastNameEnd Sub Это извлечет 9 символов из строки «Сачин Тендулкар». Таким образом, результат будет иметь фамилию, то есть «Тендулкар».
# 4 – Функция MID
Не только с левой и правой стороны строки, но и с середины строки, мы также можем извлекать символы. Ниже приведен синтаксис функции VBA MID.
- Строка для поиска: Из какой строки нам нужно среднее значение
- Начальная позиция: Какая начальная номер позиции символа для извлечения?
- Количество извлекаемых символов: Из начальной позиции , сколько символов нужно извлечь .
Например, если имя – «Сачин Рамеш Тендулкар», то здесь второе имя – «Рамеш», в этой строке начальная позиция извлекаемого символа – 8, а нам нужно 6 символов от начальной позиции. Приведенный ниже код извлечет среднее значение.
Код:
Sub MID_Example ( ) Dim MiddleName As String MiddleName = Mid ("Sachin Ramesh Tendulkar", 8, 6) MsgBox MiddleNameEnd Sub Это извлечет «Ramesh» из середины строки «Sachin Ramesh Tendulkar».
# 5 – Функция TRIM
TRIM – это функция очистки данных. Она удалит ненужные пробелы из строки. Взгляните на синтаксис функции TRIM.
Ясно, что это значение или строка, которую вы хотите обрезать.
Например, предположим, что у вас есть строка «Привет, как дела?». Здесь у нас есть ненужные пробелы перед словом «Привет», поэтому с помощью TRIM. Мы можем это устранить.
Код:
Sub TRIM_Example () Dim MyValue As String MyValue = Trim ( «Привет, как дела?») MsgBox MyValueEnd Sub
Это удалит ненужные пробелы из предоставленной строки.
Примечание. VBA TRIM немного отличается от функции рабочего листа. Подробное описание этой функции VBA см. нашу статью о VBA TRIM.
У нас есть функции LTRIM и RTRIM. s также в VBA. LTRIM удалит ненужные пробелы с левой стороны строки, а RTRIM удалит нежелательные пробелы с правой стороны строки.
# 6 – Функция Instr
Функция Instr помогает найти позицию предоставленного символа в строке. Синтаксис функции INSTR следующий.
- [Начало] С какой позиции предоставленной строки нам нужна позиция.
- [String1] Какую строку вы имеете в виду?
- [String2] Какой символ вы ищете в [String1].
Например, если у вас есть слово «Рецепт» и вы хотите найти положение символа «e» с первого места ниже, код покажет позиция буквы «е».
Код:
Sub INSTR_Example () Dim MyValue As String MyValue = InStr (1 , "Рецепт", "е") MsgBox MyValueEnd Sub
Итак, с первой позиции строковой буквы «е» позиция равна 2.
Если вам нужна позиция второго появления буквы «e», тогда вам нужно использовать Начать аргумент как 3.
Код:
Sub INSTR_Example () Dim MyValue As String MyValue = InStr (3, "Рецепт", " e ") MsgBox MyValueEnd Sub
Итак, в этом случае позиция буквы« e »после первого появления равна 6 th .
Это некоторые из важных строковых функций. Надеюсь, вам понравилось.
Рекомендуемые статьи
Это руководство по строковым функциям VBA. Здесь мы узнаем список из 6 лучших строковых функций VBA, включая LEN, LEFT, MID, Right, Instr и Trim, а также примеры и загружаемый шаблон Excel. Ниже приведены некоторые полезные статьи в формате Excel, связанные с VBA –
- Правая функция VBA
- Формула обрезки Excel
- КРУГЛЫЕ формулы Excel
- Функции рабочего листа в VBA
0 общих ресурсов
Поделиться
Твитнуть
Поделиться
Обучение VBA (3 курса, 12+ проектов)
- 3 курса
- 12 практических проектов
- 43+ часа
- Полный пожизненный доступ
- Сертификат о прохождении курса
ПОДРОБНЕЕ >>
3.
9.3 Строковые функции
Ссылка на оригинал Время создания: 31.07.2019 22:37 Текстовые метки: VBA, Кодировки, Строковые функции Раздел: !Закладки — VBA Запись: xintrea/mytetra_db_adgaver_new/master/base/1524049566e99aq58zqt/text.html на raw.githubusercontent.com | ||||
Строковые функции VBA, Asc(), Chr(), InStr(), Len(), LCase(), UCase(), Replace(), Trim() Это — наиболее часто используемые функции. Требуются они постоянно, и знать их необходимо очень хорошо.
Dim n, nCharCode As Integer n = 1 nCharCode = Asc(«А») Do While n <= 20 ActiveWorkbook.ActiveSheet.Range(«A» & n).Value = Chr(nCharCode) n = n + 1 nCharCode = nCharCode + 1 Loop Варианты этой функции — AscB() и AscW() . AscB() возвращает только первый байт числового кода для символа, а AscW() возвращает код для символа в кодировке Unicode.
Selection.Text = «»Газпром»» сразу приведет к синтаксической ошибке. А вот так все будет в порядке: Selection.Text = Chr(34) & «Газпром» & Chr(34) есть варианты этой функции — ChrB() и ChrW(). Работают аналогично таким же вариантам для функции Asc().
| ||||
Так же в этом разделе:
| ||||
|
Возвращает символ по
его числовому коду. Помимо того, что используется в паре с функцией
Asc() (см. пример по этой функции), без нее не обойтись еще в одной
ситуации: когда нужно вывести служебный символ. Например, нам нужно
напечатать в Word значение «Газпром» (в кавычках). Кавычка — это
служебный символ, и попытка использовать строку вида
Обычно
используются для форматирования вывода совместно с функцией Len(). Еще
одна похожая функция — Spc(), которая используется для форматирования вывода на консоль. Она размножает пробелы с учетом ширины командной строки.
Run
txt
txt в кодировке utf-8 — VBA
0/6.0
ComboBox (заполнение поля со списком)
0.58Строковые функции VBA — javatpoint
следующий → ← предыдущая Строка является наиболее распространенным типом данных, используемым для хранения данных в Excel. Поэтому функции String становятся такими важными. Используя эти функции, вы можете манипулировать строковыми данными, находить количество символов указанного строкового значения, объединять два текста, разделять их одновременно, извлекать из строки только некоторые символы, а также удалять или обрезать лишние пробелы, присутствующие в строковом значении. Мы можем обрезать значения с левой стороны строки. В этом руководстве мы рассмотрим различные функции, которые позволят вам извлекать подстроки из строк с разных позиций, удалять ненужные пробелы из строк, разделять строковые значения, сравнивать строки и другие полезные строковые функции. Что такое строковые функции? «Строковые функции VBA создают новую строку, манипулируя данными. 7 часто используемых строковых функций в VBAМногие строковые функции, доступные в VBA, позволяют пользователю манипулировать строковыми символами и работать с текстовыми данными в коде. Ниже приведены 7 основных строковых функций, которые обычно используются в нашей повседневной жизни при работе со строковыми данными:
1 — Строковая функция LEN Функция VBA LEN является сокращением от «LENGTH». Эта функция возвращает количество символов, введенных пользователем в строке. Например, если мы предоставили строку «Hello World», функция LEN вернет 11, потому что всего в строке «Hello World» 11 символов (включая символ пробела). Синтаксис Лен(Строка) Параметр Строка (обязательно): Параметр String представляет символы, для которых мы хотим найти общую длину. Программа: Используя макрос VBA, найдите длину строки «Hello World». Подпрограмма LEN_StringFunction_Example() ‘Объявление переменной Dim LenCount как строка ‘Использование функции Len для подсчета общего количества символов LenCount = Лен («Привет, мир») MsgBox Ленкаунт Конец сабвуфера Выход Запустите код, нажав клавишу F5, и получите результат. У вас будет следующее окно сообщений на листе Excel, отображающее вывод 11. 2 — Функция LEFT StringФункция VBA LEFT используется для извлечения длины символов из левой части указанной строки. Синтаксис Слева (строка, длина) Параметр
Программа: Напишите макрос VBA, используя функцию LEFT, чтобы получить первое имя строки «Reema Panda». Подпрограмма LEFT_StringFunction_Example() ‘Объявление строковой переменной Dim FirstNme As String ‘Использование функции Left для получения первого имени FirstNme = Left(«Рима Панда», 5) ‘вернуть вывод MsgBox ФирстНме Конец сабвуфера Выход Запустите код, нажав клавишу F5, и получите результат. У вас будет следующее окно сообщений на листе Excel, отображающее вывод. Приведенный выше код извлек первые 5 символов из строки «Reema Panda». Таким образом, результатом будет первое имя, то есть «Рима». 3 — ПРАВАЯ строка Функция В приведенной выше функции мы извлекли значения из левой части строки; аналогично функция VBA LEFT используется для извлечения длины символов из левой части указанной строки. Синтаксис ВПРАВО (строка, длина) Параметр
Программа: Напишите макрос VBA, используя функцию RIGHT, чтобы получить первое имя строки «Reema Panda». Sub Right_StringFunction_Example() ‘Объявление строковой переменной Dim LastNme как строка ‘Использование функции Right для получения фамилии LastNme = Right («Рима Панда», 5) ‘вернуть вывод MsgBox LastNme Конец сабвуфера Выход Запустите код, нажав клавишу F5, и получите результат. У вас будет следующее окно сообщений на листе Excel, отображающее вывод. Будет извлечено 5 символов справа от строки «Reema Panda». 4 — Строковая функция MIDПреимущество строковых функций заключается в том, что они не только позволяют пользователям извлекать символы справа или слева от строки, но также помогают извлекать символы из средней позиции. Например, если у вас есть строка «Reema Devi Panda», здесь среднее значение равно «4», в этой строке начальная позиция извлекаемого символа равна 6, и нам нужно 6 символов от начальной позиции. Синтаксис MID (строка, начало как длинное, [длина]) Параметр
Программа: Напишите программу VBA для извлечения символов ближе к середине строки. Sub MID_StringFunction_Example() ‘Объявление переменной Dim MiddleNme As String ‘Использование функции Mid для извлечения отчества MiddleNme = Mid(«Рима Рани Панда», 6, 6) ‘Получение вывода MsgBox МидлНме Конец сабвуфера Выход Запустите код, нажав клавишу F5, и получите результат. У вас будет следующее окно сообщений на листе Excel, отображающее вывод. В результате из указанной строки будет извлечено отчество «Рани». 5 — Строковая функция TRIMФункция VBA TRIM используется для очистки данных. Это удалит из строки нежелательные символы пробела. Эта функция работает прямолинейно и принимает строковое значение (которое вы хотите обрезать) в качестве параметра. Например, предположим, что у вас есть строка «Привет, ты любишь VBA?». Здесь у нас есть ненужные пробелы перед словом «Hello», поэтому с помощью TRIM. Мы можем устранить это Синтаксис ТРИМ (строка) Параметр Строка (обязательный): этот параметр представляет строку, из которой вы хотите удалить нежелательные символы пробела. Программа: Напишите программу VBA, используя функцию MID, чтобы исключить нежелательные символы пробела из строки «Привет, ты любишь VBA?» Подпрограмма TRIM_StringFunction_Example() ‘Объявление переменной Dim MyVal как строка ‘Использование функции обрезки для удаления нежелательных пробелов MyVal = Trim(«Привет, ты любишь VBA?») ‘Получение вывода MsgBox MyVal Конец сабвуфера Выход Запустите код, нажав клавишу F5, и получите результат. У вас будет следующее окно сообщений на листе Excel, отображающее вывод. В результате вы заметите, что все лишние пробелы были удалены с начала и ближе к концу строки. ПРИМЕЧАНИЕ. В отличие от Right Left и Mid, VBA также предоставляет функции LTRIM и RTRIM в VBA. Если вы хотите удалить ненужные пробелы слева от строки, используйте функцию LTRIM и удалите ненужные пробелы с правой стороны, если строка требует функции RTRIM.6 — Строковая функция инструкции Функция VBA Instr String помогает найти позицию любого конкретного символа в предоставленной строке. Синтаксис InStr([начало], строка, подстрока, [сравнить]) Параметр Начало (опционально): Этот параметр представляет начальную позицию для поиска. Если этот параметр не пропущен, начальное значение по умолчанию равно 1. Строка (требуется): Этот параметр представляет собой строку для поиска. Подстрока (обязательно): Этот параметр представляет подстроку, которую вы хотите найти. Сравнение (необязательно): Этот параметр представляет тип выполняемого сравнения. Это может быть одно из следующих значений:
Программа: Напишите программу для быстрого поиска позиции «o» в строке «VBA World». Sub INSTR_StringFunction_Example() ‘Объявление строковой переменной Dim MyVal как строка ‘Использование функции INSTR для поиска позиции ‘o’ в строке MyVal = InStr(1, «Мир VBA», «о») ‘вернуть вывод MsgBox MyVal Конец сабвуфера Выход Запустите код, нажав клавишу F5, и получите результат. У вас будет следующее окно сообщений на листе Excel, отображающее вывод. В результате вы заметите, что в окне сообщения будет отображаться вывод 5. 7 — Функция разделения строкиФункция SPLIT String используется для разделения строки на подстроки на основе заданного разделителя. Синтаксис Разделить (Выражение, [Разделитель], [Ограничение], [Сравнить]) Параметр Выражение (обязательно): Этот параметр представляет входную строку, которую вы хотите разделить на основе разделителя. Разделитель (необязательно): Этот параметр представляет собой разделитель, используемый для разделения строки. Ограничение (необязательно): Этот параметр указывает общее количество подстрок, которые пользователь хочет вернуть. Сравнить (опционально): Этот параметр возвращает тип сравнения, который пользователь хочет, чтобы функция SPLIT выполняла при оценке подстрок. Программа Sub Split_StringFunction_Example() ‘Декалирование переменной Dim TextStr как строка Dim Result () как строка TextStr = «Добро пожаловать в мир программирования VBA.» ‘Разделение строки с помощью функции разделения с разделителем Результат () = Разделить (TextStr) Конец сабвуфера Список других строковых функций
Следующая тема# ← предыдущая следующий → |
Она не заменяет исходную строку, но выходные данные этих функций создают новую строку. Существуют различные строковые функции, которые классифицируются как строковые или текстовые функции VBA. » 
Поэтому на выходе будет фамилия, т. е. «Панда».
Обычно это включает аргумент «Выражение».
VBA Strings and Substrings Functions
In this Article
- Extracting a Substring
- The VBA Left String Function
- The VBA Right String Function
- The VBA Mid String Function
- Finding the Position of a Подстрока
- Функция строки VBA instring
- Функция VBA Instrrev. Функции
- Строковая функция VBA LCase
- Строковая функция VBA UCase
- Функция VBA StrConv
- Сравнение строк
- Функция VBA StrComp
- Оператор VBA, подобный оператору
- Другие полезные функции строковых функций VBA
- . VBA Заменить строковую функцию
- Функция VBA Strreverse
- Функция String Len Writh для манипулирования и работы с текстом и строками в вашем коде. В этом руководстве мы рассмотрим функции, которые позволят вам извлекать подстроки из строк, удалять пробелы из строк, преобразовывать регистр текста или строки, сравнивать строки и другие полезные строковые функции.
Извлечение подстроки
Функция левой строки VBA
Функция левой строки VBA позволяет извлекать подстроку из текста или строки, начиная с левой стороны. Синтаксис функции левой строки VBA:
Left(String, Num_of_characters), где:
- String — исходный текст.
- Num_of_characters – Целое число, указывающее количество символов, которое нужно извлечь из исходного текста, начиная с начала.
В следующем коде показано, как использовать функцию левой строки для извлечения первых четырех символов заданной строки:
Sub UsingTheLeftStringFunction() Dim valueOne As String Dim valueTwo As String значениеОдин = "AutomateExcel" значениеДва = Слева (значениеОдин, 4) MsgBox valueTwo End Sub
Результат:
Функция Left извлекла первые четыре буквы AutomateExcel, которые являются Auto.
Функция правой строки VBA
Функция правой строки VBA позволяет извлекать подстроку из текста или строки, начиная с правой стороны. Синтаксис функции VBA Right String:
Right(String, Num_of_characters), где:
- String — исходный текст.
- Num_of_characters – Целое число, указывающее количество символов, которое необходимо извлечь из исходного текста, начиная с конца.
В следующем коде показано, как использовать функцию Right String для извлечения последних четырех символов строки:
Sub ИспользованиеTheRightStringFunction() Dim valueOne As String Dim valueTwo As String значениеОдин = "AutomateExcel" значениеДва = Право (значениеОдин, 4) MsgBox valueTwo End Sub
Результат:
Правильная функция извлекла последние четыре буквы AutomateExcel, то есть xcel.
Функция VBA Mid String
Функция VBA Mid позволяет извлекать подстроку из текста или строки, начиная с любой позиции в указанной строке.
Синтаксис функции средней строки VBA:Mid(String, Starting_position, [Num_of_characters]), где:
- String — Исходный текст.
- Starting_position — Позиция в исходном тексте, с которой функция начнет извлекать.
- Num_of_characters ( Необязательный ) – Целое число, указывающее количество символов, которое нужно извлечь из исходного текста, начиная с Starting_position. Если пусто, функция MID вернет все символы из Starting_position.
В следующем коде показано, как использовать функцию середины строки для извлечения четырех символов, начиная со второй позиции или символа в строке:
Sub UsingTheMidStringFunction() Dim valueOne As String Dim valueTwo As String значениеОдин = "AutomateExcel" значениеДва = Середина (значениеОдин, 2, 4) MsgBox valueTwo End Sub
Результат выводится в msgbox:
Функция Mid извлекла четыре буквы AutomateExcel, начиная со второго символа/позиции/буквы, которые являются utom.
Поиск позиции подстроки
Функция VBA Instr String
Функция VBA Instr возвращает начальную позицию подстроки в другой строке. Эта функция чувствительна к регистру. Синтаксис функции VBA Instr String:
Instr([Start], String, Substring, [Compare]), где:
- Start ( Необязательный ) — указывает начальную позицию функции для поиска. Если пусто, используется значение по умолчанию 1.
- Строка — Исходный текст.
- Подстрока – Подстрока в исходном тексте, позицию которой вы хотите найти.
- Сравнить ( Необязательный) – определяет тип сравнения. Если пусто, используется двоичное сравнение.
-vbBinaryCompare — двоичное сравнение (верхний и нижний регистр считаются разными)
-vbTextCompare — текстовое сравнение (верхний и нижний регистр считаются одинаковыми)
-vbDatabaseCompare — сравнение базы данных (эта опция используется только в Microsoft Access, и сравнение на основе базы данных)В следующем коде показано, как использовать функцию Instr String для определения первого вхождения подстроки «Th» в основной строке:
Sub UsingTheInstrStringFunction() Dim valueOne As String Dim positionofSubstring As Integer valueOne = "Это текст" positionofSubstring = InStr(1, valueOne, "Th") Debug.
Print positionofSubstring
End Sub Результат (выводится в Immediate Window):
Функция Instr вернула позицию первого вхождения подстроки «Th», которая равна 1. Обратите внимание, что эта функция включает в счет пробелы.
Программирование на VBA стало проще
Прекратить поиск кода VBA в сети. Узнайте больше об AutoMacro — конструкторе кода VBA, который позволяет новичкам создавать процедуры с нуля с минимальными знаниями в области программирования и множеством функций, позволяющих сэкономить время для всех пользователей!
Узнать больше
Строковая функция VBA InstrRev
Функция VBA InstrRev возвращает начальную позицию подстроки в другой строке, но начинает отсчет позиции с конца строки. Эта функция чувствительна к регистру. Синтаксис строковой функции VBA InstrRev:
InstrRev(String, Substring, [Start], [Compare]), где:
- String — исходный текст.
- Подстрока – Подстрока в исходном тексте, позицию которой вы хотите найти.
- Старт ( Необязательный ) — указывает позицию, с которой нужно начать поиск. Если пусто, функция начинает поиск с последнего символа.
- Сравнить ( Необязательный) – определяет тип сравнения. Если пусто, используется двоичное сравнение.
-vbBinaryCompare — двоичное сравнение (верхний и нижний регистр считаются разными)
-vbTextCompare — текстовое сравнение (верхний и нижний регистр считаются одинаковыми)
-vbDatabaseCompare — сравнение базы данных (эта опция используется только в Microsoft Access, и сравнение на основе базы данных)В следующем коде показано, как использовать строковую функцию InstrRev для определения первого вхождения подстроки «Th» в основной строке, начиная с конца строки:
Sub UsingTheInstrRevStringFunction() Dim valueOne As String Dim positionofSubstring As Integer valueOne = "Это текст" positionofSubstring = InStrRev(valueOne, "Th") Debug.Print positionofSubstring Конец сабвуфера
Результат выводится в Immediate Window:
Функция InstrRev вернула позицию первого вхождения подстроки «Th», но начала отсчет с конца, который равен 9.
Обратите внимание, что эта функция включает в счет пробелы.Удаление пробелов из строки
Строковая функция VBA LTrim
Функция VBA LTrim удаляет все начальные пробелы из текста или строки. Синтаксис строковой функции VBA LTrim:
LTrim(String), где:
- String — исходный текст.
В следующем коде показано, как использовать функцию VBA LTrim для удаления начальных пробелов в заданной строке:
Sub UsingTheLTrimStringFunction() Dim valueOne As String Dim valueTwo As String valueOne = "Это адрес веб-сайта https://www.automateexcel.com/excel/" значениеДва = LTrim(значениеОдин) MsgBox valueOne MsgBox valueTwo End Sub
Результаты:
Функция LTrim удалила начальные пробелы для значения два, которое отображается во втором окне сообщения.
Программирование VBA | Генератор кода работает на вас!
Строковая функция VBA RTrim
Функция VBA RTrim удаляет все конечные пробелы из текста или строки.
Синтаксис строковой функции VBA RTrim:RTrim(String), где:
- String — исходный текст.
В следующем коде показано, как использовать функцию VBA RTrim для удаления конечных пробелов в заданной строке:
Sub ИспользованиеTheRTrimStringFunction() Dim valueOne As String Dim valueTwo As String valueOne = "Это адрес веб-сайта https://www.automateexcel.com/excel/" значениеДва = RTrim(значениеОдин) MsgBox valueOne MsgBox valueTwo End Sub
Полученные результаты:
Функция RTrim удалила конечные пробелы для значения два, которое отображается во втором окне сообщения.
Функция VBA Trim String
Функция VBA Trim удаляет все начальные и конечные пробелы из текста или строки. Синтаксис функции VBA Trim String:
Trim(String), где:
- String — исходный текст.
В следующем коде показано, как использовать функцию обрезки VBA для удаления начальных и конечных пробелов в заданной строке:
Sub UsingTheTrimStringFunction() Dim valueOne As String Dim valueTwo As String valueOne = " Это адрес веб-сайта https://www.
automateexcel.com/excel/ "
значениеДва = Обрезать (значениеОдин)
MsgBox valueOne
MsgBox valueTwo
Конец суб Результаты:
Функция обрезки удалила начальные и конечные пробелы для значения два, что показано во втором окне сообщения.
Функции VBA Case
Строковая функция VBA LCase
Функция VBA LCase преобразует буквы в тексте или строке в нижний регистр. Синтаксис строковой функции VBA LCase:
LCase(String), где:
- String — исходный текст.
В следующем коде показано, как использовать строковую функцию LCase для преобразования всех букв заданной строки в нижний регистр:
Sub ИспользованиеTheLCaseStringFunction() Dim valueOne As String Dim valueTwo As String valueOne = "ЭТО ПРОДУКТ" значениеДва = LCase(значениеОдин) MsgBox valueTwo End Sub
Результат:
Функция LCase преобразовала все буквы в строке в нижний регистр.
Строковая функция VBA UCase
Функция VBA UCase преобразует буквы текста или строки в верхний регистр.
Синтаксис строковой функции VBA UCase:UCase(String) где:
- String — Исходный текст.
В следующем коде показано, как использовать строковую функцию UCase для преобразования всех букв заданной строки в верхний регистр:
Sub UsingTheUCaseStringFunction() Dim valueOne As String Dim valueTwo As String valueOne = "это продукт" значениеДва = UCase(значениеОдин) MsgBox valueTwo End Sub
Результат:
Функция UCase преобразовала все буквы строки в верхний регистр.
Автомакрос | Окончательная надстройка VBA | Нажмите для бесплатной пробной версии!
Функция VBA StrConv
Функция VBA StrConv может преобразовывать буквы в тексте или строке в верхний регистр, нижний регистр, правильный регистр или Юникод в зависимости от указанного вами типа преобразования. Синтаксис строковой функции VBA StrConv:
StrConv(String, Conversion, [LCID]), где:
- String — исходный текст.
- Преобразование — тип преобразования, который вы хотите.
- [LCID] ( Необязательный) – Необязательный параметр, указывающий LocaleID. Если пусто, используется системный LocaleID.
В следующем коде показано, как использовать функцию StrConv String для преобразования строки в правильный регистр:
Sub UsingTheStrConvStringFunction() Dim valueOne As String Dim valueTwo As String valueOne = "это НАСТОЯЩИЙ продукт" valueTwo = StrConv (valueOne, vbProperCase) MsgBox valueTwo Конец суб
Результат:
Вы указываете тип преобразования, которое хотите выполнить, используя параметр преобразования:
- vbLowerCase преобразует все буквы в тексте в нижний регистр.
- vbUpperCase переводит все буквы текста в верхний регистр.
- vbProperCase преобразует первую букву каждого слова в тексте в верхний регистр, а все остальные буквы остаются в нижнем регистре.
- vbUnicode преобразует строку в Unicode.
- vbFromUnicode преобразует строку из Unicode в кодовую страницу системы по умолчанию.
Сравнение строк
Функция VBA StrComp
Функция VBA StrComp String позволяет сравнивать две строки. Функция возвращает:
- 0, если две строки совпадают с .
- -1, если строка1 меньше строки2
- 1, если строка1 больше строки2
- Значение null, если одна из строк была Null
В следующем коде показано, как использовать функцию StrComp для сравнения двух строк:
Sub UsingTheStrCompStringFunction() Dim valueOne As String Dim valueTwo As String Затемнить результат сравнения как целое число значениеОдин = "AutomateExcel" valueTwo = "АвтоматеExcel" resultofComparison = StrComp(valueOne, valueTwo) Debug.Print результат сравнения End Sub
Результат:
Функция StrComp нашла точное совпадение между двумя строками и вернула 0,
Оператор Like VBA
Оператор Like VBA позволяет сравнивать текст или строку с шаблоном и проверять, есть ли совпадения.
Обычно вы используете оператор Like в сочетании с подстановочными знаками. В следующем коде показано, как использовать оператор Like:Sub UsingTheLikeOperatorInVBA() Dim valueOne As String valueOne = "Давайте посмотрим вывод" Если значениеОдин Нравится "*просмотр*" Тогда MsgBox "Имеется совпадение, эта строка содержит слово view" Еще MsgBox "Совпадение не найдено" Конец, если Конец суб
Результат:
Подстановочные знаки, которые можно использовать с оператором Like для поиска совпадений с шаблоном, включают:
- ? который соответствует одному символу
- # соответствует одной цифре
- *, который соответствует нулю или более символов
В следующем коде показано, как использовать оператор Like и оператор ? подстановочный знак для соответствия шаблону в вашем коде:
Sub UsingTheLikeOperatorWithAWildcardInVBA() Dim valueOne As String значениеОдин = "The" Если значениеОдин Нравится "??e" Тогда MsgBox "Совпадение есть, найден совпадающий шаблон" Еще MsgBox "Совпадение не найдено" Конец, если Конец суб
Полученный результат:
AutoMacro | Окончательная надстройка VBA | Нажмите для бесплатной пробной версии!
Другие полезные строковые функции VBA
Функция замены строки VBA
Функция замены VBA заменяет набор символов в строке другим набором символов.
Синтаксис функции замены строки VBA:Replace(String, Find, Replace, [Start], [Count], [Compare]), где:
В следующем коде показано, как использовать функцию замены строки:
Sub UsingTheReplaceStringFunction() Dim valueOne As String Dim valueTwo As String значениеОдин = "ПродуктАВС" значениеДва = Заменить(значениеОдин, "ABC", "XYZ") MsgBox valueTwo End Sub
Результат:
Функция замены нашла подстроку ABC в ProductABC и заменила ее подстрокой XYZ.
Функция VBA StrReverse
Функция VBA StrReverse переворачивает символы в заданном тексте или строке. Синтаксис строковой функции VBA StrReverse:
StrReverse(String) где:
- String — Исходный текст.
В следующем коде показано, как использовать функцию VBA StrReverse для перестановки символов в строке Product:
Sub UsingTheStrReverseStringFunction() Dim valueOne As String Dim valueTwo As String значениеОдин = "Товар" значениеДва = StrReverse(значениеОдин) MsgBox valueTwo End Sub
Результат:
Функция VBA Len String
Функция VBA Len возвращает количество символов в текстовой строке.
- .
VBA Заменить строковую функцию
Синтаксис функции средней строки VBA:
Print positionofSubstring
End Sub 
Обратите внимание, что эта функция включает в счет пробелы.
Синтаксис строковой функции VBA RTrim:
automateexcel.com/excel/ "
значениеДва = Обрезать (значениеОдин)
MsgBox valueOne
MsgBox valueTwo
Конец суб 
Синтаксис строковой функции VBA UCase:
Обычно вы используете оператор Like в сочетании с подстановочными знаками. В следующем коде показано, как использовать оператор Like:
Синтаксис функции замены строки VBA: