اصول برنامه نویسی VBA و ایجاد ماکرو در برنامه های مایکروسافت آفیس. نمونه های ماکرو اکسل

با وجود عملکرد قدرتمند ارائه شده توسط رابط کاربری اکسل، تعدادی کار وجود دارد که فقط به صورت برنامه نویسی قابل انجام هستند. استفاده از ماکروها در اکسل مقدمه ای بر برنامه نویسی Excel VBA با مثال هایی از نحوه حل انواع مسائل کاربردی اکسل است.مطالب کتاب برای کاربران اکسل و همچنین برنامه نویسانی که با مدل شی اکسل آشنایی ندارند در نظر گرفته شده است. همراه با مباحث مربوط به توسعه ماکروها برای Excel 2002، یک دوره مقدماتی در مورد نوشتن ماکروها و برنامه ها در اکسل ارائه می دهد.

کتاب: دوره فشرده برنامه نویسی اکسل آخر هفته

ناشر: دیالکتیک
صفحات: 421
قالب: DJVU
اندازه: 12.6 مگابایت
کیفیت: معمولی
زبان: روسی
ژانر. دسته: برنامه نويسي
سال انتشار: 2004
شابک: 5-8459-0687-3

قابلیت های مایکروسافت اکسل به کار با جداول داده محدود نمی شود. پنهان شدن پشت ابزارهای صفحه گسترده یک زبان برنامه نویسی قدرتمند است - VBA (ویژوال بیسیک برای برنامه ها). با این حال، تقریباً هر کاربر این فرصت را دارد که یاد بگیرد چگونه برنامه هایی را در VBA برای حل متنوع ترین وظایف در اکسل بنویسد - از اجرای مکانیکی محاسبات گرفته تا ایجاد سیستمی برای ورود داده ها با فرم های صفحه نمایش خود و با امکان بازنگری در صحت. از مقادیر تایپ شده

کتاب: برنامه نویسی VBA 2002

کیفیت: معمولی
زبان: روسی
ژانر. دسته: برنامه نويسي

این کتاب شامل یک دوره برنامه نویسی در ویژوال بیسیک برای برنامه های کاربردی (VBA) است که زبان اصلی برنامه های مایکروسافت آفیس (ورد، اکسل، اکسس، پاورپوینت، فرانت پیج، ویزیو و غیره) است. این کتاب برای مبتدیان در نظر گرفته شده است تا در محیط ویندوز با استفاده از آبجکت های Word، Excel، PowerPoint برنامه نویسی کنند.بخشی از کتاب به توسعه برنامه‌های آفیس اختصاص دارد که از پایگاه‌های داده ذخیره شده در فایل‌های جداگانه و سرورهای راه دور استفاده می‌کنند.مطالب کتاب برای یادگیری اصول اولیه زبان ویژوال بیسیک و ایجاد ماکروهای ساده که به خودکارسازی کارهای تکراری معمول با اسناد، صفحات گسترده، نمودارها، ارائه ها و غیره کمک می کند و همچنین برای توسعه برنامه های کاربردی پایگاه داده نسبتاً پیچیده با استفاده از گفتگو کافی است. جعبه هایی که مدرن ترین وسایل رابط را در اختیار کاربر قرار می دهند.بیشتر مثال‌های کتاب به مسائل جاری فعالیت تجاری اختصاص دارد، بنابراین این کتاب برای مدیران سطوح مختلف، که ظاهراً برای Microsoft Office و زبان برنامه‌نویسی داخلی VBA در نظر گرفته شده‌اند، بسیار مفید خواهد بود.
ضمائم در پایان کتاب می تواند به عنوان یک مرجع مفید برای کار با VBA و VB معمولی باشد.

