آموزش برنامه نویسی اکسل : ساختارهای تصمیم گیری: If…Then

برخی کدهای شما در ماکروهایتان نیاز دارند تا تعمداً دور زده شوند. خیلی از زبان های برنامه نویسی کامپیوتری که VBA نیز شامل آنها هست، ساختارهایی را برای این کار تدارک دیده اید تا هر دستوری الزاماً در هر وضعیتی اجرا نشود. خیلی وقتها ماکروهایی را خواهید نوشت که ممکن است برخی دستورات در صورتی که کاربر Yes را کلیک کرده است، انجام بشوند، و یا در صورتی که کاربر No را کلیک بکند دستورات جایگزینی اجرا شوند. تمامی این کدها در داخل ماکرو موجود هستند، اما هر بار فقط یک مجموعه از آنها اجرا می شوند.

If…Then

در میان دستورات تصمیم گیری زبان VBA ، ساده ترین و پرکاربردترینشان ساختار شرطی If…Then می باشد. برای مثال کد زیر را در نظر بگیرید:

If Weekday(VBA.Date) = 6 Then MsgBox “Have a nice weekend!”, , “Today is Friday!”

شما ممکن است از تجربیات قبلی کار با توابع اکسل به خاطر داشته باشید که تابع WEEKDAY در اکسل روز هفته را برمیگرداند، به عنوان مثال اگر خروجی تابع WEEKDAY عدد 1 باشد برابر با Sunday خواهد بود، اگر 2 باشد Monday و به همین ترتیب تا آخر. در مثال بالا VBA این خط کد را بررسی می کند و اگر خروجی تابع WEEKDAY عدد 6 که همان Friday است، باشد، پیامی را به کاربر نمایش می دهد. اگر خروجی تابع WEEKDAY هر عدد دیگری به غیر از 6 باشد، این بخش از کد دور زده می شود و اجرا نمی شود.

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

If Weekday(VBA.Date) = 6 Then

MsgBox “Have a nice weekend!”, , “Today is Friday!”

End If

اگر فقط یک شرط را مورد ارزیابی قرار می دهید و کد شرطی شما فقط یک وظیفه خاص و صرفاً یک خط کد باشد می توانید مانند مثال اول کار کنید و بیانیه if را به صورت تک خطی و بدون End if بنویسید. با این حال انتخاب بین این دو روش نگارش سلیقه ای است و تصمیم بر عهدۀ برنامه نویسان می باشد.

آموزش قبلی : آموزش برنامه نویسی اکسل : اپراتور منطقی NOT

آموزش بعدی : آموزش برنامه نویسی اکسل : ساختارهای تصمیم گیری: If…Then…Else

آموزش قبلی صفحۀ اصلی دوره آموزش بعدی