بیانیه VBA If – Then – Else در اکسل (4 مثال)

Hugh West

16-10-2023 ماکروها & Excel VBA
  • این را به اشتراک بگذارید
Hugh West

دستورات شرطی برای انجام مجموعه ای از اقدامات بسته به شرایط مشخص شده در زبان های برنامه نویسی استفاده می شود. در این مقاله به شما نشان خواهیم داد که عبارت شرطی If – Then – Else در VBA Excel چیست و چگونه از آن استفاده کنید.

دانلود کتاب کار

می توانید کتاب تمرین رایگان Excel را از اینجا دانلود کنید.

If-Then-Else در VBA.xlsm

مقدمه ای بر بیانیه If – Then – Else در VBA

VBA If – Then – Else عمدتاً برای تصمیم گیری در مورد جریان اجرای دستور استفاده می شود. شرایط اگر شرط درست باشد، مجموعه خاصی از اقدامات اجرا می شود و اگر شرط نادرست باشد، مجموعه دیگری از اقدامات انجام می شود.

  • Syntax 
9668

یا،

6251

اینجا،

استدلال ضروری/اختیاری<توضیح درست یا نادرست است. اگر شرط صفر باشد، نادرست در نظر گرفته می شود.
گزاره ها اختیاری یک فرم تک خطی که بند Else ندارد. یک یا چند عبارت باید با دو نقطه از هم جدا شوند. اگر شرط True باشد، این عبارت اجرا می شود.
else_statements اختیاری یک یا چند عبارت هستنداگر هیچ شرط قبلی درست نباشد انجام شود.

4 مثال از استفاده از VBA If – Then – Other عبارت در Excel

در این بخش، نحوه استفاده از If-Then-Else در کد VBA را با 4 مثال خواهید آموخت.

1. با عبارت If – Then – Else بزرگترین عدد بین دو عدد را پیدا کنید

اگر دو عدد دارید و می خواهید بدانید کدام یک بزرگتر (یا کوچکتر) است، می توانید از <1 استفاده کنید> عبارت If-Then-Else در VBA .

مراحل:

  • Alt + F11<را فشار دهید 2> روی صفحه کلید خود یا به برگه توسعه دهنده -> Visual Basic برای باز کردن Visual Basic Editor .

  • در پنجره کد پاپ آپ، از نوار منو ، روی درج -> Module .

  • کد زیر را کپی کرده و در پنجره کد قرار دهید. 
5072

کد شما اکنون آماده اجرا است.

در اینجا، ما دو عدد 12345 و 12335 را با هم مقایسه می کنیم تا بفهمیم کدام یک بزرگتر است. این فرآیند معمولاً برای یافتن اعداد بزرگ در یک مجموعه داده بزرگ عالی است.

  • F5 را روی صفحه کلید خود فشار دهید یا از نوار منو <را انتخاب کنید 1>اجرا -> Sub/UserForm را اجرا کنید. همچنین می‌توانید روی نماد کوچک Play در نوار منوی فرعی کلیک کنید تا ماکرو اجرا شود.

نتیجه را دریافت خواهید کرد. در اکسل MsgBox

در مورد ما، شماره 12345 - در متغیر ذخیره می شود Num1 –  بزرگتر از عدد 12335 ، Num2 است. بنابراین MsgBox به ما نشان می دهد که 1st عدد بزرگتر از عدد 2 است .

بیشتر بخوانید: فرمول Excel برای تولید اعداد تصادفی (5 مثال) <3

2. بررسی نتایج دانش‌آموز با استفاده از عبارت If – Then – Else در VBA

شما می‌توانید با این عبارت در کد VBA بررسی کنید که آیا دانش‌آموز در امتحان موفق شده یا مردود شده است.

مراحل:

  • به همان روش قبلی، Visual Basic Editor را از برگه Developer باز کنید و Insert یک Module در پنجره کد.
  • در پنجره کد، کد زیر را کپی کرده و آن را جایگذاری کنید. 
3355

