ВБА^(VBA) је већ дуги низ година део Мицрософт Оффице^{(Microsoft Office)} пакета. Иако нема пуну функционалност и моћ пуне ВБ апликације, ВБА^(VBA) пружа корисницима Оффицеа флексибилност да интегришу ^(Office)Оффице^(Office) производе и аутоматизују посао који обављате у њима.

Један од најмоћнијих алата доступних у ВБА^(VBA) -у је могућност учитавања читавог низа података у једну променљиву која се зове низ. Учитавањем података на овај начин, можете манипулисати или вршити прорачуне на том опсегу података на различите начине.

Дакле, шта је ВБА^(VBA) низ? У овом чланку ћемо одговорити на то питање и показати вам како да га користите у сопственој ВБА скрипти^{(your own VBA script)} .

Шта је ВБА низ?

Коришћење ВБА^(VBA) низа у Екцел^(Excel) -у је веома једноставно, али разумевање концепта низова може бити мало сложено ако га никада нисте користили.

Замислите^(Think) низ као кутију са секцијама унутар њега. Једнодимензионални низ је кутија са једном линијом секција. Дводимензионални низ је кутија са две линије секција.

Можете ставити податке у сваки одељак ове „кутије“ било којим редоследом који желите.

На почетку ваше ВБА^(VBA) скрипте, морате да дефинишете ову „кутију“ тако што ћете дефинисати свој ВБА^(VBA) низ. Дакле, да бисте креирали низ који може да садржи један скуп података (једнодимензионални низ), написали бисте следећи ред.

Dim arrMyArray(1 To 6) As String

Касније у свом програму, можете поставити податке у било који одељак овог низа позивајући се на одељак унутар заграда.

arrMyArray(1) = "Ryan Dube"

Можете креирати дводимензионални низ користећи следећи ред.

Dim arrMyArray(1 To 6,1 to 2) As Integer

Први број представља ред, а други колону. Дакле, горњи низ може да садржи опсег са 6 редова и 2 колоне.

Можете учитати било који елемент овог низа подацима на следећи начин.

arrMyArray(1,2) = 3

Ово ће учитати 3 у ћелију Б1.

Низ може да садржи било коју врсту података као редовну променљиву, као што су стрингови, логичке вредности, цели бројеви, флоат и још много тога.

Број унутар заграде такође може бити променљива. Програмери обично користе петљу^(Loop) за пребројавање свих делова низа и учитавање ћелија података у табели у низ. Видећете како то да урадите касније у овом чланку.

Како програмирати ВБА низ у Екцелу

Хајде да погледамо једноставан програм где ћете можда желети да учитате информације из табеле у вишедимензионални низ.

Као пример, погледајмо табелу продаје производа, где желите да извучете име продајног представника, ставку и укупну продају из табеле.

Имајте на уму да у ВБА^(VBA) када упућујете на редове или колоне, бројите редове и колоне^{(rows and columns)} почевши од горњег левог од 1. Дакле, колона понављања је 3, колона ставке је 4, а укупна колона је 7.

Да бисте учитали ове три колоне у свих 11 редова, мораћете да напишете следећу скрипту.

Dim arrMyArray(1 To 11, 1 To 3) As String
Dim i As Integer, j As Integer

For i = 2 To 12
   For j = 1 To 3
      arrMyArray(i-1, j) = Cells(i, j).Value
   Next j
Next i

Приметићете да да бисте прескочили ред заглавља, број реда у првом Фор лооку мора да почиње са 2 уместо 1. То значи да морате да одузмете 1 за вредност реда низа када учитавате вредност ћелије у низ користећи ћелије^(Cells) (и, ј).Вредност.

Где да уметнете своју ВБА скрипту низа^{(Your VBA Array Script)}

Да бисте програмирали ВБА^(VBA) скрипту у Екцел^(Excel) , потребно је да користите ВБА^(VBA) едитор. Овоме можете приступити тако што ћете изабрати мени за програмере и изабрати ^(Developer)Прикажи код^{(View Code)} у одељку Контроле^(Controls) на траци.

Ако не видите Програмер^(Developer) у менију, мораћете да га додате. Да бисте то урадили, изаберите Датотека^(File) и Опције^(Options) да бисте отворили прозор са опцијама програма Екцел.

