Բովանդակություն
Տվյալների հաղթահարումը , որը հիմնված է չափանիշների վրա, մեկ թերթիկից մյուսը Excel-ում հաճախակի կատարվող խնդիրներից է: Եթե դուք ունեք շատ տողեր և ցանկանում եք դրանք պատճենել մեկ այլ թերթիկի վրա՝ հիմնվելով որոշ չափանիշների վրա, դա կարող է բավականին հոգնեցուցիչ և ժամանակատար լինել: Սակայն Microsoft-ի Visual Basic հավելվածի (VBA) միջոցով դուք կարող եք ստեղծել մակրոներ, որոնց միջոցով կարող եք հեշտությամբ պատճենել տվյալները մի թերթից մյուսը՝ տարբեր չափանիշների հիման վրա: Այս հոդվածում ես ձեզ ցույց կտամ , թե ինչպես կարող եք պատճենել տողերը մեկ այլ աշխատանքային թերթում՝ 2 տարբեր տեսակի չափանիշների հիման վրա՝ օգտագործելով Excel VBA :
Եկեք ասենք. դուք ունեք հետևյալ տվյալների հավաքածուն « Տվյալներ » անունով աշխատաթերթում, որտեղ ներկայացված են տարբեր վաճառողների վաճառքի և վաճառքի ոլորտները: Այժմ դուք ցանկանում եք պատճենել որոշակի տողեր՝ հիմնվելով որոշ չափանիշների վրա մեկ այլ թերթում:
Ներբեռնեք պրակտիկայի աշխատանքային գիրքը
Պատճենել տողերը մեկ այլ թերթիկի վրա: Աշխատանքային թերթ՝ հիմնված Criteria.xlsm-ի վրա
2 եղանակներ պատճենելու տողերը մեկ այլ աշխատաթերթում՝ հիմնված չափանիշների վրա Excel VBA-ի միջոցով
1. Պատճենել տողերը մեկ այլ աշխատաթերթում՝ տեքստի չափանիշների հիման վրա
Այս ցուցադրության ժամանակ ես ձեզ ցույց կտամ, թե ինչպես եք պատճենում տողերը մի աշխատաթերթից մյուսը՝ տեքստային չափանիշների հիման վրա: Ենթադրենք, դուք ցանկանում եք պատճենել Վիրջինիայում վաճառող վաճառողների տվյալները Տարածքային վաճառք անունով աշխատանքային թերթում՝ օգտագործելով Excel VBA : Դա անելու համար նախ
➤ սեղմեք ALT+F11 VBA պատուհանը բացելու համար:
VBA-ում: պատուհան,
➤ Սեղմեք Տեղադրեք ներդիրը և ընտրեք Մոդուլ :
Այն կկատարվի բացեք Module(Code) պատուհանը: Այժմ,
➤ Տեղադրեք հետևյալ կոդը Module(Code) պատուհանում,
4654
Կոդը կստեղծի մակրո անունով Copy_Criteria_Text , որը կստեղծի որոնեք Վիրջինիան ընթացիկ աշխատաթերթի C սյունակում և վերադարձրեք այն տողերը, որոնք պարունակում են Վիրջինիա աշխատաթերթում, որը կոչվում է Տարածքների վաճառք (Թերթ3):
<3:>
Դրանից հետո,
➤ Փակեք կամ նվազագույնի հասցրեք VBA պատուհանը:
➤ Սեղմեք ALT+F8
Այն կբացի Macro պատուհանը:
➤ Ընտրեք Copy_Criteria_Text Macro name վանդակում և սեղմեք Run :
Արդյունքում Վիրջինիայի հետ տողերը կպատճենվեն Տարածքային վաճառք
Կարդալ ավելին. Ինչպես ինքնաբերաբար պատճենել տողերը Excel-ում մեկ այլ թերթիկի վրա (4 մեթոդ)
2. Պատճենել տողերը մեկ այլ աշխատաթերթի վրա՝ հիմնվելով թվերի չափանիշների վրա
Այժմ , ես ձեզ ցույց կտամ, թե ինչպես կարող եք պատճենել տողերը մի աշխատաթերթից մյուս աշխատաթերթ՝ թվային չափանիշների հիման վրա: Ենթադրենք, դուք ցանկանում եք պատճենել 100000 դոլարից ավելի վաճառքի տվյալները Top Sales անունով աշխատաթերթում: Դա անելու համար նախ
➤ սեղմեք ALT+F11 VBA պատուհանը բացելու համար:
VBA պատուհան,
➤ Սեղմեք Տեղադրեք ներդիրը և ընտրեք Մոդուլ :
Այն կբացի Մոդուլ (կոդ) պատուհան. Այժմ,
➤ Տեղադրեք հետևյալ կոդը Module(Code) պատուհանում,
2216
Կոդը կստեղծի մակրո անունով Copy_Criteria_Number , որը կստեղծի որոնեք 100000-ից մեծ արժեքներ Տվյալներ անվանմամբ աշխատաթերթի D սյունակում և վերադարձրեք տողերը, որոնք պարունակում են $100000-ից ավելի վաճառքի արժեքներ Վաճառքների ամենավերջին ( Sheet4).
Դրանից հետո
➤ Փակեք կամ նվազագույնի հասցրեք VBA պատուհանը:
➤ Սեղմեք ALT+F8
Այն կբացի Macro պատուհանը:
➤ Ընտրեք Copy_Criteria_Number Macro name վանդակում և սեղմեք Գործարկել :
Արդյունքում, $100000-ից ավելի վաճառքի արժեքներ պարունակող տողերը պատճենվելու են Top Sales worksheet:
Կարդալ ավելին. Ինչպես պատճենել բազմաթիվ տողեր Excel-ում մակրոյով (4 օրինակ)
Եզրակացություն
Այս հոդվածի երկու մեթոդներով դուք կկարողանաք պատճենել տողերը մեկ աշխատաթերթից մյուս աշխատաթերթ՝ տարբեր չափանիշների հիման վրա՝ օգտագործելով Excel VBA: Դուք կարող եք օգտագործել առաջին մեթոդը տեքստի չափանիշների համար, իսկ երկրորդ մեթոդը թվային չափանիշների համար: Եթե որևէ մեթոդի վերաբերյալ որևէ տարակուսանք ունեք, խնդրում ենք ազատ զգալ թողնել մեկնաբանություն:
