VBA לעשות עד לולאה | דוגמאות שלב אחר שלב לשימוש ב- Do עד ב- VBA

מה לעשות עד לולאה ב- VBA Excel?

ב- VBA Do עד לולאה , עלינו להגדיר קריטריונים לאחר הצהרת ה- עד כלומר, כאשר אנו רוצים שהלולאה תיפסק והצהרת הסיום היא הלולאה עצמה. כך שאם התנאי הוא FALSE הוא ימשיך לבצע את ההצהרה בתוך הלולאה, אך אם התנאי הוא TRUE מייד הוא ייצא מהצהרת Do עד.

כמו שהמילים עצמן אומרות שכדי לבצע משימה כלשהי עד שמגיעים לקריטריון, לעשות עד שהלולאה משמשת כמעט בכל שפות התכנות, גם ב- VBA אנחנו לפעמים משתמשים ב- Do עד לולאה. משמעות הדבר היא לעשות עד לולאה לעשות משהו עד שהמצב הופך לאמיתי. זה כמו שפונקציה לוגית עובדת על בסיס TRUE או FALSE.

זה ההפך מ- Do While loop שבו Do while מריץ את הלולאות כל עוד התנאי הוא TRUE.

תחביר

לעשות עד לולאה יש שני סוגים של תחביר.

תחביר מס '1 

 עשה עד לולאה [תנאי] [בצע איזו משימה] 

תחביר מס '2

 בצע לולאה [בצע איזו משימה] עד ל [תנאי] 

שניהם נראים דומים מאוד ויש בידול אחד פשוט.

בתחביר הראשון "לעשות עד" לולאה בודקת תחילה את התנאי ומקבלת את תוצאת התנאי היא TRUE או FALSE. אם התנאי הוא FALSE הוא יבצע את הקוד ויבצע משימה שצוינה ואם התנאי הוא TRUE אז הוא ייצא מהלולאה.

בתחביר השני "Do" לולאה ראשית הוא יבצע את משימת הקוד ואז הוא בודק אם התנאי הוא TRUE או FALSE. אם התנאי הוא FALSE הוא יחזור שוב ויבצע את אותה משימה. אם התנאי הוא אמיתי אז הוא ייצא מייד מהלולאה.

דוגמא

אני יודע שזה לא כל כך קל להבין שום דבר בחלק התיאוריה, אבל אין מה לדאוג. אנו נותנים לך דוגמאות קלות להבנת הלולאה. תמשיך לקרוא. כדי להתחיל את הלמידה, בוא נבצע את המשימה של הכנסת 10 המספרים הסידוריים הראשונים מתא A1 ל- A10.

ניתן להוריד תבנית VBA Do עד Excel כאן - תבנית VBA Do עד Excel

בצע את השלבים הבאים כדי להחיל את לולאת "עשה עד".

שלב 1: צור תחילה שם מאקרו כדי להתחיל בתהליך המשנה.

קוד:

 משנה Do_Until_Example1 () סוף משנה 

שלב 2: הגדר משתנה כ"ארוך ".  הגדרתי את "x" כסוג נתונים ארוך.

עמום x כל עוד

שלב 3: הזן כעת את המילה "עשה עד".

תעשה עד ש

שלב 4: לאחר הפעלת שם הלולאה הזן את התנאי כ- "x = 11".

 לעשות עד x = 11

x = 11 הוא המבחן ההגיוני שהפעלנו. אז השורה הזו אומרת להפעיל את הלולאה עד ש- x שווה ל- 11.

שלב 5: החל את המאפיין CELLS ובואו נכניס מספרים סידוריים מ -1 עד 10.

תאים (x, 1) .ערך = x

הערה: כאן הזכרנו "x" מתחיל מ -1, אז בהתחלה הערך x שווה ל- 1. בכל מקום שבו "x" יש שווה ל -1.

שלב 6: כעת סגרו את הלולאה על ידי הזנת המילה "לולאה".

 תת Do_Until_Example1 () עמעום x כל עוד עשה עד x = 11 תאים (x, 1). ערך = x לולאה 

סיום משנה

אוקי, סיימנו עם החלק בקידוד, עכשיו נבדוק את הקודים שורה אחר שורה כדי להבין את הלולאה טוב יותר.

כדי להפעיל את השורה לפי קוד השורה לחץ תחילה על מקש F8.

תחילה הוא ידגיש את שם המאקרו לפי צבע צהוב.

כאשר אתה יכול לראות את הקו הצהוב, כתוב שזה לא מתבצע על ידי ביצוע אם אתה לוחץ על מקש F8 פעם נוספת.

כעת לחץ על מקש F8 פעם נוספת, הקו הצהוב יעבור אל Do ביז לולאה.

עכשיו כדי להבין את הלולאה הצב סמן על המשתנה "x" וראה את הערך של המשתנה "x".

אז, x = 0. מכיוון שהקו המודגש הוא השורה הראשונה בלולאה כך שהערך של "x" הוא אפס, אז לחץ שוב על מקש F8 וראה את הערך של "x". לפני אותה יציאה, הקוד פועל והקצה את הערך ל- "x" כ- 1.

התחל שוב להפעלת לולאה על ידי לחיצה על מקש F8. ראה את הערך של "x".

כעת הערך של "x" מוצג כ- 1. כדי שיהיה ערך מצטבר למשתנה "x" עלינו להקצות מחדש את הערך של המשתנה "x" כ- x = x + 1 בתוך הלולאה.

כעת לחץ על מקש F8 פעם נוספת ועלינו לקבל את הערך 1 בתא A1.

כעת לחץ שוב על מקש F8 וראה מה הערך של "x".

הערך של המשתנה "x" הוא כעת 2. אז המצב שלנו אומר להפעיל את הלולאה עד שהתנאי הופך לאמיתי, כך שהלולאה שלנו ממשיכה לפעול עד שהערך של "x" הופך ל -11.

לחץ על F8 פעם נוספת, הוא יקפוץ חזרה לקו הלולאה "Do עד".

לחץ על מקש F8 פעמיים נוספות, נקבל את הערך 2 בתא A2.

לחץ שוב על מקש F8 והערך של "x" יהפוך ל -3 כעת.

לחץ שוב על מקש F8 הוא יקפוץ חזרה ללולאה פעם נוספת.

ככה, הלולאה הזו תמשיך שוב לבצע את המשימה עד שהערך של "x" יהפוך ל 11. עכשיו ביצעתי את הלולאה עד שערך "x" יהפוך ל -11.

עכשיו אם אני לוחץ על F8 זה עדיין יחזור ללולאה.

אבל אם אני לוחץ על מקש F8 עכשיו הוא ייצא מהלולאה מכיוון שהתנאי שהוחל הופך להיות "TRUE" כלומר x = 11.

אז יש לנו מספרים סידוריים מ -1 עד 10 בגיליון Excel.

אז זה הרעיון הבסיסי של לולאת "עשה עד". כדי להבין לולאות כלשהן עליך להריץ את הקוד שורה אחר שורה עד לקבלת הידע המלא אודות לולאות.