Мазмұны
Деректерді шешу , критерийлерге негізделген бір парақтан екіншісіне өту Excel бағдарламасында жиі орындалатын тапсырмалардың бірі болып табылады. Егер сізде жолдар көп болса және оларды кейбір критерийлер негізінде басқа параққа көшіргіңіз келсе, бұл өте шаршағыш және уақытты қажет етуі мүмкін. Бірақ Microsoft Visual Basic Application (VBA) көмегімен әртүрлі критерийлер негізінде деректерді бір парақтан екіншісіне оңай көшіруге болатын макростар жасауға болады. Бұл мақалада мен сізге , Excel VBA пайдалану арқылы 2 түрлі шарт түріне негізделген жолдарды басқа жұмыс парағына қалай көшіруге болатындығын көрсетемін.
Айталық, Сізде әртүрлі сатушының сату және сату аймақтары берілген « Деректер » деп аталатын жұмыс парағында келесі деректер жинағы бар. Енді басқа парақтағы кейбір критерийлерге негізделген нақты жолдарды көшіргіңіз келеді.
Жаттығу жұмыс кітабын жүктеп алу
Жолдарды басқасына көшіру Criteria.xlsm негізіндегі жұмыс парағы
Excel VBA шарты негізінде жолдарды басқа жұмыс парағына көшірудің 2 жолы
1. Мәтін критерийлері негізінде жолдарды басқа жұмыс парағына көшіру
Бұл демонстрацияда мен сізге мәтін критерийлері негізінде жолдарды бір жұмыс парағынан екіншісіне көшіру жолын көрсетемін. Excel VBA арқылы Виргиния де сататын сатушылардың деректерін Аумақты сату деп аталатын жұмыс парағына көшіргіңіз келеді делік. Ол үшін алдымен
➤ ALT+F11 пернелер тіркесімін басып, VBA терезесін ашыңыз.
VBA ішінде терезе,
➤ Кірістіру қойындысын басып, Модуль таңдаңыз.
Ол Модуль(Код) терезесін ашыңыз. Енді,
➤ Модуль(Код) терезесіне келесі кодты енгізіңіз,
5161
Код Критериалды_мәтінді көшіру атаулы макрос жасайды. Ағымдағы жұмыс парағының C бағанында Вирджинияны іздеңіз және Аумақты сату (парақ3) деп аталатын жұмыс парағында Вирджиния бар жолдарды қайтарыңыз.
Одан кейін
➤ VBA терезесін жабыңыз немесе кішірейтіңіз.
➤ ALT+F8
пернелерін басыңыз. Ол Макрос терезесін ашады.
➤ Макрос атауы жолағында Критерий_мәтінін көшіру тармағын таңдап, Орындау түймесін басыңыз.
Нәтижесінде Вирджиния бар жолдар Аумақты сату
деп аталатын жұмыс парағында көшіріледі.
Толығырақ: Excel бағдарламасындағы жолдарды басқа параққа автоматты түрде көшіру жолы (4 әдіс)
2. Сан критерийлері негізінде жолдарды басқа жұмыс парағына көшіру
Қазір , Мен бір жұмыс парағынан басқа жұмыс парағына жолдарды сандық критерийлер негізінде қалай көшіруге болатынын көрсетемін. Сіз $100000 асатын сатылымдар деректерін Үздік сатылымдар деп аталатын жұмыс парағына көшіргіңіз келеді делік. Ол үшін алдымен
➤ ALT+F11 пернелер тіркесімін басып, VBA терезесін ашыңыз.
VBA ішінде. терезесінде,
➤ Кірістіру қойындысын басып, Модуль тармағын таңдаңыз.
Ол <ашады. 1>Модуль(код) терезе. Енді,
➤ Модуль(Код) терезесіне келесі кодты енгізіңіз,
7331
Код Критерийлер_нөмірін көшіру атты макрос жасайды. Деректер деп аталатын жұмыс парағының D бағанында 100000-нан үлкен мәндерді іздеңіз және Үздік сатылымдар атты жұмыс парағында $100000 -ден асатын сату мәндерін қамтитын жолдарды қайтарыңыз ( Sheet4).
Одан кейін
➤ VBA терезесін жабыңыз немесе кішірейтіңіз.
➤ <пернесін басыңыз. 1>ALT+F8
Ол Макрос терезесін ашады.
➤ Макрос атауында Шарттар_санын көшіру таңдаңыз. 2>қорапшасын және Орындау түймесін басыңыз.
Нәтижесінде $100000-нан асатын сату мәндері бар жолдар <4 ішіне көшіріледі>Үздік сатылымдар жұмыс парағы.
Толығырақ оқу: Excel бағдарламасында макростарды пайдаланып бірнеше жолдарды көшіру жолы (4 мысал)
Қорытынды
Осы мақаланың екі әдісі арқылы Excel VBA арқылы әртүрлі шарттар негізінде бір жұмыс парағынан басқа жұмыс парағына жолдарды көшіруге болады. Бірінші әдісті мәтіндік критерийлер үшін, ал екінші әдісті сандық критерийлер үшін қолдануға болады. Егер сізде кез келген әдістерге қатысты шатасулар болса, пікір қалдырыңыз.