Платформата за програмиране VBA^{(VBA programming)} , която работи в почти всички продукти на Microsoft Office , е един от най-мощните инструменти, които всеки може да използва, за да подобри използването на тези продукти.

Това ръководство за VBA за начинаещи ще ви покаже как да добавите менюто за програмисти към вашето приложение на ^(Developer)Office , как да влезете в прозореца на редактора на VBA и как работят основните VBA изрази и цикли, така че да можете да започнете да използвате VBA в Excel , Word , Powerpoint , Outlook и OneNote .

Това ръководство за VBA използва най-новата версия на продуктите на ^(VBA)Microsoft Office . Ако имате по-ранна версия, може да видите някои леки разлики от екранните снимки.

Как да активирате и използвате VBA редактора^{(How To Enable & Use The VBA Editor)}

В някой от продуктите на Office , използвани в това ръководство, може да забележите, че нямате посоченото меню за програмисти . ^(Developer)Менюто за програмисти е достъпно само в Excel , Word , Outlook и Powerpoint . OneNote не предлага инструмент за редактиране на VBA код от вътрешността на приложението, но все пак можете да препращате към API на OneNote^{(OneNote API)} , за да взаимодействате с OneNote от други програми на Office . 

Ще научите как да направите това в нашето предстоящо ръководство за разширени VBA .^{(Advanced VBA)}

• За да активирате менюто за програмисти^(Developer) във всеки офис продукт, изберете менюто Файл^(File) и изберете Опции^(Options) от лявото навигационно меню. 
• Ще видите изскачащо меню с опции . ^(Options)Изберете Персонализиране на лентата^{(Customize Ribbon)} от лявото навигационно меню.

Левият списък включва всички налични менюта и команди на менюто, налични в това приложение на Office . Списъкът вдясно са тези, които в момента са налични или активирани.

• Трябва да видите Developer в списъка вдясно, но той няма да бъде активиран. Просто^(Just) поставете отметка в квадратчето, за да активирате менюто за програмисти .^(Developer)

• Ако не виждате Разработчик^(Developer) наличен вдясно, променете лявото Избор команди^{(Choose commands)} от падащо меню на Всички команди^{(All Commands)} . Намерете Developer от списъка и изберете Add>> в центъра, за да добавите това меню към лентата^(Ribbon) .
• Изберете OK , когато сте готови.
• След като менюто за програмисти^(Developer) е активно, можете да се върнете към главния прозорец на приложението и да изберете Developer от горното меню. 
• След това изберете Преглед на код^{(View Code)} от групата Контроли^(Controls) в лентата, за да отворите прозореца на редактора на VBA .

• Това ще отвори прозореца на редактора на VBA , където можете да въведете кода, който ще научите в следващите няколко раздела.

• Опитайте да добавите менюто за програмисти към няколко от приложенията на ^(Developer)Office , които използвате всеки ден. След като сте удобни да отворите прозореца на редактора на VBA , продължете към следващия раздел на това ръководство.

Общи съвети за VBA програмиране за начинаещи^{(General VBA Programming Tips for Beginners)}

Ще забележите, когато се отвори VBA редакторът, опциите за навигация в левия панел изглеждат различно от едно приложение на Office към другото.

Това е така, защото наличните обекти, където можете да поставите VBA код, зависят от това какви обекти има в приложението. Например, в Excel можете да добавите VBA код към обекти на работна книга или лист. В Word можете да добавяте VBA код към документи. В Powerpoint само за модули.

Така че, не се изненадвайте от различните менюта. Структурата и синтаксисът на VBA кода е еднакъв във всички приложения. Единствената разлика са обектите, които можете да препратите, и действията, които можете да предприемете върху тези обекти чрез VBA кода.

Преди да се потопим в различните обекти и действия, които можете да предприемете върху тях чрез VBA код, нека първо разгледаме най-често срещаната VBA структура и синтаксис, които можете да използвате, когато пишете VBA код.

