Mündəricat
Əgər siz VBA istifadə edərək dəqiq uyğunluğu tapmağın ən asan yollarını axtarırsınızsa, bu məqaləni faydalı tapa bilərsiniz. Beləliklə, məqaləyə başlayaq və dəqiq uyğunluğu tapmağın yolları ilə tanış olaq.
İş kitabını endirin
VBA Dəqiq Uyğunluğu tapın.xlsm
VBA-dan istifadə edərək Dəqiq Uyğunluğu Tapmağın 5 Yolu
Bəzi tələbələrin nəticələrinin qeydləri olan aşağıdakı cədvəldən istifadə etdim. Mən VBA-nın köməyi ilə bu cədvəldən istifadə edərək dəqiq uyğunluğu tapmağın müxtəlif yollarını izah edəcəyəm.
Bu məqsədlə mən Microsoft Excel 365 versiyasından istifadə etmişəm, siz istənilən digər versiyalardan istifadə edə bilərsiniz. rahatlığınıza uyğun olaraq.
Metod-1: Hüceyrə Aralığında Dəqiq Uyğunluğun Tapılması
Sətrin tam uyğunluğunu tapmaq istəyirsinizsə bir tələbənin adını və sonra bu tələbənin hüceyrə mövqeyini tapsanız, bu üsula əməl etməklə bunu edə bilərsiniz.
Burada mən üçün dəqiq uyğunluq tapacağam. “Joseph Micahel” adlı tələbə.
Addım-01 :
➤ Developer Tab>> Visual Basic Seçim
Sonra Visual Basic Redaktoru açılacaq.
➤ Daxil edin Tab>> Modul Seçim
Bundan sonra Modul yaradılacaq.
Addım-02 :
➤Aşağıdakı kodu yazın
4481
Burada “dəqiq uyğunluq” vərəq adıdır və “B5:B10” -dirtələbələrin adları diapazonu və “Joseph Michael” öyrənilməli olan tələbə adıdır.
rng diapazon obyekti kimi elan edilir və str axtaran elementin ünvanını saxlamaq üçün sətir dəyişəni kimi.
ƏGƏR ifadəsi elementin ünvanını str dəyişənə təyin edəcək.
➤ F5
Nəticə düyməsini basın:
Bundan sonra siz aşağıdakı Mesaj Qutusu “Joseph Michael” adlı tələbənin xana mövqeyini ehtiva edir .
Ətraflı oxu: Excel-də VBA ilə diapazonda tapın: Dəqiq və qismən uyğunluqlar daxil olmaqla
Metod-2: Dəqiq uyğunluğun tapılması və VBA-dan istifadə edərək əvəz edilməsi
Mən göstərəcəyəm göstərilən tələbənin adını tapmaq və sonra onu başqa bir adla əvəz etmək üçün bir yoldur, çünki bir növ səhvən bu ad burada yazılıb. Siz bu üsula əməl etməklə arzu etdiyiniz sətir tapıb onu əvəz edə bilərsiniz .
Addım-01 :
➤ Metod-1
8144
in Addım-01 ə əməl edin
Burada “tap və dəyişdir” vərəq adıdır və “B5:B10” şagirdlərin adlarının diapazonudur və “Donald Paul” öyrənilməli olan tələbənin adıdır və sonra “Henri Cekson” əvvəlkinin əvəzinə tələbənin adı olsun.
WITH ifadəsi hər ifadədə kod parçasının təkrarlanmasının qarşısını alacaq.
ƏĞER bəyanat təyin edəcəkelementin str dəyişənə ünvanını və DO döngəsi axtarış sözünün bütün təkrarlarını əvəz edəcək.
➤<1 düyməsini basın>F5
Nəticə :
Bundan sonra siz yeni tələbənin adını “Henry Jackson” olaraq alacaqsınız.
Metod-3: Dəqiq və böyük hərf-həssas uyğunluğun tapılması
Əgər hərf-həssas uyğunluq tapmaq istəyirsinizsə, bu üsula əməl edin. Burada, mənim bir-birinə bənzər iki ad var, lakin işdə fərq var və işdən asılı olaraq sonuncu tələbənin adını əvəz edəcəyəm.
Addım -01 :
➤ Metod-1-in Addım-01 ə əməl edin
6453
Burada, “həssas hərf” vərəqin adıdır və “B5:B10” şagirdlərin adlarının diapazonudur və “Donald Paul” öyrənilməli olan tələbənin adıdır və sonra “Henry Jackson” əvvəlki adın əvəzinə tələbənin adı olacaq.
WTH ifadəsi hər ifadədə kod parçasının təkrarlanmasının qarşısını alacaq.
ƏĞER ifadəsi elementin ünvanını str dəyişənə təyin edəcək və DO dövrəsi axtarış sözünün bütün təkrarlarını əvəz edəcək.
➤ F5
Nəticə düyməsini basın:
İndi işə görə, tələbənin adı “Henry Jackson” olaraq dəyişdiriləcək.
Oxşar Oxumalar:
- Excel-də VBA-dan istifadə edərək hüceyrədə sətirləri necə tapmaq olar (2 üsul)
- VBAExcel-də Sütunda tapın (7 yanaşma)
- Excel-də VBA ilə sətirləri necə tapmaq olar (8 Nümunə)
Metod-4: İstifadə InStr funksiyası
Fərz edək ki, siz Nəticə sütunundan asılı olaraq, Keçir və ya Uyğun gəlməyib şagirdlərin adlarına uyğunlaşdırmaq istəyirsiniz. 12>Uğur və ya Uğursuz yazıldı. Bu sətri Nəticə sütununda tapmaq və imtahandan keçmiş tələbələr üçün “Keçildi” Status sütununda yazmaq üçün <1-dən istifadə edə bilərsiniz>InStr funksiyası .
Addım-01 :
➤Follow Addım-01 Metod-1
7563
Burada xana diapazonu C5:C10 dir, bu da Nəticə sütunudur
InStr(xana. dəyəri, “Keçmə”) > 0 rəqəmin sıfırdan böyük olduğu şərtdir (xanada “Keçmə” olduqda) onda aşağıdakı sətir davam edəcək və bitişik xanada çıxışı Keçildi<2 kimi verəcəkdir>.
Şərt yalnış olarsa, xanada heç bir “Keçmə” yoxdur, o zaman ƏLSE altındakı sətir yerinə yetiriləcək və xanada çıxış dəyərini verəcəkdir. bitişik xana Boş kimi.
Bu dövrə hər bir xana üçün davam edəcək.
➤ F5
Nəticə :
Sonra siz keçən tələbələr üçün “Keçdi” statusunu alacaqsınız.
Metod-5: Dəqiq Uyğunluğun Tapılması və Məlumatların Çıxarılması
Əgər siz “Maykl Ceyms” adlı tələbə üçün müvafiq məlumatlar, onda siz bu metodu izləyə bilərsiniz.
Addım-01 :
➤ Metod-1-in Addım-01 nə əməl edin
7787
Burada mən B100 Aktiv olaraq istifadə etmişəm Vərəq Aralığı (istifadənizdən asılı olaraq istənilən diapazondan istifadə edə bilərsiniz).
InStr(1, Range(“B” & i), “Michael James”) > 0 B sütunundakı xanada Michael James -in olub olmadığını yoxlamaq üçün şərtdir.
Range("E" ” & icount & “:G” & icount) çıxış məlumatlarınızı istədiyiniz diapazondur və Range(“B” & i & “:D” & i).dəyər B sütunundan D -ə qədər olan dəyərləri verəcək.
➤ F5 düyməsini basın
Nəticə :
Daha sonra siz Michael James adlı tələbələr üçün aşağıdakı çıxarılmış məlumatları əldə edəcəksiniz.
Təcrübə Bölməsi
Özünüz təcrübə etmək üçün biz Təcrübə adlı vərəqdə aşağıdakı kimi Təcrübə bölməsini təqdim etmişik. . Zəhmət olmasa özünüz edin.
Nəticə
Bu məqalədə mən VBA