Промените команде избора из падајућег менија у Све команде^{(All Commands)} . Изаберите Програмер^(Developer) из левог менија и изаберите дугме Додај^(Add) да бисте га преместили у окно са десне стране. Означите поље за потврду да бисте га омогућили и изаберите ОК^(OK) да бисте завршили.

Када се отвори прозор уређивача кода^{(Code Editor)} , проверите да ли је лист у коме се налазе ваши подаци изабран у левом окну. Изаберите Радни лист^(Worksheet) у левом падајућем менију и Активирај^(Activate) у десном. Ово ће креирати нови потпрограм под називом Ворксхеет_Ацтивате^{(Worksheet_Activate)} ().

Ова функција ће се покренути сваки пут када се отвори датотека табеле. Налепите код у окно скрипте унутар овог потпрограма.

Ова скрипта ће радити кроз 12 редова и учитаће име представника из колоне 3, ставку из колоне 4 и укупну продају из колоне 7.

Када се заврше обе Фор петље, дводимензионални низ аррМиАрраи садржи све податке које сте навели са оригиналног листа.

Манипулисање низовима у Екцел ВБА

Рецимо да желите да примените порез на промет од 5% на све коначне продајне цене, а затим упишете све податке на нови лист.

То можете да урадите додавањем још једне Фор петље после прве, са командом за писање резултата на нови лист.

For k = 2 To 12
   Sheets("Sheet2").Cells(k, 1).Value = arrMyArray(k - 1, 1)
   Sheets("Sheet2").Cells(k, 2).Value = arrMyArray(k - 1, 2)
   Sheets("Sheet2").Cells(k, 3).Value = arrMyArray(k - 1, 3)
   Sheets("Sheet2").Cells(k, 4).Value = arrMyArray(k - 1, 3) * 0.05
Next k

Ово ће „истоварити“ цео низ у Схеет2^(Sheet2) , са додатним редом који садржи укупан износ помножен са 5% за износ пореза.

Добијени лист ће изгледати овако.

Као што видите, ВБА^(VBA) низови у Екцел^(Excel) -у су изузетно корисни и разноврсни као и сваки други трик у Екцел^{(any other Excel trick)} -у . 

Горњи пример је врло једноставна употреба за низ. Можете креирати много веће низове и извршити сортирање, усредњавање или многе друге функције у односу на податке које чувате у њима.

Ако желите да будете заиста креативни, можете чак да креирате два низа који садрже низ ћелија^{(containing a range of cells)} из два различита листа и да извршите прорачуне између елемената сваког низа.

Апликације су ограничене само вашом маштом.

What Is a VBA Array in Excel and How to Program One

VBA has been pаrt of the Microsoft Offіce suite for many years. While it doesn’t have the full functionаlіty and power of a full VB application, VBA provides Office υsers with the flexibility to integrate Office products and automate the work you do in them.

One of the most powerful tools available in VBA is the ability to load an entire range of data into a single variable called an array. By loading data in this way, you can manipulate or perform calculations on that range of data in a variety of ways.

So what is a VBA array? In this article we’ll answer that question, and show you how to use one in your own VBA script.

What Is a VBA Array?

Using a VBA array in Excel is very simple, but understanding the concept of arrays can be a little bit complex if you’ve never used one.

Think of an array like a box with sections inside it. A one-dimensional array is a box with one line of sections. A two-dimensional array is a box with two lines of sections.

You can put data into each section of this “box” in any order you like.

At the beginning of your VBA script, you need to define this “box” by defining your VBA array. So to create an array that can hold one set of data (a one-dimension array), you would write the following line.

Dim arrMyArray(1 To 6) As String

Later in your program, you can place data into any section of this array by referencing the section inside of parentheses.

arrMyArray(1) = "Ryan Dube"

You can create a two-dimensional array using the following line.

Dim arrMyArray(1 To 6,1 to 2) As Integer

The first number represents the row, and the second is the column. So the above array could hold a range with 6 rows and 2 columns.

You can load any element of this array with data as follows.

arrMyArray(1,2) = 3

This will load a 3 into the cell B1.

An array can hold any type of data as a regular variable, such as strings, boolean, integers, floats and more.

The number inside the parenthesis can also be a variable. Programmers commonly use a For Loop to count through all sections of an array and load data cells in the spreadsheet into the array. You’ll see how to do this later in this article.