کد شما اکنون آماده است تا اجرا کنید.

این کد بررسی می کند که آیا سلول D5 دارای مقداری بزرگتر از 33 است یا خیر. اگر این کار را انجام دهد، یک خروجی را نشان می دهد، اگر این کار را نکرد، چیز دیگری را نشان می دهد. شما نتیجه را مطابق کد خود دریافت خواهید کرد.

به مجموعه داده فوق با نتیجه نگاه کنید، سلول D5 95 را نگه می دارد که مطمئناً بیشتر از 33 است، بنابراین نتیجه عبور است را نمایش می دهد. اما اگر کد سلول D7 (22) را اجرا کنیم، در غیر این صورت نمایش داده می شود.

بیشتر بخوانید: نحوه استفاده از VBA Case Statement 13 نمونهمثال ها)

  • استفاده از تابع VBA LTrim در اکسل (4 مثال)
  • نحوه استفاده از تابع VBA FileDateTime در اکسل (3 کاربرد)
  • استفاده از VBA Mod Operator (9 مثال)
  • عملکرد VBA EXP در Excel (5 مثال)
    • <25 3. به روز رسانی نظرات در نمره دانش آموز با استفاده از بیانیه های متعدد If – Then – Else در VBA

    شما یاد گرفته اید که چگونه با یک If-Then-Else یک پاسور دانش آموز را استخراج کنید یا نه بیانیه، اما این بار با مثال زیر با دستورات Multiple If-Then-Else آشنا خواهید شد.

    ما VBA را اجرا خواهیم کرد. کد برای پر کردن آن کادرهای نظر بر اساس شرایط متعدد.

    مراحل:

    • مانند قبل، Visual Basic Editor را از تب Developer باز کنید و Insert a Module را در پنجره کد باز کنید.
    • در پنجره کد، کد زیر را کپی کرده و آن را جایگذاری کنید. 
    4824

    کد شما اکنون آماده اجرا است.

    این کد نظرات را با توجه به درجه کسب شده توسط دانش آموزان.

    • این کد را اجرا کنید و تصویر زیر را ببینید که در آن کادر نظرات با نتایج مناسب پر شده است.
      • <12

      4. بیانیه If-Then-Else برای به روز رسانی جهت های اصلی بر اساس کد در اکسل

      همچنین می توانید از If-Then-Else برای یافتن جهت های اصلی بر اساس کد نشانگر استفاده کنید. ارائه شده است. نگاه کن بهتصویر زیر که در آن ما دستورالعمل ها را بر اساس حروف اولی که داده شده است پیدا خواهیم کرد.

      مراحل:

      • Visual Basic Editor را از برگه Developer باز کنید و Insert a Module را در پنجره کد باز کنید.
      • در کد کد زیر را کپی کرده و پیست کنید. 
      4766

      کد شما اکنون آماده اجرا است.

      • اجرا کنید این کد و نام جهت را در سلول های مربوطه دریافت خواهید کرد.

      یا اگر می خواهید فقط یک جهت را بر اساس کد پیدا کنید، سپس می توانید از کد زیر استفاده کنید. 

      1696

      این کد مقدار سلول B5 را در نظر می گیرد و نتیجه را مطابق با آن در سلول C5 برمی گرداند.

      به عنوان مثال، اگر در سلول B5 " N " بنویسید، به شما " شمال می‌دهد. ; اگر در سلول B5 " S " بنویسید، " South " را در سلول C5 به شما نشان می‌دهد.

      نتیجه

      این مقاله به شما نشان داد که چگونه از عبارت If – Then – Else در Excel با VBA استفاده کنید. امیدوارم این مقاله برای شما بسیار مفید بوده باشد. در صورت داشتن هرگونه سوال در مورد موضوع، می توانید بپرسید.

    پست قبلی IF با INDEX-MATCH در اکسل (3 رویکرد مناسب)
    پست بعدی نحوه شماره گذاری سطرها به صورت خودکار در اکسل (8 روش)

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