Екцел ВБА Ресизе
Промена величине је својство доступно у ВБА да по потреби мења или мења опсег ћелија из активне ћелије. На пример, претпоставимо да сте у ћелији Б5, а из ове ћелије, ако желите да изаберете 3 реда и две колоне, можемо променити величину опсега помоћу својства РЕСИЗЕ ВБА.
Синтакса својства ВБА за промену величине
Испод је синтакса својства ВБА РЕСИЗЕ.
Опсег (). Промени величину ((величина реда), (величина колоне))Прво, морамо да одредимо из које ћелије треба да променимо величину помоћу објекта Ранге .
Затим користите својство екцел ВБА Ресизе , а у овом својству морамо да наведемо ограничење величине реда и ограничење величине колоне . На основу пружених бројева редова и бројева колона, она ће јој променити величину.
Примери коришћења Ресизе у ВБА
Испод су примери употребе промене величине у екцелу ВБА.
Пример # 1
Претпоставимо да имате податке од А1 до Б14 ћелије, а од А1 ћелије, ако желите да одаберете 3 реда надоле и две колоне леви опсег, то можемо да урадимо помоћу својства РЕСИЗЕ у програму Екцел ВБА.
Испод су подаци које користимо за овај пример.
Прво, морамо да наведемо прву референтну или полазну тачку ћелије помоћу објекта РАНГЕ. У овом примеру, почетна тачка је ћелија А1.
Шифра:
Суб Ресизе_Екампле () опсег ("А1"). Енд Суб
За овај опсег користите својство РЕСИЗЕ.
Шифра:
Суб Ресизе_Екампле () опсег ("А1"). Ресизе (Енд Суб
Први аргумент РЕСИЗЕ је величина реда, па треба да изаберемо 3 реда података и наведемо нумеричку вредност 3.
Шифра:
Суб Ресизе_Екампле () Распон ("А1"). Величина (3, Крај Суб
Следећи аргумент је Величина колоне за ово, унесите начин на који треба да одаберете колоне. Унећу 3 колоне.
Шифра:
Суб Ресизе_Екампле () Опсег ("А1"). Ресизе (3,3) Крај Суб
Једном када је промена величине завршена, морамо да пружимо шта треба да радимо са овим опсегом. Само ћу одабрати методу „Селецт“ за почетак.
Шифра:
Суб Ресизе_Екампле () Ранге ("А1"). Ресизе (3, 3). Изаберите Енд Суб
Покрените код и погледајте колико редова и колико колона би изабрао.
Као што видите горе из ћелије А1, изабрала је три реда надоле и три колоне удесно.
Пример # 2
Сада погледајте доле наведени ВБА код.
У горе код за Ров Сизе, ми смо добили празне ћелије, а за величину, ми смо добили 3.
Шифра:
Суб Ресизе_Екампле () Ранге ("А1"). Ресизе (0, 3). Изаберите Енд Суб
Покрените код и погледајте колико редова и колико колона би изабрао.
Као што видите, изабрао је само активни ред ћелије, тј. 1. ред и три колоне. То је зато што смо за величину реда обезбедили празне ћелије, а за величину колоне 3, и сходно томе одабрао је опсег података.
Сада погледајте доњи код.
Шифра:
Суб Ресизе_Екампле () Ранге ("А1"). Ресизе (3) .Одаберите Енд Суб
What this code will do is it will select only three rows, including the active cell row but no extra columns.
Example #3
Use Resize To Select Unknown Ranges. Resize is best utilized when you want to select an unknown range of cells. For example, look at the below image of the data range.
It has data all the ways from Column A to Column P and row-wise we have up until the 700th row.
Assume you know your data will keep changing, and you want to select the data range every now and then by manually changing the row and column number. However, by using VBA RESIZE property, we can do this easily.
Look at the below code.
Code:
Sub Resize_Example1() Dim LR As Long Dim LC As Long Worksheets("Sales Data").Select LR = Cells(Rows.Count, 1).End(xlUp).Row LC = Cells(1, Columns.Count).End(xlToLeft).Column Cells(1, 1).Resize(LR, LC).Select End Sub
First, I have declared two variables to find the last used row (LR) and the last used column (LC).
Dim LR As Long Dim LC As Long
Since our data is in the worksheet named “Sales Data,” we are choosing this worksheet by using the below code.
Worksheets(“Sales Data”).Select
Now below code will find the last used row and last used column.
LR = Cells(Rows.Count, 1).End(xlUp).Row
LC = Cells(1, Columns.Count).End(xlToLeft).Column
Сада из прве ћелије мењамо величину опсега од последњег коришћеног реда до последње коришћене колоне и изабрана метода је коришћена. Дакле, сада није важно колики су ваши подаци. Динамички ће одабрати податке проналажењем последњег коришћеног реда и последње коришћене колоне.
Ствари које треба запамтити
- Својство промене величине у ВБА ће променити величину опсега од активне ћелије (укључујући и активну ћелију).
- Само треба да наведемо колико редова и колико колона треба променити из активне ћелије у ВБА.
- Не можемо користити негативни број реда и колоне за својство РЕСИЗЕ.