Къде да поставим VBA код^{(Where To Put VBA Code)}

Когато сте в редактора на VBA , трябва да използвате двете падащи полета в горната част на прозореца за редактиране, за да изберете към кой обект искате да прикачите кода и кога искате кодът да се изпълнява.

Например, в Excel , ако изберете Работен лист^(Worksheet) и Активиране^(Activate) , кодът ще се изпълнява при всяко отваряне на работния лист. 

Други действия на работен лист, които можете да използвате, за да задействате вашия VBA код, включват когато работният лист се промени, когато е затворен (деактивиран), когато се изпълнява изчислението на работния лист и др.

Когато добавяте VBA код в редактора, винаги не забравяйте да поставите своя VBA код върху обекта и да използвате правилното действие, което искате да използвате, за да задействате този код.

VBA IF изявления^{(VBA IF Statements)}

Инструкцията IF работи във VBA точно както работи във всеки друг език за програмиране.

Първата част на оператора IF разглежда дали дадено условие или набор от условия са верни. Тези условия могат да бъдат присъединени от оператор И^(AND) или ИЛИ, за да ги свържете заедно.

Един пример би бил да се провери дали дадена оценка в електронна таблица е над или под „издържана“ оценка и да се присвои състоянието на успешно или неуспешно на друга клетка.

If Cells(2, 2) > 75 Then Cells(2, 3) = “Pass” Else Cells(2, 3) = “Fail”

Ако не искате целият израз на един ред, можете да го разделите на няколко реда, като добавите символ „_“ в края на редовете.

If Cells(2, 2) > 75 Then _
Cells(2, 3) = “Pass”  Else _
Cells(2, 3) = “Fail”

Използването на тази техника често може да направи кода много по-лесен за четене и отстраняване на грешки.

VBA за следващите цикли^{(VBA For Next Loops)}

Изявленията IF са чудесни за единични сравнения, като примера по-горе за разглеждане на една клетка. Но какво ще стане, ако искате да преминете през цяла гама от клетки и да направите една и съща инструкция IF за всяка?

В този случай ще ви трябва цикъл  FOR .

За да направите това, ще трябва да използвате дължината на диапазон и да преминете през тази дължина по броя на редовете, които съдържат данни.

За да направите това, трябва да дефинирате диапазона и променливите в клетката и да ги преглеждате. Ще трябва също да дефинирате брояч, за да можете да изведете резултатите в съответния ред. Така че вашият VBA код първо ще има този ред.

Dim rng As Range, cell As Range
Dim rowCounter като цяло число^{(Dim rowCounter as Integer)}

Определете размера на диапазона, както следва. 

Set rng = Range(“B2:B7”)
rowCounter = 2

И накрая, можете да създадете своя цикъл FOR , за да преминете през всяка клетка в този диапазон и да направите сравнението.

For Each cell In rng
   If cell.Value > 75 Then _
   Cells(rowCounter, 3) = "Pass" Else _
   Cells(rowCounter, 3) = "Fail"

   rowCounter = rowCounter + 1

Next cell

След като този VBA скрипт^{(VBA script)} се стартира, ще видите резултатите в действителната електронна таблица.

VBA while цикли^{(VBA While Loops)}

Докато цикълът също преминава през поредица от оператори, точно като цикъла ^(Loop)FOR , но условието за продължаване на цикъла е условие, което остава вярно.

Например, можете да напишете една и съща ЗА^(FOR) линия по-горе, като ДОКАТО^(WHILE) линия, само с използване променлива rowCounter както следва.

While rowCounter < rng.Count + 2
   If Cells(rowCounter, 2) > 75 Then _
   Cells(rowCounter, 3) = "Pass" Else _
   Cells(rowCounter, 3) = "Fail"
   rowCounter = rowCounter + 1
Wend