کتاب های زیادی در اکسل نوشته شده است. اما این کتاب خاص است - توسعه برنامه کاربردی صفحه گسترده را در یک زمینه گسترده انجام می دهد. VBA تنها یکی از اجزای محیط توسعه برنامه های کاربردی سفارشی است، البته بسیار ضروری است. این کتاب به شما کمک می کند تا پیچیدگی های توسعه برنامه های کاربردی با VBA را درک کنید. ویژگی های فراوان زبان VBA، قابلیت های آن و محیط مورد استفاده را بیان می کند، ابتدا مروری بر قابلیت های این برنامه به شما ارائه می شود، سپس به سراغ تعریف مفاهیم برنامه نویسی VBA می روید و سپس با آن آشنا می شوید. با خود زبان اگر یک برنامه نویس مبتدی VBA هستید، در این نشریه تمام اطلاعات لازم را که برای کار بیشتر نیاز دارید، پیدا خواهید کرد. اگر قبلاً تجربه غبطه‌انگیز با VBA دارید، این کتاب با افزودن تکنیک‌ها و مثال‌های جدید از زندگی واقعی، دانش شما را غنی و افزایش می‌دهد.

نسخه pdf ویرایش شده است و با مهربانی توسط مشارکت کننده ارائه شده است.

مایکروسافت اکسل خیلی بیشتر از یک صفحه گسترده است. با معرفی ویرایشگر ویژوال بیسیک در اکسل 97 و به دنبال آن بهبود قابل توجهی پایداری اکسل 2000، اکسل به خودی خود به یک پلتفرم توسعه معتبر تبدیل شد. برنامه های اکسل اکنون در کنار برنامه های مبتنی بر C ++، جاوا و پلت فرم توسعه دات نت، به عنوان بخشی از مجموعه اصلی برنامه های کاربردی سازمانی حیاتی یافت می شوند.
متأسفانه، اکسل هنوز هم اغلب به عنوان یک پلتفرم سرگرمی در نظر گرفته می شود، که افراد فقط در اوقات فراغت خود برنامه های اکسل را برای خودکارسازی کارهای جزئی توسعه می دهند. به نظر می رسد نگاهی کوتاه به بسیاری از کتاب های Excel VBA این نظر را تایید می کند. این کتاب ها بر اصول اولیه خودکارسازی وظایف اکسل با استفاده از VBA تمرکز دارند. این کتاب در نوع خود اولین توضیح مفصلی در مورد نحوه استفاده از اکسل به عنوان بستر توسعه برنامه های کاربردی با کیفیت حرفه ای است.
در حالی که به نظر می رسد اکثر پلتفرم های توسعه اصلی دیگر دارای یک متن استاندارد بالفعل هستند که بهترین شیوه های مورد توافق را برای معماری، طراحی و توسعه برنامه ها با استفاده از آن پلتفرم توضیح می دهد، تا کنون اکسل چنین نکرده است. این کتاب سعی دارد این شکاف را پر کند. نویسندگان برنامه‌نویسان حرفه‌ای اکسل هستند که برنامه‌های کاربردی مبتنی بر اکسل را برای مشتریان مختلف از افراد گرفته تا بزرگترین شرکت‌های چند ملیتی ایجاد می‌کنند. این کتاب رویکردهایی را که ما هنگام طراحی، توسعه، توزیع و پشتیبانی از برنامه هایی که برای مشتریان خود می نویسیم استفاده می کنیم، توضیح می دهد.

MZTools - یک ابزار بسیار مفید برای کسانی که در VBA برنامه نویسی می کنند. واقعاً در زمان کدنویسی صرفه جویی می کند. همچنین مهم است که ابزار کاملا رایگان... در اینجا به برخی از ویژگی های آن اشاره می کنیم:

• درج خودکار کنترل کننده های خطا در ماژول ها
• درج نظرات در هدر رویه، با درج خودکار زمان، ماژول و نام رویه، امکان نشان دادن نویسنده رویه
• شماره گذاری خودکار خطوط کد
• حذف شماره گذاری از خطوط کد
• ایجاد قالب برای کدهای رایج
• دارای کلیپ بورد برای 9 عملیات با قابلیت کدنویسی و سپس چسباندن هر یک از 9 کد کپی شده
• و خیلی چیزهای مفید دیگر

این برنامه به صورت رایگان توزیع می شود.

(37.3 کیلوبایت، 3 708 بارگیری)

ابزارهای VBE - چند نفر از شما مجبور شدید کد فرم را بنویسید، و سپس به یاد داشته باشید که برخی از عناصر آنطور که می‌خواهید نامگذاری نشده‌اند یا فقط می‌خواهید به دلیل تغییر در کد، نام آن را تغییر دهید؟ و البته با این مشکل مواجه شدیم که وقتی نام یک عنصر را تغییر می‌دهید، باید وارد کد شده و تمام ارجاعات به این عنصر را با یک نام جدید در آنجا جایگزین کنید. بنابراین، با استفاده از این برنامه می توانید نام هر عنصر فرم (TextBox، Label و غیره) و کنترل های ActiveX را در برگه اکسل تغییر نام دهید و خود برنامه همه لینک های کد را از نام قدیمی به جدید جایگزین می کند. . خیلی راحت

