Када пишемо ВБА кодирање како бисмо се спасили од понављајућег рада, одабир података игра врло важну улогу. Дакле, у овом чланку ћете научити како да изаберете податке према подацима о редовима, колонама и целим документима кроз ВБА кодирање у програму Мицрософт Екцел.
Научићете:
- Како изабрати целу колону?
- Како одабрати цео ред?
- Како одабрати целе податке?
Како изабрати целу колону кроз ВБА?
Имамо податке у распону А1: Ц19, у којем колона А садржи Име, колона Б Пол и колона Ц Старост.
Да бисте изабрали целу колону А у овим подацима, следите доле наведене кораке и код:-
- Отворите ВБА страницу притисните тастер Алт+Ф11
- Уметните модул
- Напишите доле наведени код:
Под -ступац Одабир () Распон ("А1"). Цијела колона. Одаберите Крај под
- Притисните тастер Ф5 да бисте покренули макро у програму Екцел
- Биће изабрана колона А
Ако желите да се подаци изаберу до последње активне ћелије у колони, следите доле наведене кораке и код:-
- Напишите доле наведени код:-
Подколонаселецт () ластров = Радни листови ("Схеет1"). Ћелије (Ровс.цоунт, 1) .Енд (клУп) .Ров Ворксхеетс ("Схеет1"). Распон ("А1: А" & ластров). Одаберите Енд Суб
Код Објашњење:- Прво ћемо дефинисати шта ће бити последња активна ћелија у подацима, а затим последњи ред који ћемо користити за дефинисање опсега у кодирању.
- Притисните тастер Ф5 да бисте покренули макро у програму Екцел
- Колона А1: А19 ће бити изабрана
На овај начин помоћу ВБА можете изабрати код за избор колоне до последње активне ћелије. Када не знамо која је последња активна ћелија, можемо да користимо овај код при писању ВБА кода за избор у Мицрософт Екцел -у.
Како изабрати цео ред кроз ВБА?
Имамо податке у распону А1: Ц19, у којем колона А садржи Име, колона Б Пол и колона Ц Старост.
Да бисте изабрали цео ред у овим подацима, следите доле наведене кораке и код:-
- Отворите ВБА страницу притисните тастер Алт+Ф11
- Уметните модул
- Напишите доле наведени код:-
Подредовиселецт () Распон ("А2"). ЕнтиреРов. Одаберите Енд Суб
- Притисните тастер Ф5 да бисте покренули макро у програму Екцел
- Биће изабрана колона А
Ако желите да подаци буду изабрани до последње активне ћелије у реду, следите доле наведене кораке и код:-
- Напишите доле наведени код:-
Подред одабир () Затамни последњи ступац као дугачки последњи ступац = Радни листови ("Лист1"). Ћелије (1, Број колона.број). Крај (клТоЛефт). Радни листови колона ("Лист1"). Опсег ("А1", ћелије (1, последња колона) Одаберите Енд Суб
Код Објашњење: У овом коду смо прво дефинисали последњу колону, а затим ћемо то користити за дефинисање опсега.
- Притисните Ф5 да бисте покренули макро у програму Екцел
- Први ред ће бити одабран до последње активне ћелије у реду
На овај начин можемо изабрати цео ред или изабрати ред до последње активне ћелије у Мицрософт Екцелу кроз ВБА.
Како одабрати целе податке путем ВБА?
Узмимо пример и разумејмо:-
Имамо податке у распону А1: Ц19, у којем колона А садржи Име, колона Б Пол и колона Ц Старост.
Да бисте изабрали податке од прве до последње активне ћелије, следите доле наведене кораке и код:-
- Отворите ВБА страницу притисните тастер Алт+Ф11
- Уметните модул
- Напишите доле наведени код:
Подселекцијафластцелл () Затамњивање последње траке Дуго, последња колона Као дугачка последња = радни листови ("Лист 1"). Ћелије (Редови.број, 1). Крај (клУп). Ред последње колоне = Радни листови ("Лист 1"). Ћелије (1, Колоне .цоунт) .Енд (клТоЛефт). Радни листови колона ("Схеет1"). Распон ("А1", ћелије (ластров, ластцолумн)). Изаберите Енд Суб
Код Објашњење: Прво смо дефинисали назив предмета кода, затим смо дефинисали све променљиве. Затим смо дефинисали који би био наш последњи ред и последња колона.
- Притисните тастер Ф5 да бисте покренули Макро у програму Екцел
- На радном листу ће бити изабрани сви подаци
Сада, ако желите да копирате исте податке и залепите их, користите доленаведени код:-
Подселекција фластцелл () Затамњивање последње траке Дуго, последња колона Као дугачка последња = радни листови ("Лист 1"). Ћелије (Редови.број, 1). Крај (клУп). Ред последње колоне = Радни листови ("Лист 1"). Ћелије (1, Колоне .цоунт) .Енд (клТоЛефт) .Цолумн Ворксхеетс ("Схеет1"). Ранге ("А1", Целлс (ластров, ластцолумн)). Цопи Схеетс ("Схеет2"). Ранге ("А1") Енд Суб
Покрените код. Сви подаци ће се копирати и залепити у схеет2.
Ово је начин на који можемо написати макро за одабир података од прве ћелије до задње активне ћелије, а затим залијепити у други лист у Мицрософт Екцелу.
Ако вам се допадају наши блогови, поделите их са пријатељима на Фацебооку. Такође нас можете пратити на Твиттер -у и Фацебоок -у.
Волели бисмо да чујемо од вас, реците нам како можемо побољшати, допунити или иновирати наш рад и учинити га бољим за вас. Пишите нам на веб локацији е -поште.