پلت فرم برنامه نویسی VBA^{(VBA programming)} که تقریباً در تمام محصولات مایکروسافت آفیس^{(Microsoft Office)} اجرا می شود ، یکی از قدرتمندترین ابزارهایی است که هر کسی می تواند برای افزایش استفاده از آن محصولات استفاده کند.

این راهنمای VBA برای مبتدیان به شما نشان می دهد که چگونه منوی Developer را به برنامه ^(Developer)آفیس^(Office) خود اضافه کنید ، چگونه وارد پنجره ویرایشگر VBA شوید، و چگونه عبارات و حلقه های اولیه ^(VBA)VBA کار می کنند تا بتوانید استفاده از VBA را در Excel ، Word ، Powerpoint شروع کنید . Outlook و OneNote .

این راهنمای VBA از آخرین نسخه محصولات Microsoft Office استفاده می کند. اگر نسخه قبلی دارید، ممکن است تفاوت های جزئی با تصاویر مشاهده کنید.

نحوه فعال کردن و استفاده از ویرایشگر VBA^{(How To Enable & Use The VBA Editor)}

در هر یک از محصولات آفیس^(Office) استفاده شده در این راهنما، ممکن است متوجه شوید که منوی Developer ارجاع شده را ندارید. ^(Developer)منوی برنامه نویس فقط در Excel ، Word ، Outlook و Powerpoint موجود است. OneNote ابزاری برای ویرایش کد VBA از داخل برنامه ارائه نمی دهد، اما همچنان می توانید برای تعامل با OneNote از سایر برنامه های Office به ^(Office)OneNote API مراجعه کنید. 

نحوه انجام این کار را در راهنمای VBA پیشرفته آینده ما خواهید آموخت.^{(Advanced VBA)}

• برای فعال کردن منوی Developer در هر محصول اداری، منوی File را انتخاب کنید و از منوی ناوبری سمت چپ  گزینه ها را انتخاب کنید.^(Options)
• یک منوی گزینه ها^(Options) را خواهید دید . از منوی ناوبری سمت چپ گزینه Customize Ribbon را انتخاب کنید.^{(Customize Ribbon)}

لیست سمت چپ شامل تمام منوهای موجود و دستورات منوی موجود در آن برنامه Office است. لیست سمت راست مواردی هستند که در حال حاضر در دسترس یا فعال هستند.

• شما باید Developer را در لیست سمت راست ببینید، اما فعال نمی شود. برای فعال کردن منوی Developer کافیست کادر را انتخاب کنید.^(Just)

• اگر برنامه‌نویس^(Developer) را در سمت راست نمی‌بینید ، دستورات انتخاب^{(Choose commands)} سمت چپ را از کشویی به همه^{(All Commands)} فرمان‌ها تغییر دهید . Developer را از لیست پیدا کنید و Add>> را در مرکز انتخاب کنید تا آن منو به Ribbon اضافه شود.
• وقتی کارتان تمام شد، تأیید^(OK) را انتخاب کنید .
• پس از فعال شدن منوی Developer ، می توانید به پنجره اصلی برنامه خود برگردید و از منوی بالا،  Developer را انتخاب کنید.^(Developer)
• سپس از گروه Controls در نوار، View Code را انتخاب کنید تا پنجره ویرایشگر VBA باز شود.^(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 استفاده کنید، نگاهی بیاندازیم .

کجا کد VBA را قرار دهیم^{(Where To Put VBA Code)}

هنگامی که در ویرایشگر VBA هستید، باید از دو کادر کشویی در بالای پنجره ویرایش استفاده کنید تا انتخاب کنید که کد را به کدام شی ضمیمه کنید و زمانی که می خواهید کد اجرا شود.

به عنوان مثال، در اکسل^(Excel) ، اگر کاربرگ^(Worksheet) و فعال سازی^(Activate) را انتخاب کنید ، هر زمان که کاربرگ باز شود، کد اجرا می شود. 

سایر اقدامات کاربرگ که می توانید برای فعال کردن کد VBA خود استفاده کنید عبارتند از: زمانی که کاربرگ تغییر می کند، زمانی که کاربرگ بسته می شود (غیرفعال می شود)، زمانی که محاسبه کاربرگ اجرا می شود و موارد دیگر.

وقتی کد VBA را در ویرایشگر اضافه می کنید، همیشه مطمئن شوید که کد VBA خود را روی شی قرار دهید و از عملکرد صحیحی که می خواهید برای راه اندازی آن کد استفاده کنید، استفاده کنید.

بیانیه های VBA IF^{(VBA IF Statements)}

دستور IF در VBA درست مانند هر زبان برنامه نویسی دیگری کار می کند.

بخش اول عبارت IF به درستی یک شرط یا مجموعه ای از شرایط می پردازد. این شرایط را می توان توسط یک اپراتور AND یا OR ملحق کرد تا آنها را به یکدیگر پیوند دهد.^(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 شما ابتدا این خط را خواهد داشت.

کم نور rng به عنوان محدوده، سلول به عنوان محدوده ^{(Dim rng As Range, cell As Range)}
کم نور شمارش ردیف ردیف به عنوان عدد صحیح^{(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 Loops

حلقه^(Loop) while نیز مانند حلقه 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 Loops^{(VBA Do While and Do Until Loops)}

حلقه‌های Do while و Do Until تقریباً مشابه حلقه‌های while هستند، اما عملکرد کمی متفاوت دارند.

• حلقه 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 خود باید بدانید، عبارت ^(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 بهترین میانبر صفحه کلید برای تیم های مایکروسافت

• نحوه ایجاد یک ماکرو یا اسکریپت VBA در اکسل

• Microsoft Publisher چیست؟ راهنمای مبتدی

• نحوه رفع خطای Bookmark Not Defined در Word

• نحوه اضافه کردن شماره اسلاید به ارائه پاورپوینت

• با استفاده از ابزار جستجوی هدف تجزیه و تحلیل What-If اکسل

• نحوه استفاده از ویژگی Speak Cells اکسل

• دسترسی به فایل داده Outlook امکان پذیر نیست: 4 راه حل برای امتحان

• نحوه تغییر فونت پیش فرض در برنامه های آفیس

• نحوه تغییر اندازه اسلاید در پاورپوینت برای ارائه بهتر

• نحوه ایجاد و اجرای ماکرو در Word

• Microsoft Outlook باز نمی شود؟ 10 راه برای رفع

• نحوه درج گیف متحرک در پاورپوینت

• نحوه درج کاربرگ اکسل در Word Doc

• نحوه نمایش تعداد کلمات در مایکروسافت ورد

• نحوه اضافه کردن پاورقی در Word

• چگونه ایمیل های خود را از Microsoft Outlook به CSV یا PST صادر کنیم

• چگونه Outlook Stack On Loading Profile را رفع کنیم

• نحوه ایجاد اسناد PDF در مایکروسافت آفیس