Уметање реда у ВБА се нешто разликује од уметања колоне у ВБА, у колонама смо користили целу методу колоне, али за уметање редова користимо методу радног листа са командом инсерт за уметање реда, такође пружамо референцу на ред где желимо да убацимо други ред сличан колонама.
Уметните ред помоћу ВБА Екцел-а
Све већину свих радњи које радимо у Екцелу можемо извршити са ВБА кодирањем. Можемо да копирамо, можемо да залепимо, можемо да избришемо и можемо да урадимо још много тога кроз ВБА језик. „Уметање реда“ је једна од таквих метода коју често радимо у екцелу. У овом чланку ћемо вам показати како се врши метода уметања реда у ВБА.
Како уметнути ред у Екцел ВБА?
Испод су наведени различити начини коришћења ВБА за уметање реда у екцел.
1. метод - Коришћење методе уметања
У ВБА, да бисмо уметнули ред, морамо да користимо сличну технику коју смо користили у радном листу Екцел. У ВБА морамо да користимо објект ранге да бисмо уметнули ред.
На пример, погледајте доњи код.
Шифра:
Суб ИнсертРов_Екампле1 () Опсег ("А1"). Убаци крај Суб
Овај код ће се померити низ ћелију А1 до Б1 и убацити једину ћелију.
То ће проузроковати толико проблема у погледу руковања подацима. Ово ће померити поменуту ћелију надоле, а сви остали придружени ступци остају исти.
2. метод - Коришћење целокупног својства реда
Горњи ред за уметање, заправо можемо да користимо неколико метода. Метод у наставку убациће цео ред изнад изабране ћелије.
Корак 1: Прво наведите адресу ћелије .
Шифра:
Суб ИнсертРов_Екампле2 () Опсег ("А1"). Енд Суб
Корак 2: Уместо да само користите, изаберите својство „ Цео ред “.
Шифра:
Суб ИнсертРов_Екампле2 () опсег ("А1"). ЕнтиреРов. Енд Суб
Корак 3: Након приступа целом својству реда, користите методу уметања .
Шифра:
Суб ИнсертРов_Екампле2 () опсег ("А1"). ЕнтиреРов.Инсерт Енд Суб
Ово ће уметнути ред изнад ћелије А1. Пошто је А1 први ред, помераће се низ А1 ћелију до Б1.
Као што можете на горњој слици, она мора да убаци цео ред, а не једну ћелију.
3. метод - Коришћење бројева редова
У горњем примеру, управо смо користили адресу једне ћелије и убацили ред. Међутим, можемо их уметнути и помоћу бројева редова.
Претпоставимо да желите да уметнете ред испод 5. реда. Прво морамо поменути бројеве редова помоћу објекта РАНГЕ.
Шифра:
Суб ИнсертРов_Екампле3 () Опсег ("6: 6"). Енд Суб
Пошто смо цео ред споменули као 6: 6, овде морамо да користимо својство Ентире Ров. Можемо директно да користимо методу „ИНСЕРТ“.
Шифра:
Суб ИнсертРов_Екампле3 () Распон ("6: 6"). Убаци крај Суб
Ово ће такође уметнути читав ред, а не једну ћелију.
У случају да желите да уметнете два реда испод петог реда, прво треба да одаберемо 2 реда, а затим да користимо методу ИНСЕРТ.
Суб ИнсертРов_Екампле3 () Распон ("6: 7"). Уметни крај Суб
Ово ће уметнути два реда испод 5. реда.
Овако, у радни лист можемо уметнути што више редова.
Метод # 4 - Коришћење својства активне ћелије
Својство Ацтиве Целл ВБА можемо користити за уметање редова. Активна ћелија није ништа друго до тренутно изабрана ћелија.
Претпоставимо да сте у ћелији Б5 и желите да уметнете горњи ред, можете да користите активно својство ћелије.
Суб ИнсертРов_Екампле4 () АцтивеЦелл.ЕнтиреРов.Инсерт Енд Суб
Ово ће уметнути ред изнад активне ћелије.
Метод 5 - Коришћење својства активне ћелије са функцијом померања
Претпоставимо да желите да уметнете ред након 2 реда активне ћелије, морамо да користимо функцију Оффсет да бисмо померили број редова.
Претпоставимо да сте у ћелији Б5.
Ако желите да уметнете ред након другог реда из активне ћелије, онда можемо користити доњи код.
Шифра:
Суб ИнсертРов_Екампле5 () АцтивеЦелл.Оффсет (2, 0) .ЕнтиреРов.Инсерт Енд Суб
Ово ће убацити ред након 6 у ог реда.
Уметните алтернативне редове
Уметање алтернативних редова често сам сретао много пута. За поглед на доњу слику података.
Сада треба да убацимо алтернативне редове. Морамо да користимо петље за уметање сваког алтернативног реда.
Шифра:
Суб ИнсертРов_Екампле6 () Дим К Ас Интегер Дим Кс Ас Интегер Кс = 1 Фор К = 1 То 4 Целлс (Кс, 1) .ЕнтиреРов.Инсерт Кс = Кс + 2 Нект К Енд Суб
Ово ће уметнути овакве редове.
Овде можете преузети овај ВБА Инсерт Ров Екцел. ВБА Уметните ред Екцел предлошка
