Mündəricat
Biz Excel-də sətir nömrələrini bir çox yolla tapa bilərik, lakin VBA daha çox funksiya və fərdiləşdirmə təklif edir. Bununla biz sətir nömrələrini ağıllı yollarla tapa bilərik. Bu gün bu məqalə VBA-dan istifadə edərək Excel-də sıra nömrəsini tapmaq üçün 4 faydalı makro nümayiş etdirəcək.
Təcrübə İş Kitabını endirin
Siz pulsuz Excel iş kitabını buradan yükləyə bilərsiniz və müstəqil məşq edin.
VBA.xlsm istifadə edərək sətir nömrəsini tapın
Excel-də VBA dən istifadə edərək sətir nömrəsini tapmaq üçün 4 makro
Müxtəlif bölgələrdə bəzi satıcı satışlarını təmsil edən üsulları araşdırmaq üçün istifadə edəcəyimiz verilənlər bazamızla tanış olun.
Makro 1: Seçimi Dəyişdirməklə Sıra Nömrəsini Tapmaq üçün VBA
İlk olaraq Excel-də VBA hər hansı bir xana seçərək sıra nömrəsini tapmaq üçün makrodan istifadə edəcəyik. Bu o deməkdir ki, hər hansı bir istifadə olunan xananı seçsəniz, makro dərhal sıra nömrəsini göstərəcəkdir. Bunun üçün siz kodları modulda deyil, vərəqdə saxlamalı olacaqsınız.
Addımlar:
- Sağ- vərəq başlığına klikləyin və Kontekst menyusundan Kodu Baxın seçin.
- Sonra isə aşağıdakıları yazın. aşağıdakı kodlar-
9749
- Daha sonra kodları işə salmağa ehtiyac yoxdur, sadəcə vərəqinizə qayıdın.
Kod Bölgüsü:
- Əvvəlcə mən Şəxsi Alt proseduru yaratdım – İş vərəqi_SeçimiDəyişikliyi .
- Sonra Rnumber dəyişənini elan etdi tam .
- sətir aktiv xananın sıra nömrəsini təyin edəcək.
- Sonra İf ifadəsi yoxlayacaq boş olub-olmamasından asılı olmayaraq aktiv xananı göstərin və sonra MsgBox çıxışı göstərəcək.
- İndi sadəcə olaraq hər hansı bir istifadə edilmiş xananın üzərinə klikləyin və o sizə sıranı göstərəcək. nömrə.
Ətraflı oxuyun: Excel VBA: Sütunda sətir tapın və sətir nömrəsini qaytarın
Makro 2: VBA-dan istifadə edərək Aktiv Hüceyrənin Sıra nömrəsini tapın
Bu makro vərəqimizin müəyyən edilmiş xanasındakı aktiv xananın sıra nömrəsini qaytaracaq. Beləliklə, kodlarımızda iş vərəqinin adını və çıxış xanasını qeyd etməliyik. Burada çıxış xanası olaraq Cell D14 -dən istifadə edəcəyik.
Addımlar:
- ALT + F11
VBA pəncərəsini açmaq üçün.
- Sonra yeni modul daxil etmək üçün aşağıdakı kimi klikləyin: Daxil edin > Modul .
- Bundan sonra modulda aşağıdakı kodları yazın-
4281
- Sonra vərəqinizə qayıdın.
Kod bölgüsü:
- Burada , Aktiv_Cell() -in_Sıra_Nömrəsini_tapın Alt
- wSheet İş vərəqi
- kimi elan edilib Sonra Set ifadəsi aktiv xananı seçəcək
- Range çıxış xanasındakı sıra nömrəsini qaytaracaq.
- İndi xana seçin və aşağıdakı kimi klikləyin: Developer >Makroslar .
- Makro dialoq qutusunda göründükdən sonra sadəcə makro adını seçin və düyməsini basın. Çalışın .
Bir müddət sonra siz seçilmiş xananın sıra nömrəsinin çıxış xanamıza qaytarıldığını görəcəksiniz.
Görə bilərsiniz ki, B8 xanası seçilib, buna görə də 8 çıxışdır.
Ətraflı oxuyun: Excel-də cari xananın sətir sayını necə əldə etmək olar (4 sürətli üsul)
Oxşar oxunuşlar
- Satır nömrəsini Excel-də necə artırmaq olar Excel Formula (6 Faydalı Yol)
- Excel VBA ilə Aralıqdan Sətir Nömrəsini Alın (9 Nümunə)
- Satır nömrəsini necə qaytarmaq olar Excel-də Hüceyrə Uyğunluğu (7 Metod)
- Excel-də Hüceyrə Dəyərindən Sıra Nömrəsini Necə Almaq olar (5 Metod)
Makro 3: Dəyəri Uyğunlaşdıraraq Sətir Nömrəsini Tapmaq üçün VBA
Əgər siz dəyər axtararaq sıra nömrəsini tapmaq istəyirsinizsə, bu makro sizin üçündür. Siz aşağıdakı şəkildə göstərildiyi kimi kodlarda axtarış dəyərini və sütun nömrəsini qeyd etməli olacaqsınız.
Addımlar:
- Birincisini izləyin yeni modul daxil etmək üçün əvvəlki üsuldan iki addım .
- Sonra ona aşağıdakı kodları daxil edin-
3390
- Bundan sonra öz parametrinizə qayıdın. vərəq.
Kod bölgüsü:
- Burada Find_Row_Matching_a_Value() Alt
- Və wBook və wSheet kimi elan edilir İş vərəqi və fCell Range kimi elan edilir.
- wBook və wSheet quraşdırılıb ActiveWorkbook və ActiveSheet üçün.
- Const axtarış dəyəri üçün daxil olacaq.
- Daha sonra, Range qeyd olunan sütun vasitəsilə dəyəri axtaracaq.
- Sonra Əgər və Else ifadəsi MsgBox istifadə edərək nəticəni göstərəcək.
- Daha sonra Makro dialoq qutusunu açmaq üçün əvvəlki metoddan 5-ci addımı izləyin .
-
makrosun adı və sadəcə Çalışdır düyməsini basın.
Tezliklə bildiriş qutusu sizə sıra nömrəsini göstərəcək.
Ətraflı oxuyun: Excel VBA: Dəyərin Sətir sayını qaytarın (5 Uyğun Metod)
Makro 4: Sətir Nömrəsini Tapmaq üçün Düymə
Sonuncu metodumuzda biz sizə VBA makroslarından istifadə edərək sıra nömrəsini təyin etməyin ən ağıllı üsulunu göstərəcəyik. Bir düymə düzəldəcəyik və onunla bir makro təyin edəcəyik. Düyməni kliklədiyimiz zaman o, sıra nömrəsini istədiyimiz axtarış dəyərini daxil edə biləcəyimiz bir giriş qutusu açacaq. Əvvəlki makro qeyd olunan sütunda axtarış edə bilərdi, lakin bu makro vərəqin istənilən yerində istənilən sütunu axtara bilər.
Addımlar:
- Yenə də yeni modul daxil etmək üçün ikinci üsuldan ilk iki addımı izləyin .
- Sonra ona aşağıdakı kodları daxil edin-
8399
- Sonra geri qayıdın səninvərəq.
Kod bölgüsü:
- Əvvəlcə mən
Alt proseduru Find_Row_Number(). - Sonra iki dəyişən elan edildi, mValue String və sətir Range kimi .
- Daha sonra dəyər daxil etmək üçün InputBox -dən istifadə etdi.
- Daha sonra Set və If ifadəsi boş deyilsə, sıra nömrəsini tapacaq.
- Nəhayət, MsgBox çıxışı göstərəcək.
- Daha sonra üzərinə klikləyin. Tərtibatçı > Daxil et və sonra Forma İdarəetmələri bölməsindən Düymə komandasını seçin.
- Sonra kursorunuzla artı işarəsi alacaqsınız, istədiyiniz ölçüyə uyğun olaraq vərəqinizə klikləməklə istənilən yerə sürükləyin və sonra klikləməni buraxın.
- Mausu buraxdıqdan sonra avtomatik olaraq Makro Təyin et dialoq qutusu açılacaq.
- Kodlarda qeyd olunduğu kimi makrosun adını seçin.
- Sonra sadəcə OK düyməsini basın.
- Sonra, düyməni sağ klikləyin və Mətni redaktə et seçin. düymə adını redaktə etmək üçün.
- Düymənin adını yazın, sonra düymədən kənar hər hansı yerə klikləyin və ad dəyişdiriləcək.
- İndi düyməni basın, o, giriş qutusunu açacaq.
- Nəhayət, sadəcə axtarış dəyərini daxil edin və düyməsini basın. OK .
İndi baxın, uyğun gələnlərin sıra nömrəsini göstərirdəyər.
Ətraflı oxuyun: Sütunda sətir tapın və Excel-də sətir nömrəsini qaytarın (7 üsul)
Nəticə
Hamısı məqalə üçün. Ümid edirəm ki, yuxarıda təsvir olunan prosedurlar VBA-dan istifadə edərək Excel-də sıra nömrəsini tapmaq üçün kifayət qədər yaxşı olacaq. Şərh bölməsində hər hansı bir sual verməkdən çekinmeyin və mənə rəy bildirin. Ətraflı araşdırmaq üçün ExcelWIKI-yə daxil olun.