How to Program a VBA Array in Excel

Let’s take a look at a simple program where you may want to load information from a spreadsheet into a multidimensional array.

As an example, let’s look at a product sales spreadsheet, where you want to pull the sales rep’s name, item, and total sale out of the spreadsheet.

Note that in VBA when you reference rows or columns, you count rows and columns starting from the top left at 1. So the rep column is 3, the item column is 4, and the total column is 7.

To load these three columns over all 11 rows, you’ll need to write the following script.

Dim arrMyArray(1 To 11, 1 To 3) As String
Dim i As Integer, j As Integer

For i = 2 To 12
   For j = 1 To 3
      arrMyArray(i-1, j) = Cells(i, j).Value
   Next j
Next i

You’ll notice that in order to skip the header row, the row number in the first For look needs to start at 2 rather than 1. This means you need to subtract 1 for the array row value when you’re loading the cell value into the array using Cells(i, j).Value.

Where to Insert Your VBA Array Script

To place program a VBA script in Excel, you need to use the VBA editor. You can access this by selecting the Developer menu and selecting View Code in the Controls section of the ribbon.

If you don’t see the Developer in the menu, you’ll need to add it. To do this, select File and Options to open the Excel Options window.

Change the choose commands from dropdown to All Commands. Select Developer from the left menu and select the Add button to move it to the pane on the right. Select the checkbox to enable it and select OK to finish.

When the Code Editor window opens, make sure the sheet your data is in is selected in the left pane. Select Worksheet in the left dropdown and Activate in the right. This will create a new subroutine called Worksheet_Activate().

This function will run whenever the spreadsheet file is opened. Paste the code into the script pane inside this subroutine.

This script will work through the 12 rows and will load the rep name from column 3, the item from column 4, and the total sale from column 7.

Once both For loops are finished, the two dimensional array arrMyArray contains all of the data you specified from the original sheet.

Manipulating Arrays in Excel VBA

Let’s say you want to apply a 5% sales tax to all of the final sale prices, and then write all of the data to a new sheet.

You can do this by adding another For loop after the first, with a command to write the results to a new sheet.

For k = 2 To 12
   Sheets("Sheet2").Cells(k, 1).Value = arrMyArray(k - 1, 1)
   Sheets("Sheet2").Cells(k, 2).Value = arrMyArray(k - 1, 2)
   Sheets("Sheet2").Cells(k, 3).Value = arrMyArray(k - 1, 3)
   Sheets("Sheet2").Cells(k, 4).Value = arrMyArray(k - 1, 3) * 0.05
Next k

This will “unload” the entire array into Sheet2, with an additional row containing the total multiplied by 5% for the tax amount.

The resulting sheet will look like this.

As you can see, VBA arrays in Excel are extremely useful and as versatile as any other Excel trick. 

The example above is a very simple use for an array. You can create much larger arrays and perform sorting, averaging, or many other functions against the data you store in them.

If you want to get real creative, you could even create two arrays containing a range of cells from two different sheets, and perform calculations between elements of each array.

The applications are limited only by your imagination.

Related posts

• Како избрисати празне линије у Екцелу

• Како користити Екцел-ову функцију говорних ћелија

• Како уметнути Екцел радни лист у Ворд документ

• Како користити Екцел-ову анализу шта ако

• Како поправити ред у Екцелу

• Како користити апсолутне референце у Екцел-у

• Како уклонити линије мреже у Екцелу

• 10 Екцел савета и трикова за 2019

• Брзо изговорите бројеве у Ворд-у и Екцел-у

• Разлике између Мицрософт Екцел-а на мрежи и Екцел-а за десктоп

• Како отворити Ворд и Екцел у безбедном режиму

• Како уметнути ЦСВ или ТСВ у Екцел радни лист

• Сачувајте референце ћелија када копирате формулу у Екцел-у

• Како користити ПМТ функцију у Екцелу

• Како спојити податке у више Екцел датотека

• Како брзо уметнути више редова у Екцел

• Основно сортирање података у једној и више колона у Екцел табелама

• 3 начина да поделите ћелију у Екцел-у

• Гоогле табеле у односу на Мицрософт Екцел – које су разлике?

• Како израчунати З-сцоре у Екцелу