VBA ИНСТРЕВ

Excel VBA INSTRREV

VBA ИНСТРЕВ функция, как означает ‘В обратном порядке строки,’ возвращает позицию первого вхождения искомой строки (подстроки) в другую строку, начиная с конца строки (справа налево), из которой мы ищем искомую строку.

INSTRREV Функция начинает поиск искомой строки с конца, что нам нужно узнать, но считает позицию с начала. Потом, наконец, еще один INSTR Функция VBA (расшифровывается как «В строке») ищет строку в другой строке и возвращает позицию. Но эта функция начинает поиск с начала строки, из которой мы ищем искомую строку.

INSTRREV и INSTR встроены Строковая/текстовая функция VBAФункция VBAФункции VBA служат основной цели для выполнения определенных вычислений и возврата значения. Поэтому в VBA мы используем синтаксис для указания параметров и типа данных при определении функции. Такие функции называются пользовательскими функциями.Подробнее из MS Excel. Поэтому мы можем использовать их при написании любого макроса в редакторе Microsoft Visual Basic.

Программы для Windows, мобильные приложения, игры - ВСЁ БЕСПЛАТНО, в нашем закрытом телеграмм канале - Подписывайтесь:)

Оглавление

Excel VBA INSTRREV

Синтаксис

Как мы видим на изображении выше, существуют два обязательных и два необязательных аргумента.

StringCheck как строка: Это обязательный аргумент. Нам нужно указать искомое строковое выражение.
StringMatch как строка: Этот аргумент также является обязательным. Нам нужно указать искомое строковое выражение.
Начать как долго = -1: Это необязательный аргумент. Указываем числовое выражение. По умолчанию принимает значение -1, то есть поиск начинается с позиции последнего символа. Если мы укажем любое положительное значение, например 80, он начнет поиск с конца строки в этих 80 символах.
Сравнить как VbCompareMethod = vbBinaryCompare As Long: Этот аргумент является необязательным.

VBA CompareNumeric ExpressionIndicatesvbUseCompareOption-1 Выполняет сравнение, используя настройку инструкции Option Compare. Оператор Option Compare указывает метод сравнения строк модуля (двоичный, текстовый или базовый). Если модуль не включает оператор Option Compare, метод сравнения текста по умолчанию — Binary.vbBinaryCompare0. Выполняет двоичное сравнение. (С учетом регистра) vbTextCompare1 Выполняет текстовое сравнение. (без учета регистра)vbDatabaseCompare2Только Microsoft Access. Выполняет сравнение на основе информации в базе данных.

Мы можем указать следующие значения для этого аргумента.

Возвращаемые значения

INSTRREV функция возвращает 0, если проверка строки имеет нулевую длину или соответствие строки не найдено или ‘начинать’ аргумент > длина совпадения строки.
Эта функция возвращает ‘Нулевой’ если проверка строки или совпадение строки ‘Нулевой.’
Если совпадение строки имеет нулевую длину, функция возвращается к начинать.
Если при проверке строки найдено совпадение, функция возвращает позицию, в которой найдено совпадение.

Как использовать функцию VBA INSTRREV?

.free_excel_div{фон:#d9d9d9;размер шрифта:16px;радиус границы:7px;позиция:относительная;margin:30px;padding:25px 25px 25px 45px}.free_excel_div:before{content:””;фон:url(центр центр без повтора #207245;ширина:70px;высота:70px;позиция:абсолютная;верх:50%;margin-top:-35px;слева:-35px;граница:5px сплошная #fff;граница-радиус:50%} Вы можете скачать этот шаблон Excel VBA INSTRREV здесь – VBA INSTRREV Шаблон Excel

Предположим, у нас есть данные о названиях фильмов и их режиссерах. Мы хотим разделить имена режиссеров.

У нас есть данные в 1201 строке. Так что если мы будем делать эту задачу вручную, это займет много времени.

Чтобы сделать то же самое, мы будем использовать код VBAИспользование кода VBAКод VBA относится к набору инструкций, написанных пользователем на языке программирования приложений Visual Basic в редакторе Visual Basic (VBE) для выполнения определенной задачи.Подробнее. Шаги:

Нам нужно нажать на ‘Visual Basic’ Команда доступна в ‘Код’ Группа в «Разработчик» Tab, или мы можем нажать Alt+F11 чтобы открыть редактор Visual Basic.

мы вставим модуль используя Меню «Вставить».

Мы создадим подпрограмму с именем «Разделение имен».

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

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

Этот код сначала выберет ячейку B1, а затем выберет последнюю использованную ячейку в том же столбце, а затем мы назначим номер строки ячейки переменной «LastRow».

Теперь, чтобы манипулировать всеми ячейками в столбце B, мы запустим цикл “для”.

Мы будем хранить значения ячеек столбца B от строки 2 до строки 1201 одну за другой в переменной s, чтобы манипулировать ими.

Нам нужно установить значение параметра переменная «Столбец» до 3, так как нам нужно написать разделенные именаРазделить именаРазделить имя в Excel относится к разделению имен на два отдельных столбца. Он разбивает все имя на имя, фамилию и отчество. Мы можем разделить имена, используя несколько способов, таких как «метод текста в столбец» и «метод формулы».

Если строка состоит только из одного слова, в строке нет пробела. Затем нам нужна сама строка в качестве вывода. Для этого зададим условие с помощью Оператор «если и еще» со знаком звездочки (обозначающим один или несколько символов) следующим образом:

Если в строке есть пробел, мы хотим разделить строку. Чтобы сделать то же самое, мы использовали функции INSTR и INSTRREV чтобы узнать первую и последнюю космические позиции соответственно. Это поможет нам найти первое и последнее слово в строке соответственно.

Функция INSTR принимает следующий аргумент:

Детали аргумента

Начинать: С какой позиции начинать.
Строка1: Нам нужно указать искомое строковое выражение.
Строка2: Нам нужно указать искомое строковое выражение.

По сравнению с методом VbCompareMethod: Указание метода сравнения. По умолчанию это бинарное сравнение.

Нам нужно использовать VBA ЛЕВЫЙ функция для извлечения левых символов из строки. Мы использовали ‘Последний космос-1‘, чтобы получить левые символы перед последним пробелом.

Мы должны использовать Функции ВПРАВО и ДЛИН. для извлечения правильных символов из строки после первого пробела.

Мы должны написать макрос. Теперь нам нужно запустить макрос с помощью F5 ключ.

Код:

Sub SplittingNames() Dim s As String Dim FirstSpace As Long Dim LastSPace As Long Dim LastRow As Long Dim Row As Long Dim Column As Long Sheet1.Range(“B1”).Select Selection.End(xlDown).Select LastRow = ActiveCell. Row For Row = 2 To LastRow s = Sheet1.Cells(Row, 2).Value Column = 3 If s Like “* *” Then FirstSpace = InStr(1, s, ” “) LastSPace = InStrRev(s, ” “) Sheet1.Cells(Row, Column).Value = Left(s, LastSPace – 1) Sheet1.Cells(Row, Column + 1).Value = Right(s, Len(s) – FirstSpace) Else Sheet1.Cells(Row, Column).Value = s End If Next End Sub

У нас уже есть результат.