Змест
Перадача даных на аснове крытэрыяў з аднаго аркуша на другі з'яўляецца адной з часта выконваемых задач у Excel. Калі ў вас шмат радкоў і вы жадаеце скапіяваць іх на іншы аркуш на аснове некаторых крытэраў, гэта можа быць вельмі стомна і заняць шмат часу. Але з Microsoft Visual Basic Application (VBA) вы можаце ствараць макрасы, з дапамогай якіх вы можаце лёгка капіяваць дадзеныя з аднаго аркуша на іншы на аснове розных крытэраў. У гэтым артыкуле я пакажу вам , як вы можаце скапіяваць радкі на іншы аркуш на аснове 2 розных тыпаў крытэрыяў з дапамогай Excel VBA .
Скажам, у вас ёсць наступны набор даных на працоўным аркушы з назвай « Даныя », дзе пазначаны продажы і зоны продажаў розных прадаўцоў. Цяпер вы хочаце скапіяваць пэўныя радкі на аснове некаторых крытэраў на іншым аркушы.
Спампаваць практычны сшытак
Капіраваць радкі на іншы аркуш. Працоўны аркуш на аснове Criteria.xlsm
2 спосабы капіявання радкоў у іншы аркуш на аснове крытэрыяў Excel VBA
1. Скапіруйце радкі ў іншы аркуш на аснове тэкставых крытэрыяў
У гэтай дэманстрацыі я пакажу вам, як вы капіруеце радкі з аднаго аркуша на іншы на аснове тэкставых крытэраў. Выкажам здагадку, што вы хочаце скапіяваць даныя прадаўцоў, якія прадаюць у Вірджыніі , на аркушы з назвай Здані ў рэгіёне з дапамогай Excel VBA . Каб зрабіць гэта, спачатку
➤ націсніце ALT+F11 , каб адкрыць акно VBA .
У VBA акно,
➤ Націсніце на ўкладку Уставіць і абярыце Модуль .
Гэта будзе адкрыйце акно Модуль (код) . Зараз,
➤ Устаўце наступны код у акно Module(Code) ,
4062
Код створыць макрас з назвай Copy_Criteria_Text , які будзе знайдзіце Вірджынію ў слупку C бягучага працоўнага аркуша і вярніце радкі, якія змяшчаюць Вірджынію ў працоўным аркушы з назвай Прадажы ў рэгіёне (Ліст3).
Пасля гэтага
➤ Зачыніце або згарніце акно VBA .
➤ Націсніце ALT+F8
Адкрыецца акно Macro .
➤ Выберыце Copy_Criteria_Text у полі Macro name і націсніце Run .
У выніку радкі з Вірджыніяй будуць скапіраваны ў працоўны аркуш з назвай Зданы ў рэгіёне
Дадатковая інфармацыя: Як аўтаматычна скапіяваць радкі ў Excel на іншы аркуш (4 метады)
2. Скапіруйце радкі на іншы аркуш на аснове лікавых крытэрыяў
Цяпер , я пакажу вам, як вы можаце скапіяваць радкі з аднаго аркуша на іншы на аснове лікавых крытэраў. Выкажам здагадку, што вы хочаце скапіяваць дадзеныя аб продажах, якія перавышаюць 100 000 долараў, на ліст з назвай Лепшыя продажу . Каб зрабіць гэта, спачатку
➤ націсніце ALT+F11 , каб адкрыць акно VBA .
У VBA акно,
➤ Націсніце на ўкладку Уставіць і абярыце Модуль .
Гэта адкрые Модуль (код) акно. Зараз,
➤ Устаўце наступны код у акно Module(Code) ,
2930
Код створыць макрас з назвай Copy_Criteria_Number , які будзе пошук значэнняў больш за 100000 у слупку D працоўнага аркуша з назвай Дадзеныя і вяртанне радкоў, якія змяшчаюць значэнні продажаў больш за 100000 долараў на працоўным аркушы з назвай Лепшыя продажу ( Аркуш4).
Пасля гэтага
➤ Зачыніце або згарніце акно VBA .
➤ Націсніце ALT+F8
Гэта адкрые акно Macro .
➤ Выберыце Copy_Criteria_Number у Macro name і націсніце Выканаць .
У выніку радкі, якія змяшчаюць значэнні продажаў больш за 100000 долараў ЗША, будуць скапіяваны ў Лепшыя продажу рабочы ліст.
Дадатковая інфармацыя: Як скапіяваць некалькі радкоў у Excel з дапамогай макраса (4 прыклады)
Выснова
З дапамогай двух метадаў гэтага артыкула вы зможаце капіяваць радкі з аднаго аркуша на іншы на аснове розных крытэраў з дапамогай Excel VBA. Вы можаце выкарыстоўваць першы метад для тэкставых крытэрыяў, а другі - для лікавых. Калі ў вас узнікла блытаніна адносна любога з метадаў, калі ласка, не саромейцеся пакідаць каментарый.
