בדיוק כמו שאנו משתמשים ב- IFERROR ב- excel כדי לדעת מה לעשות כאשר מתרחשת שגיאה לפני כל פונקציה יש לנו פונקציית IFERROR מובנית ב- VBA המשמשת באותה צורה שכן היא פונקציית גליון עבודה אנו משתמשים בפונקציה זו עם גליון העבודה. שיטה ב- VBA ואז אנו מספקים את הטיעונים לפונקציה.
פונקציית IFERROR ב- VBA
זה פשע לצפות מהקוד לתפקד בלי לזרוק שום שגיאה. כדי לטפל בשגיאות ב- VBA יש לנו כמה דרכים להשתמש בהצהרות כמו On Error Resume Next VBA, On Error Resume Goto 0, On Error GoTo Label. מטפלי שגיאות VBA יכולים להמשיך רק הלאה לשורת הקוד הבאה. אך במקרה, אם החישוב אינו מתרחש עלינו להחליף את השגיאה במילת זהות אחרת. במאמר זה נראה כיצד להשיג זאת באמצעות פונקציית VBA IFERROR ב- Excel.
כיצד להשתמש ב- IFERROR ב- VBA?
הדבר שיש לזכור כאן הוא שזה לא פונקציית VBA אלא רק פונקציה של גליון עבודה.
אתה יכול להוריד תבנית VBA IFERROR Excel כאן - תבנית VBA IFERROR Excelלדוגמא, קח את הנתונים שלמעלה להפגנה בלבד.
שלב 1: הגדר את המשתנה כמספר שלם .
קוד:
Sub Iferror_Example1 () התעמעם כמשנה סוף סוף
שלב 2: לביצוע חישוב פתח לולאה הבאה .
קוד:
Sub Iferror_Example1 () Dim אני כשלם עבור i = 2 עד 6 הבא i End Sub
שלב 3: בתוך הקוד כתוב את הקוד בתאים (I, 3) .Value =
קוד:
תת Iferror_Example1 () התעמעם כשלם עבור i = 2 עד 6 תאים (i, 3). ערך = הבא i סוף משנה
שלב 4: כדי לגשת לפונקציה IFERROR, אנחנו לא יכולים פשוט להקליד את הנוסחה אלא עלינו להשתמש במחלקה "WorksheetFunction" .
קוד:
משנה Iferror_Example1 () התעמעם כשלם עבור i = 2 עד 6 תאים (i, 3) .Value = WorksheetFunction.If הבא אני מסיים Sub
שלב 5: כפי שניתן לראות בתמונה שלעיל לאחר הכנסת הפקודה "WorksheetFunction" מחלקה אנו מקבלים את הנוסחה IFERROR. בחר את הנוסחה.
קוד:
תת Iferror_Example1 () התעמעם כשלם עבור i = 2 עד 6 תאים (i, 3) .Value = WorksheetFunction.IfError (הבא אני סוף משנה
שלב 6: אחת הבעיות ב- VBA בעת גישה לפונקציות גליון העבודה איננו יכולים לראות את הטיעונים כמו איך שראינו בגליון העבודה. עליכם להיות בטוחים לחלוטין בנוגע לוויכוחים בהם אנו משתמשים.
זו הסיבה לפני שאראה לך את ה- IFERROR ב- VBA הראיתי לך את התחביר של פונקציית גליון העבודה.
הטיעון הראשון כאן הוא "ערך" כלומר מהו התא שברצונך לבדוק לפני זה להחיל את החישוב בתא.
עכשיו ב- VBA החל את הקודים שלמטה.
קוד:
משנה Iferror_Example1 () התעמעם בתור שלם עבור i = 2 עד 6 תאים (i, 4). ערך = SheetFunction.IfError (תאים (i, 3). ערך, "לא נמצא") הבא אני סוף סיום
כעת פונקציית IFERROR בודקת שגיאות כלשהן בעמודה C, אם שגיאה כלשהי מוצאת שהיא תציג את התוצאה כ"לא נמצא "בעמודה D.
כמו זה באמצעות פונקציית IFERROR, אנו יכולים לשנות את התוצאות לפי רצוננו. במקרה זה שיניתי את התוצאה כ"לא נמצא ". אתה יכול לשנות זאת לדרישה שלך.
סוגי שגיאות, VBA IFERROR יכול למצוא
חשוב לדעת את סוגי שגיאות ה- Excel שהפונקציה IFERROR יכולה להתמודד איתה. להלן סוג השגיאות ש- IFERROR יכולה לטפל בהן.
# N / A, #VALUE !, #REF !, # DIV / 0 !, #NUM !, #NAME ?, או #NULL !.