Намерете и заменете функцията във VBA
Ако вашата работа на excel включва рутинни задачи за намиране на нещо и замяната му с нещо, тогава тази статия ви трябва на всяка цена. Защото след като прочетете тази статия, вероятно бихте спестили 80% от времето си, като научите тази техника за кодиране на VBA. Find and Replace в Excel е често използван инструмент и ние можем да приложим същото и с VBA. В по-ранната ни статия „VBA Find“ ви показахме как да използвате метода FIND във VBA. В тази статия ще ви покажем как да използвате метода на VBA „Намиране и замяна“.
Следвайте статията, за да научите тази техника.
VBA Намерете и заменете синтаксиса
За да използваме метода Find and Replace във VBA, трябва да следваме дадените по-долу стъпки. Първо, ние избрахме обхвата на клетките, така че споменете обхвата на клетките, като използвате RANGE обект във VBA.
Сега поставете точка (.), За да видите списъка IntelliSense.
Изберете метода Замяна от списъка.
Можем да видим огромния списък с параметри на метода Replace. Сега ще видим обяснението на всеки параметър по-долу.
- Какво: Това не е нищо друго освен това, което трябва да намерим, за да заместим стойността.
- Замяна: С намерената стойност, каква трябва да бъде новата стойност, която трябва да бъде заменена.
- Погледнете: Това е да споменем дали искаме да разгледаме цялото съдържание или само частта от него. Тук можем да предоставим два параметъра „xlWhole“ и „xlPart.“
- Ред за търсене: Това е да се спомене реда за търсене, или редове, или колони. Тук можем да предоставим два параметъра „xlByRows“ и „xlByColumns.“
- Match Case: Съдържанието, което търсим, е чувствително към малки или големи букви. Ако аргументът с чувствителност към главни букви е TRUE или FALSE.
- Формат за търсене: Можем също да търсим в съдържанието чрез форматиране на търсената стойност.
- Замяна на формат: Можем да заменим един формат и с друг формат.
Примери за VBA Find and Replace в Excel
По-долу са дадени някои примери за метода на Excel VBA Find and Replace.
Пример # 1 - VBA Намерете и заменете думата
Добре, нека разгледаме следния пример, за да разберем метода за намиране и замяна на VBA. Разгледайте следните данни.
Стъпка 1: Първо споменете диапазона от клетки, които заместваме. В този пример Range е от A1 до B15, така че кодът ще бъде Range (“A1: B15”).
Код:
Sub Replace_Example1 () Обхват ("A1: B15") Край Sub
Стъпка 2: Сега поставете точка, за да видите списъка IntelliSense.
Стъпка 3: Изберете метода Replace от списъка IntelliSense.
Стъпка 4: Споменете какъв параметър е „Септември“.
Код:
Обхват ("A1: B15"). Заменете какво: = "септември"
Стъпка 5: След това „Замяна с параметър“ трябва да бъде новата ни стойност, която заместваме с т.е.
Код:
Обхват ("A1: D4"). Заменете какво: = "септември", заместване: = "декември"
Добре, от сега игнорирайте всички останали параметри. Сега стартирайте VBA кода, за да видите метода на замяна с VBA.
И така, той замени целия септември с думата „декември“.
Пример # 2 - Замяна с разбивка на главни букви
По-усъвършенстваният пример за метода за намиране и замяна на VBA ще използва метода на замяна, чувствителен към малки и големи букви. За този пример създадох тези примерни данни, както е показано на изображението по-долу.
Имаме две клетъчни данни с главни букви „ЗДРАВЕ“. Където и да е с главна буква „ЗДРАВЕЙТЕ“, тя трябва да бъде заменена с новата дума „Hiii“.
Както обикновено, напишете кода, споменете какво да намерите и какво да замените първо.
Код:
Sub Replace_Example2 () Range ("A1: D4"). Replace What: = "HELLO", Replacement: = "Hiii" End Sub
Сега за следващия аргумент „Match Case“ напишете условието като TRUE.
Код:
Обхват ("A1: D4"). Заменете какво: = "HELLO", заместване: = "Hiii", MatchCase: = True
Сега стартирайте кода. Той ще замени само столицата „HELLO“ с „Hiii“.
Представете си, че не сте приложили аргумента Match Case във VBA, тогава той ще замени всички „Здравейте“ на „Hiii“.
Забележка: Премахнах аргумента Match Case тук. По подразбиране стойността на аргумента MATCH CASE е FALSE.
Както виждаме на горното изображение, той замени всички „здравей“ думи на „hiii“.
Така че, винаги, когато искаме да използваме критерии MATCH CASE, трябва да приложим аргумента като „TRUE“ и по подразбиране тази стойност на аргумента е „FALSE“. По този начин можем да използваме метода „FIND & REPLACE“, за да намерим нещо и да заменим намерената стойност с нещо друго.