این برنامه به صورت رایگان توزیع می شود.

نمونه های ساده ماکرو اکسل زیر برخی از ویژگی ها و تکنیک های شرح داده شده در آموزش VBA اکسل را نشان می دهد.

ماکرو اکسل: مثال 1

در ابتدا این روش زیربه عنوان نمونه ای از استفاده از نظرات در کد VBA ارائه شد. با این حال، در اینجا می توانید نحوه اعلان متغیرها، نحوه کار مراجع سلولی اکسل، با استفاده از یک حلقه را نیز مشاهده کنید برای، عملگر شرطی اگرو نمایش جعبه پیام

"رویه فرعی سلولی حاوی رشته مشخص شده را جستجو می کند" در محدوده سلول های A1: A100 صفحه فعال Sub Find_String (sFindText به عنوان رشته) Dim i As Integer "یک عدد صحیح از نوع Integer، استفاده شده در حلقه For Dim iRowNumber As Integer" یک عدد صحیح از نوع Integer برای ذخیره نتیجه iRowNumber = 0 "به سلول های A1 نگاه می کند: A100 یکی پس از دیگری تا زمانی که یک رشته پیدا شود sFindText برای i = 1 تا 100 If Cells (i, 1) .Value = sFindText Then." اگر مطابق با رشته داده شده یافت شد، شماره ردیف فعلی را ذخیره کنید و از حلقه خارج شوید. ردیف پیدا شد، نشان دهید در کدام سلول مطابقت پیدا شده است If iRowNumber = 0 سپس MsgBox "String" & sFindText & "n't found" Else MsgBox "String" & sFindText & "در سلول A یافت شد" و iRowNumber End If End Sub

ماکرو اکسل: مثال 2

رویه بعدی زیر- نمونه ای از استفاده از حلقه انجام در حالی که... در اینجا همچنین می توانید نحوه اعلان متغیرها، نحوه کار با مراجع سلول اکسل و نحوه اعمال عملگر شرطی را مشاهده کنید. اگر.

"رویه فرعی خروجی اعداد فیبوناچی از 1000 زیر فیبوناچی () Dim i به عنوان عدد صحیح" شمارنده برای نشان دادن موقعیت یک عنصر در دنباله Dim iFib به عنوان عدد صحیح "مقدار فعلی دنباله را ذخیره می کند Dim iFib_Next به عنوان عدد صحیح" مقدار بعدی را ذخیره می کند. از دنباله Dim iStep As Integer "اندازه افزایش بعدی را ذخیره می کند" متغیرهای i و iFib_Next i = 1 iFib_Next = 0 را راه اندازی کنید.< 1000 If i = 1 Then "Особый случай для первого элемента последовательности iStep = 1 iFib = 0 Else "Сохраняем размер следующего приращения перед тем, как перезаписать "текущее значение последовательности iStep = iFib iFib = iFib_Next End If "Выводим текущее число Фибоначчи в столбце A активного рабочего листа "в строке с индексом i Cells(i, 1).Value = iFib "Вычисляем следующее число Фибоначчи и увеличиваем индекс позиции элемента на 1 iFib_Next = iFib + iStep i = i + 1 Loop End Sub

ماکرو اکسل: مثال 3

این رویه زیراز طریق سلول های یک ستون حلقه می زند آبرگه فعال تا زمانی که با یک سلول خالی مواجه شود. مقادیر در یک آرایه نوشته می شوند. این ماکرو ساده اکسل کار با آرایه های پویا و همچنین استفاده از یک حلقه را نشان می دهد انجام دهید تا... در این مثال، ما هیچ عملی را با آرایه انجام نخواهیم داد، اگرچه در برنامه نویسی واقعی، پس از نوشتن داده ها در آرایه، معمولاً چنین اقداماتی بر روی آنها انجام می شود.