Забележка: rng.Count + 2 границата прекратяване е необходимо, тъй като поредна контра започва на 2 и нужди да се сложи край на ред 7, където свършва данни. Въпреки това, броят на диапазона (B2:B7) е само 6, а цикълът While ще приключи само след като броячът е ПО- ГОЛЯМ^(GREATER) от брояча – така че последната стойност на rowCounter трябва да бъде 8 (или rng.Count + 2).

Можете също така да настроите цикъла While, както следва:

While rowCounter <= rng.Count + 1

Можете да увеличите само броят на кръг (6) от 1, защото след като променливата rowCounter достигне края на данните (ред 7), цикълът може да завърши.

VBA Do While и Do Until цикли^{(VBA Do While and Do Until Loops)}

Примките Do While и Do Until са почти идентични с циклите While, но работят малко по-различно.

• Докато цикълът^{(While Loop)} проверява дали дадено условие е вярно в началото на цикъла.
• Цикълът Do-While^{(Do-While Loop)} проверява дали дадено условие е вярно след изпълнение на операторите в цикъла.
• Цикълът Do-Until^{(Do-Until Loop)} проверява дали дадено условие все още е невярно след изпълнение на цикъла.

В този случай ще пренапишете цикъла While по-горе, както следва, като цикъл Do-While.

Do
   If Cells(rowCounter, 2) > 75 Then _
   Cells(rowCounter, 3) = "Pass" Else _
   Cells(rowCounter, 3) = "Fail"
   
   rowCounter = rowCounter + 1
Loop While rowCounter < rng.Count + 2

В този случай логиката не се променя много, но ако искате да се уверите, че логическото сравнение се извършва след изпълнение на всички оператори (позволявайки на всички да се изпълняват без значение какво поне веднъж), тогава Do-While или цикълът Do-Until е правилната опция.

VBA Изберете Изявления за случаи^{(VBA Select Case Statements)}

Последният тип логическо изявление, което ще трябва да разберете, за да започнете да структурирате своя VBA код, са операторите Select Case .

Като се има предвид горния пример, да приемем, че искате да имате метод за оценяване, който не е просто провал. Вместо това искате да присвоите буквена оценка от A до F.

Можете да направите това със следното изявление Select Case :

For Each cell In rng
   
   Select Case cell

   Case 95 To 100
      Cells(rowCounter, 3) = "A"
   Case 85 To 94
      Cells(rowCounter, 3) = "B"
   Case 75 To 84
      Cells(rowCounter, 3) = "C"
   Case 65 To 74
      Cells(rowCounter, 3) = "D"
   Case 0 To 64
      Cells(rowCounter, 3) = "F"
   End Select

   rowCounter = rowCounter + 1

Next cell

Получената електронна таблица след изпълнение на този VBA скрипт изглежда като тази по-долу.

Сега знаете всичко, което трябва да знаете, за да започнете да използвате VBA във вашите приложения на Microsoft Office .

The Best VBA Guide (For Beginners) You’ll Ever Need

The VBA programming platform that runs throughout nearly all Microsoft Office products is one of the most powerful tools anyone can use to enhance their use of those products.

This VBA guide for beginners will show you how to add the Developer menu to your Office application, how to enter the VBA editor window, and how basic VBA statements and loops work so that you can get started using VBA in Excel, Word, Powerpoint, Outlook, and OneNote.

This VBA guide uses the latest version of Microsoft Office products. If you have an earlier version you may see some slight differences from the screenshots.

How To Enable & Use The VBA Editor

In any of the Office products used in this guide, you may notice that you don’t have the referenced Developer menu. The developer menu is only available in Excel, Word, Outlook, and Powerpoint. OneNote doesn’t offer a tool to edit VBA code from inside the application, but you can still reference the OneNote API to interact with OneNote from other Office programs. 

You’ll learn how to do this in our upcoming Advanced VBA guide.

