VBA заменить строку
Excel VBA заменить строку
Заменить — это как функция рабочего листа, так и функция VBA. Эта функция помогает нам заменить конкретное слово из строки другой строкой. Она работает аналогично функции замены в VBA.
При работе с тестовой строкой или значениями текстовых данных очевидно, что нужно заменить или заменить что-то другим, объединить данные двух ячеек в одно или разделить данные одной ячейки на несколько элементов. Все это обычные задачи, которые мы выполняем изо дня в день на своем рабочем месте.
Итак, как заменить одно слово в строке другим словом? Например, если в этой строке есть строка «Индия — развивающаяся страна, а Индия — азиатская страна», нам нужно заменить слово «Индия» на «Бхарат».
Это возможно с помощью функции замены. В этой статье мы покажем вам, как заменить строки в Кодирование VBAКодирование VBAКод VBA относится к набору инструкций, написанных пользователем на языке программирования приложений Visual Basic в редакторе Visual Basic (VBE) для выполнения определенной задачи.читать далее.
Вы можете использовать это изображение на своем веб-сайте, в шаблонах и т. д. Пожалуйста, предоставьте нам ссылку на авторствоКак предоставить атрибуцию?Ссылка на статью должна быть гиперссылкой
Например:
Источник: Замена строки VBA (wallstreetmojo.com)
Заменить функцию
- Выражение: Это не что иное, как исходное строковое значение, из которого мы пытаемся что-то заменить чем-то. Например, ниже приведена строка выражения — «Индия — развивающаяся страна, а Индия — азиатская страна».
- Найти строку: Какую строку мы пытаемся заменить. Например, в Выражение строка, мы пытаемся заменить слово «Индия».
- Заменить строку: Какой замещающей строкой мы заменяем Найти строку с участием? Итак, в данном случае мы пытаемся заменить слово «Индия» на «Бхарат».
- [Start]: Это необязательный параметр. В приведенной выше строке (Выражение) у нас есть два слова «Индия», поэтому с какой позиции найти строку, нам нужно начать процесс замены. Например, если мы скажем 2, оно начнет заменять слово «Индия» со второй позиции и далее.
- [Count]: Если Найти строку появляясь несколько раз в Выражение, то сколько слов нам нужно заменить.
Например, если слово «Индия» появляется 5 раз и если вы укажете количество 3, то оно заменит только первые 3 слова «Индия».
Как заменить текст в строке с помощью VBA?
Пример №1
Теперь мы попробуем заменить слово «Индия» на «Бхарат» из приведенного ниже строкового значения.
«Индия — развивающаяся страна, а Индия — азиатская страна».
Во-первых, запустите Excel макросExcel макросМакрос в Excel представляет собой серию инструкций в виде кода, который помогает автоматизировать ручные задачи, тем самым экономя время. Excel выполняет эти инструкции шаг за шагом для заданных данных. Например, его можно использовать для автоматизации повторяющихся задач, таких как суммирование, форматирование ячеек, копирование информации и т. д., тем самым быстро заменяя повторяющиеся операции несколькими щелчками мыши.
читать далее процедура сейчас.
Код:
Sub Replace_Example() End Sub
Определите переменную VBAОпределите переменную VBAОбъявление переменной необходимо в VBA, чтобы определить переменную для определенного типа данных, чтобы она могла хранить значения; любая переменная, не определенная в VBA, не может содержать значения.читать далее как строка.
Код:
Sub Replace_Example() Dim NewString As String End Sub
В этой переменной мы покажем новое строковое значение после замены слова «Индия» на «Бхарат». Для этой переменной откройте функцию «Заменить».
Первый аргумент этой функции — «Выражение», т. е. из какой строки мы пытаемся заменить слово, поэтому скопируйте и вставьте строку «Индия — развивающаяся страна, а Индия — азиатская страна».
Следующий аргумент — «Найти строку», т. е. какое слово нужно заменить, т. е. «Индия».
Следующий аргумент — «Заменить строку», т. е. какой строкой нам нужно заменить слово «Индия», т. е. «Бхарат».
Хорошо, на данный момент игнорируйте оставшиеся аргументы. Теперь покажите результат в окне сообщения.
Код:
Sub Replace_Example() Dim NewString As String NewString = Replace("India is a developing country and India is the Asian Country", "India", "Bharath") MsgBox NewString End Sub
Давайте запустим код с помощью клавиши F5 или вручную и посмотрим на результат новой строки.
Хорошо, посмотрите на результат выше. Везде, где у нас было слово «Индия», оно было заменено словом «Бхарат».
Пример #2
Теперь мы увидим, как использовать тот же код с переменными. Посмотрите на приведенный ниже код.
Код:
Sub Replace_Example1() Dim NewString As String Dim MyString As String Dim FindString As String Dim ReplaceString As String MyString = "India is a developing country and India is the Asian Country" FindString = "India" ReplaceString = "Bharath" NewString = Replace(MyString, FindString, ReplaceString) MsgBox NewString End Sub
В приведенном выше коде я объявил три дополнительные переменные.
Dim MyString As String Dim FindString As String Dim ReplaceString As String
Для этих переменных я присвоил значения. Вместо того, чтобы поставлять Строка выражения, Найти строку и Заменить строку, мы будем предоставлять только переменную для функции замены.
Этот код также дает тот же результат, но с той лишь разницей, что мы использовали переменные вместо прямой передачи значений в функцию.
Пример №3
Предположим, вы хотите заменить слово «Индия» только со второй позиции, тогда нам нужно использовать параметр функции «Заменить». [“Start”]. Посмотрите на приведенный ниже код для вашей информации.
Код:
Sub Replace_Example2() Dim NewString As String Dim MyString As String Dim FindString As String Dim ReplaceString As String MyString = "India is a developing country and India is the Asian Country" FindString = "India" ReplaceString = "Bharath" NewString = Replace(MyString, FindString, ReplaceString, Start:=34) MsgBox NewString End Sub
Только одна дополнительная вещь, которую мы добавили из предыдущего кода, — это параметр «Пуск» со значением 34. Теперь запустите код и посмотрите результат.
Теперь мы можем видеть только строку после 34й символ строки с заменой «Индия» на «Бхарат».
Пример №4
Например, если мы хотим заменить только первое вхождение слова «Индия» на «Бхарат», нам нужно использовать [“Count”] параметр функции замены.
Ниже приведен код для вас.
Код:
Sub Replace_Example3() Dim NewString As String Dim MyString As String Dim FindString As String Dim ReplaceString As String MyString = "India is a developing country and India is the Asian Country" FindString = "India" ReplaceString = "Bharath" NewString = Replace(MyString, FindString, ReplaceString, Count:=1) MsgBox NewString End Sub
Запустите код вручную или через клавишу F5 и посмотрите результат.
Как вы можете видеть выше, он заменил только первое вхождение слова «Индия» на «Бхарат», а второе вхождение осталось прежним.
Что нужно помнить здесь
- Replace — это семейство строковых функций в VBA.
- В VBA функция замены заменяет все предоставленные слова замененной строкой, если параметр count не указан.
- Начальный параметр удалит количество предоставленных символов и покажет оставшийся результат.
УЗНАТЬ БОЛЬШЕ >>