"روش Sub مقادیر سلول های ستون A صفحه فعال را در آرایه Sub GetCellValues ​​() Dim iRow به عنوان عدد صحیح ذخیره می کند" تعداد ردیف فعلی Dim dCellValues ​​() را به صورت Double "Array" ذخیره می کند. برای ذخیره مقادیر سلول‌ها iRow = 1 ReDim dCellValues ​​(1 تا 10)" حلقه را انجام دهید تا زمانی که از طریق سلول‌های ستون A صفحه فعال حلقه بزند و مقادیر آنها را در یک آرایه تا یک سلول خالی استخراج کند. تا زمانی که IsEmpty انجام دهید (Cells (iRow, 1))" بررسی کنید که آرایه dCellValues ​​دارای اندازه کافی باشد.< iRow Then ReDim Preserve dCellValues(1 To iRow + 9) End If "Сохраняем значение текущей ячейки в массиве dCellValues dCellValues(iRow) = Cells(iRow, 1).Value iRow = iRow + 1 Loop End Sub

ماکرو اکسل: مثال 4

در این مثال، رویه زیرمقادیر را از یک ستون می خواند آکاربرگ ورق 2و با آنها عملیات حسابی انجام می دهد. نتایج در سلول های ستون ثبت می شود آدر کاربرگ فعال این ماکرو استفاده از اشیاء اکسل را نشان می دهد. به ویژه، درخواست تجدید نظر توسط رویه انجام می شود زیربه شی ستون هاو نحوه دسترسی به این شیء از طریق شیء را نشان می دهد کاربرگ... همچنین نشان داده شده است که هنگام اشاره به یک سلول یا محدوده ای از سلول ها در برگه فعال، لازم نیست در هنگام نوشتن پیوند، نام این برگه را مشخص کنید.

"رویه فرعی از یک حلقه برای خواندن مقادیر ستون A از کاربرگ Sheet2 استفاده می کند"، عملیات حسابی را با هر مقدار انجام می دهد و نتیجه را در "ستون A از کاربرگ فعال (Sheet1) Sub Transfer_ColA () Dim i به عنوان عدد صحیح Dim می نویسد. Col As Range Dim dVal As Double "ستون A از کاربرگ را به متغیر Col اختصاص دهید Sheet 2 Set Col = Sheets (" Sheet2 "). ستون ها ("A") i = 1" با استفاده از یک حلقه، مقادیر سلول ها را بخوانید. در Col تا زمانی که "تا زمانی که یک سلول خالی مواجه نشود Do Until IsEmpty (Col.Cells (i)) "ما عملیات حسابی را روی مقدار سلول فعلی انجام می دهیم dVal = Col.Cells (i) .Value * 3 - 1" موارد زیر فرمان نتیجه را در ستون A از کاربرگ فعال می نویسد "نام برگه را در پیوند ضروری مشخص کنید زیرا این برگه فعال است Cells (i, 1) = dVal i = i + 1 Loop End Sub

ماکرو اکسل: مثال 5

این ماکرو نمونه کد VBA را نشان می دهد که یک رویداد Excel را نظارت می کند. هر بار که یک سلول یا محدوده ای از سلول ها در کاربرگ انتخاب می شود، رویدادی که ماکرو ملزم به آن است رخ می دهد. در مورد ما، هنگام انتخاب یک سلول B1، یک پنجره پیام روی صفحه نمایش داده می شود.

"اگر سلول B1 در کاربرگ فعلی انتخاب شده باشد، اگر سلول B1 در کاربرگ فعلی انتخاب شده باشد، این کد پنجره ای با پیام نشان می دهد." Private Sub Worksheet_SelectionChange (ByVal Target As Range) "بررسی کنید سلول B1 انتخاب شده باشد اگر Target.Count = 1 و Target.Row = 1 And Target. Column = 2 سپس "اگر سلول B1 انتخاب شده است، عمل مورد نیاز MsgBox را انجام دهید" شما سلول B1 را انتخاب کردید "End If End Sub

ماکرو اکسل: مثال 6

این روش استفاده از عملگرها را نشان می دهد در مورد خطاو از سرگیریبرای رسیدگی به خطاها این کد همچنین نمونه ای از باز کردن و خواندن داده ها از یک فایل را نشان می دهد.