• To enable the Developer menu in any office product, select the File menu, and select Options from the left navigation menu. 
• You’ll see an Options menu pop-up. Select Customize Ribbon from the left navigation menu.

The left list includes all available menus and menu commands available in that Office application. The list on the right are those that are currently available or activated.

• You should see Developer in the list on the right, but it will not be activated. Just select the checkbox to activate the Developer menu.

• If you don’t see Developer available on the right, then change the left Choose commands from dropdown to All Commands. Find Developer from the list and select Add>> in the center to add that menu to the Ribbon.
• Select OK when you’re done.
• Once the Developer menu is active, you can go back to your main application window and select Developer from the top menu. 
• Then select View Code from the Controls group in the ribbon to open the VBA editor window.

• This will open the VBA editor window where you can type the code you’ll learn in the next few sections.

• Try adding the Developer menu to a few of the Office applications you use every day. Once you’re comfortable opening the VBA editor window, continue on to the next section of this guide.

General VBA Programming Tips for Beginners

You’ll notice when the VBA editor opens, the navigation options in the left panel look different from one Office application to the other.

This is because the available objects where you can place VBA code depend on what objects there are in the application. For example, in Excel, you can add VBA code to workbook or sheet objects. In Word, you can add VBA code to documents. In Powerpoint, only to modules.

So, don’t be surprised by the different menus. The structure and syntax of the VBA code is the same across all applications. The only difference are the objects you can reference and the actions you can take on those objects through the VBA code.

Before we dive into the different objects and actions you can take on them via VBA code, let’s first look at the most common VBA structure and syntax you can use when you write VBA code.

Where To Put VBA Code

When you’re in the VBA editor, you need to use the two dropdown boxes at the top of the editing window to choose which object you want to attach the code to, and when you want the code to run.

For example, in Excel, if you choose Worksheet and Activate, the code will run whenever the worksheet is opened. 

Other worksheet actions you can use to trigger your VBA code include when the worksheet changes, when it’s closed (deactivated), when the worksheet calculation is run, and more.

When you add VBA code in the editor, always make sure to place your VBA code on the object and using the correct action that you want to use to trigger that code.

VBA IF Statements

An IF statement works in VBA just like it works in any other programming language.

The first part of the IF statement looks at whether a condition or set of conditions is true. These conditions can be joined by an AND or OR operator to link them together.

One example would be to check if a grade in a spreadsheet is above or below a “passing” grade, and assigning the pass or fail status to another cell.

If Cells(2, 2) > 75 Then Cells(2, 3) = “Pass” Else Cells(2, 3) = “Fail”

If you don’t want the entire statement on a single line, you can split it into multiple lines by adding a “_” symbol at the end of the lines.

If Cells(2, 2) > 75 Then _
Cells(2, 3) = “Pass”  Else _
Cells(2, 3) = “Fail”

Using this technique can often make code much easier to read and debug.

VBA For Next Loops

IF statements are great for single comparisons, like the example above of looking at a single cell. But what if you want to loop through an entire range of cells and do the same IF statement on each?

In this case you’d need a FOR loop. 

To do this, you’d need to use the length of a range, and loop through that length by the number of rows that contain data.

To do this, you need to define the range and cell variables, and loop through them. You’ll also need to define a counter so you can output the results to the appropriate row. So your VBA code would first have this line.

Dim rng As Range, cell As Range
Dim rowCounter as Integer

Define the range size as follows. 

Set rng = Range(“B2:B7”)
rowCounter = 2

Finally, you can create your FOR loop to step through every cell in that range and do the comparison.

For Each cell In rng
   If cell.Value > 75 Then _
   Cells(rowCounter, 3) = "Pass" Else _
   Cells(rowCounter, 3) = "Fail"

   rowCounter = rowCounter + 1

Next cell

Once this VBA script is run, you see the results in the actual spreadsheet.

VBA While Loops

A While Loop also loops through a series of statements, just like the FOR loop, but the condition of the looping to continue is a condition remaining true.

