Mündəricat
Məlumatların öhdəsindən gəlmək , meyarlara əsaslanaraq bir vərəqdən digərinə Excel-də tez-tez görülən tapşırıqlardan biridir. Əgər çoxlu sətirləriniz varsa və onları bəzi meyarlara əsasən başqa vərəqə köçürmək istəyirsinizsə, bu, olduqca yorucu və vaxt aparan ola bilər. Lakin Microsoft Visual Basic Application (VBA) ilə siz müxtəlif meyarlar əsasında məlumatları bir vərəqdən digərinə asanlıqla köçürə biləcəyiniz makrolar yarada bilərsiniz. Bu məqalədə mən sizə göstərəcəyəm ki, Excel VBA -dan istifadə etməklə sətirləri 2 müxtəlif növ meyar əsasında başqa iş vərəqinə necə kopyalaya bilərsiniz.
Deyək ki, müxtəlif satıcıların satış və satış sahələrinin verildiyi “ Data ” adlı iş vərəqində aşağıdakı verilənlər toplusuna sahibsiniz. İndi bəzi kriteriyalara əsaslanan xüsusi cərgələri başqa vərəqdə köçürmək istəyirsiniz.
Təcrübə İş Kitabını endirin
Satırları Başqasına Kopyalayın Criteria.xlsm əsasında iş vərəqi
Excel VBA kriteriyalarına əsasən sətirləri başqa bir işçi vərəqə kopyalamağın 2 yolu
1. Mətn meyarlarına əsasən sətirləri başqa bir işçi vərəqə kopyalayın
Bu nümayişdə mən sizə mətn meyarlarına əsasən sətirləri bir iş vərəqindən digərinə necə köçürdüyünüzü göstərəcəyəm. Tutaq ki, siz Virciniya da satış edən satıcıların məlumatlarını Excel VBA istifadə edərək Sahə Satışları adlı iş vərəqinə köçürmək istəyirsiniz. Bunu etmək üçün əvvəlcə
➤ ALT+F11 düymələrini basaraq VBA pəncərəsini açın.
VBA-da pəncərə,
➤ Daxil et tabına klikləyin və Modul seçin.
O, Module(Kod) pəncərəsini açın. İndi,
➤ Aşağıdakı kodu Module(Kod) pəncərəsinə daxil edin,
5834
Kod, Kriteriya_Mətnini Kopyala adlı makro yaradacaq. Cari iş vərəqinin C sütununda Virciniya axtarın və Sahə Satışı (Cədvəl3) adlı iş vərəqində Virginia ehtiva edən sətirləri qaytarın.
Bundan sonra
➤ VBA pəncərəsini bağlayın və ya minimuma endirin.
➤ ALT+F8
düymələrini basın. O, Makro pəncərəsini açacaq.
➤ Makronun adı xanasında Kriteriya_Mətnini Kopyala seçin və Çalışdır üzərinə klikləyin.
Nəticədə Virciniya ilə sətirlər Sahə Satışları
adlı iş vərəqinə kopyalanacaq.
Ətraflı oxuyun: Excel-də sətirləri avtomatik olaraq başqa bir vərəqə necə kopyalamaq olar (4 üsul)
2. Sayı meyarlarına əsasən sətirləri başqa bir iş vərəqinə kopyalayın
İndi , Mən sizə rəqəm meyarlarına əsasən bir iş vərəqindən digər iş vərəqinə sətirləri necə köçürə biləcəyinizi göstərəcəyəm. Tutaq ki, siz $100000-dən çox olan satış məlumatlarını Ən Yaxşı Satışlar adlı iş vərəqinə köçürmək istəyirsiniz. Bunu etmək üçün əvvəlcə
➤ VBA pəncərəsini açmaq üçün ALT+F11 düymələrini basın.
VBA -də pəncərəsində,
➤ Daxil et tabına klikləyin və Modulu seçin.
➤ Aşağıdakı kodu Module(Kod) pəncərəsinə daxil edin,
2181
Kod, Kriteriya_Nömrəsini Kopyala adlı makro yaradacaq. Data adlı iş vərəqinin D sütununda 100000-dən böyük dəyərləri axtarın və Ən Yaxşı Satışlar adlı iş vərəqində 100000$-dan çox satış dəyəri olan sətirləri qaytarın ( Cədvəl4).
Bundan sonra
➤ VBA pəncərəsini bağlayın və ya minimuma endirin.
➤
O, Makro pəncərəsini açacaq.
➤ Makro adında Kriteriya_Nömrəsini Kopyala seçin. 2>qutusu və Çalışdır üzərinə klikləyin.
Nəticədə, 100000$-dan çox satış dəyəri olan sətirlər <4-ə kopyalanacaq>Ən çox satış iş vərəqi.
Ətraflı oxuyun: Makrodan istifadə edərək Excel-də birdən çox sətirləri necə kopyalamaq olar (4 Nümunə)
Nəticə
Bu məqalənin iki üsulu ilə siz Excel VBA-dan istifadə edərək müxtəlif kriteriyalar əsasında bir iş vərəqindən digər iş vərəqinə sətirləri köçürə biləcəksiniz. Mətn meyarları üçün birinci üsuldan, nömrə meyarları üçün ikinci üsuldan istifadə edə bilərsiniz. Metodlardan hər hansı biri ilə bağlı hər hansı bir çaşqınlığınız varsa, lütfən şərh yazmaqdan çekinmeyin.