«رویال Sub، آرگومان‌های Val1 و Val2 را به مقادیر سلول‌های A1 و B1 تنظیم می‌کند» از کتاب کار Data.xlsx واقع در پوشه C: \ Documents and Settings Sub Set_Values ​​(Val1 As Double، Val2 As Double) Dim DataWorkbook As Workbook On Error GoTo Error Handling " کتاب کار را با مجموعه داده باز کنید DataWorkbook = Workbooks. Open ("C: \ Documents and Settings \ Data") "مقادیر متغیرهای Val1 و Val2 را از کتاب کار مشخص شده اختصاص دهید Val1 = Sheets ( " Sheet1 "). سلول ها (1, 1) Val2 = Sheets ("Sheet1"). سلول ها (1, 2) DataWorkbook.Close Exit Sub Error Handling: "اگر فایل پیدا نشد، از کاربر خواسته می شود تا فایل مورد نظر را قرار دهد. فایل" را در پوشه مورد نظر ادامه دهید و سپس به اجرای ماکرو MsgBox ادامه دهید "فایل Data.xlsx یافت نشد! "& _" لطفاً کتاب کار را به پوشه C: \ Documents and Settings اضافه کنید و روی OK کلیک کنید "Resume End Sub

محتوای این صفحه دائما در حال رشد خواهد بود...

1. برنامه ماشین حساب "افزایش اعداد به توان های بزرگ".
   

   محاسبه دقیق افزایش به توان های بزرگ اعداد تک رقمی (2 تا 9) را با استفاده از محاسبات طولانی انجام دهید.

2. از انجمن توسط Jonny323. VBA Word

   سلام به همه. من واقعا به ماکرو نیاز دارم فکر کنم کار سختی نیست چاپ صفحه اول در 6 نسخه و صفحه دوم در 2 نسخه پیشاپیش متشکرم.