For example, you could write the same FOR loop above, as a WHILE loop, by simply using the rowCounter variable as follows.

While rowCounter < rng.Count + 2
   If Cells(rowCounter, 2) > 75 Then _
   Cells(rowCounter, 3) = "Pass" Else _
   Cells(rowCounter, 3) = "Fail"
   rowCounter = rowCounter + 1
Wend

Note: the rng.Count + 2 terminating limit is required because the row counter starts at 2 and needs to end on row 7 where the data ends. However, the count of the range (B2:B7) is only 6, and the While loop will only end once the counter is GREATER than the counter – so the last rowCounter value needs to be 8 (or rng.Count + 2).

You could also set up the While loop as follows:

While rowCounter <= rng.Count + 1

You can only increment the range count (6) by 1, because once the rowCounter variable reaches the end of the data (row 7), the loop can finish.

VBA Do While and Do Until Loops

Do While and Do Until loops are nearly identical to While loops, but work slightly different.

• The While Loop checks whether a condition is true at the beginning of the loop.
• The Do-While Loop checks whether a condition is true after executing the statements in the loop.
• The Do-Until Loop checks whether a condition is still false after executing the loop.

In this case you would rewrite the While loop above as follows, as a Do-While loop.

Do
   If Cells(rowCounter, 2) > 75 Then _
   Cells(rowCounter, 3) = "Pass" Else _
   Cells(rowCounter, 3) = "Fail"
   
   rowCounter = rowCounter + 1
Loop While rowCounter < rng.Count + 2

In this case the logic doesn’t change very much, but if you want to make sure the logic comparison takes place after all of the statements are run (allowing them all to run no matter what at least once), then a Do-While or Do-Until loop is the right option.

VBA Select Case Statements

The final type of logical statement you’ll need to understand to start structuring your VBA code are Select Case statements.

Given the example above, let’s say you want to have a grading method that isn’t just pass fail. Instead, you want to assign a letter grade from A through F.

You could do this with the following Select Case statement:

For Each cell In rng
   
   Select Case cell

   Case 95 To 100
      Cells(rowCounter, 3) = "A"
   Case 85 To 94
      Cells(rowCounter, 3) = "B"
   Case 75 To 84
      Cells(rowCounter, 3) = "C"
   Case 65 To 74
      Cells(rowCounter, 3) = "D"
   Case 0 To 64
      Cells(rowCounter, 3) = "F"
   End Select

   rowCounter = rowCounter + 1

Next cell

The resulting spreadsheet after this VBA script runs looks like the one below.

Now you know everything you need to know to start using VBA in your Microsoft Office applications.

Related posts

• Разширено VBA ръководство за MS Excel

• 13-те най-добри клавишни комбинации за Microsoft Teams

• Как да създадете VBA макрос или скрипт в Excel

• Какво е Microsoft Publisher? Ръководство за начинаещи

• Как да поправите грешка в отметката не е дефинирана в Word

• Как да експортирате имейлите си от Microsoft Outlook в CSV или PST

• Как да промените шрифта по подразбиране в приложенията на Office

• Файлът с данни на Outlook не може да бъде достъпен: 4 поправки, които да опитате

• Как да изтриете страница в Microsoft Word

• Бързо изписвайте числа в Word и Excel

• Как да възстановите изтрити имейли в Office 365

• 10 инструмента за възстановяване на изгубена или забравена парола за Outlook PST

• Microsoft Outlook няма да се отвори? 10 начина за поправяне

• Как да слоя обекти в презентация на PowerPoint

• Как да създадете и стартирате макрос в Word

• Как да коригирате #N/A грешки във формули на Excel като VLOOKUP

• Как да коригирате ред в Excel

• Как да превърнете презентация на Powerpoint във видео

• Как да промените размера на слайда в PowerPoint за по-добри презентации

• 5 скриптови функции на Google Sheets, които трябва да знаете