3. نوار پیشرفت در فرم. VBA Excel

   کنترلی که پیشرفت برنامه را نشان می دهد (از 100 درصد چقدر کار انجام شده است ...

4. محاسبات آماری در متن هایلایت شده VBA Word

   یک ماکرو در Word ایجاد کنید که تعداد کلمات، کاما و نقطه را در متن آزاد تعیین می کند.
   کلمات به معنای گروه‌هایی از کاراکترها هستند که با فاصله (یک یا چند) از هم جدا شده‌اند و حاوی فاصله‌های درون آنها نیستند. نمی تواند نقطه یا کاما در یک کلمه وجود داشته باشد. بیضی ها نقطه به حساب نمی آیند...

5. محاسبات آماری در متن سند. استفاده از UserForm برای ورود اطلاعات VBA Word

   ایجاد یک برنامه در Word - در فرم، کاربر یک کلمه یا عبارت را وارد می کند و برنامه کل متن را اسکن می کند و کلمه (عبارت) وارد شده را در انتهای سند درج می کند که در کنار آن تمام شماره صفحه ها درج شده است. این کلمه رخ می دهد فهرست شده اند. مطابقت شماره صفحه مجاز نیست. یعنی اگر کلمه مشخص شده سه بار در صفحه 5 ظاهر شود، عدد 5 فقط یک بار در خروجی نشان داده می شود. فرم باید از اجزای زیر تشکیل شده باشد:
   - 1 TextBox برای وارد کردن یک کلمه (عبارت)؛
   - 1 دکمه برای خروج از برنامه؛
   - 1 دکمه برای شروع جستجو و درج نتیجه در سند.
   - جزء نوع Label با متن توضیحی بالای خط ورودی.
   - علاوه بر این، فرم می تواند دارای اجزایی از نوع Frame باشد.
   

6. کار با ListBox (اکسل). برداشتن، مرتب‌سازی، انتخاب چندگانه...

7. برنامه ای برای حل پازل سودوکو ژاپنی (اکسل)

8. ماکروهای اجرای پرس و جو (یعنی تولید یک جدول جدید از پایگاه داده اکسل)

9. مرتب سازی Hoare (الگوریتم از wikipedia.org)

   یکی از سریع ترین روش های مرتب سازی

10. مرتب سازی ادغام (با استفاده از Hoare)

    یکی از سریع ترین و بهینه ترین روش های مرتب سازی.

11. VBA Excel: برنامه ای برای محاسبه بیوریتم های انسانی

12. برای blackarrow با programmersforum.ru

13. مشخص کنید کدام یک چهارم مختصات
    نقطه با مختصات داده شده A (a, b) سقوط می کند. VBA EXCEL.

14. نمایش عدد صحیح در کلمات VBA EXCEL.

15. منطق.

    حل یک معادله درجه دوم.

16. VBA EXCEL.

17. VBA EXCEL. مشکل مثلث آرایه، حلقه، منطق.

    با توجه به ابعاد سه ضلع مثلث، نوع آن (مستطیل، منفرد، حاد یا غیرممکن) را مشخص کنید.

18. ساعت زنگ دار در اکسل

19. VBA EXCEL.

20. VBA EXCEL.

21. VBA EXCEL.

    یک ماکرو که در محدوده انتخاب شده نشان دهنده آن است همه اعداد منفی به رنگ آبی، اعداد مثبت به رنگ قرمز، صفرها به رنگ سفید (یا زرد).

22. VBA EXCEL. نحوه پنهان کردن یا نمایش عناصر صفحه

    گاهی اوقات، لازم است برخی از ویژگی ها را از کاربر پنهان کنید (به عنوان یک قاعده، مکان داده ها پنهان است):
    - از صفحات دیگر این کتاب دیدن کنید (بهتر است از آنها اطلاعی نداشته باشید).
    - صفحه را اسکرول (افقی و عمودی) کنید
    - خواندن و اصلاح فرمول ها در سلول های کاربرگ
    - مخفی کردن خطوط ستون ها و ردیف ها
    - هدرها (نام و اعداد) ستون ها و ردیف ها را مخفی کنید

23. VBA EXCEL. افزودن و حذف آیتم منو

    اضافه کردن (حذف) مورد خود به منوی اکسل کار سختی نیست. این همه در راهنما توضیح داده شده است.
    اما سپردن این کار به یک کلان بسیار جالب تر است.
    سپس این امکان فراهم می شود که هنگام باز کردن یک سند خاص، یک منوی خاص و جداگانه تشکیل داده و پس از بستن آن، منوی اکسل را به حالت اولیه خود برسانید. (این نمونه کد فقط در MS Excel 2003 کار می کند و در سال 2007 نام کنترل پنل ها باید تغییر کند)

24. اتومات سلولی VBA EXCEL.

25. روش بخش طلایی VBA EXCEL.

26. مقادیر حداکثر و حداقل سلول های محدوده انتخاب شده را جایگزین می کند. VBA Excel

    یک برنامه یا فرم کاربری برای یافتن و تنظیم مجدد عناصر با حداکثر و حداقل مقادیر محدوده انتخابی کاربرگ ایجاد کنید.

27. یک تابع رشته ای که مربع های اعداد اول را از صفر به عدد مشخص شده برمی گرداند. VBA Excel

    تابعی در اکسل بنویسید که یک عدد طبیعی N را بگیرد و مجذور تمام اعداد اول از 0 را به N طبیعی معین برگرداند.

28. فرم کاربر برای وارد کردن داده ها در مورد وام های بانک تجاری. VBA Excel

    سازماندهی ورود اطلاعات به جدولی حاوی داده های مربوط به صدور وام های بلند مدت توسط یک بانک تجاری با داده های زیر: کد گیرنده وام، نام گیرنده وام، تاریخ صدور وام، دوره (3-4 دوره) که برای آن وام صادر شده است (در روز)، بهره، مبلغ وام، تاریخ پرداخت سود وام.

29. فرم کاربری (UserForm) برای وارد کردن اطلاعات ثبت نام توریست. VBA Excel

    در همین مکان...

هدف، واقعگرایانه -عملگرهای اولیه را یاد بگیرید و ساختارهای برنامه نویسی اولیه را در زبان VBA پیاده سازی کنید.

4.1 مراحل اولیه کار با برنامه های vba در اکسل

برای تهیه و اجرای برنامه VBA باید موارد زیر را انجام دهید:

در اکسل، دستور را از منو انتخاب کنید سرویس - ماکرو - ویرایشگردیداریپایه ای;

در پنجره ای که ظاهر می شود، دستور را از منو انتخاب کنید درج کنید – مدول... یک ماژول ایجاد می شود، یعنی به عبارت ساده، پنجره ای باز می شود که در آن می توانید متن برنامه را وارد کنید.

در ابتدای ماژول، یک دستورالعمل می تواند مشخص شود گزینهصریح... اگر مشخص شده باشد، تمام متغیرهای مورد استفاده در برنامه باید در عبارت اعلان شوند اذعان(برای جزئیات بیشتر به بخش 4.3 مراجعه کنید).

در برخی موارد، بسته به تنظیمات محیط VBA، دستورالعمل گزینهصریحدر ابتدای ماژول به طور خودکار نشان داده شده است. اگر برنامه نویس بخواهد از متغیرها بدون اعلام آنها در یک دستور استفاده کند اذعان، سپس دستورالعمل گزینهصریحباید حذف شود.

برای اجرای برنامه برای اجرا، دستور را از منو انتخاب کنید Run - Sub / UserForm را اجرا کنید.

4.2 ساده ترین مثال از یک برنامه vba

مثال 4.1- برنامه ای که عدد مشخص شده را بالا می برد آبه درجه مشخص شده ب.

Dim a به عنوان تک، b به عنوان تنها

a = InputBox ("پایه را وارد کنید:")

b = InputBox ("یک توان را وارد کنید:")

x = a ^ b 'توانایی

MsgBox («نتیجه است» و x)

این کلمه است زیرشروع روش را نشان می دهد. نام او در این مورد است آغازگر4_1 ... یک برنامه VBA همیشه از یک یا چند رویه (در این مورد، یک) تشکیل شده است.

کاراکتر «(یک نقل قول) شروع یک نظر را نشان می دهد. متن نظر می تواند هر چیزی باشد.

اذعان- عملگر اعلام متغیر. در این حالت مشخص می شود که متغیرها آو باز نوع هستند تنها... آن ها می تواند هم اعداد کامل و هم کسری باشد. انواع داده ها و اعلان های متغیر با جزئیات بیشتر در بخش 4.3 مورد بحث قرار خواهند گرفت.

جعبه ورودی- تابعی برای وارد کردن مقدار یک متغیر. خط آ = جعبه ورودی("پایه را وارد کنید:”) یعنی مقدار متغیر وارد شده است آ; پیام روی صفحه نمایش داده می شود "پایه را وارد کنید:"... خط ایکس = آ^ ب- عملگر انتساب: مقدار سمت راست محاسبه می شود (در این حالت، متغیر آبه قدرت رساند ب، و نتیجه به متغیر مشخص شده در سمت چپ (در این مورد، متغیر) اختصاص داده می شود ایکس). خط MsgBox("نتیجه" وایکس) به این معنی است که پیام روی صفحه نمایش داده می شود "نتیجه برابر است"و مقدار متغیر ایکس.

توجه - امضا کنید & در عمل MsgBoxبرای الحاق چندین مورد داده که باید روی صفحه نمایش داده شوند، در این مثال - رشته ها در نظر گرفته شده است. "نتیجه برابر است"و متغیر ایکس... به همین ترتیب امضا کنید & می تواند در عملکرد استفاده شود جعبه ورودی(نمونه هایی از این موارد در زیر آورده خواهد شد). قبل از علامت & و باید با فاصله دنبال شود.

چند عبارت VBA را می توان در یک خط قرار داد. برای انجام این کار، آنها توسط کولون از هم جدا می شوند. بنابراین، برنامه از مثال 4.1 می تواند به عنوان مثال به صورت زیر نوشته شود:

اولین نمونه از یک برنامه VBA

Dim a به عنوان تک، b به عنوان تنها

a = InputBox ("پایه را وارد کنید:"): b = InputBox ("نمایش را وارد کنید:")

x = a ^ b: MsgBox («نتیجه است» و x) «نتیجه را نشان دهید و خروجی بگیرید

این مثال از رویه ای به نام زیر روال استفاده می کند. این رویه با کلمه شروع می شود زیر... همیشه حداقل یک زیربرنامه در یک برنامه VBA وجود دارد. علاوه بر این، نوع دیگری از رویه در VBA وجود دارد - توابع. یک رویه تابع با کلمه شروع می شود عملکرد... استفاده از چنین رویه‌هایی در بخش 4.9 مورد بحث قرار خواهد گرفت.