כיצד לעגל טווח מספרים לזוגי ב-Excel?

מה זה עיגול לזוגי ב-Excel? עיגול לזוגי נקרא גם עיגול בנקאי, בעיקרון הוא דומה לעיגול רגיל, למעט המקרה שבו המספר שצריך לעגל הוא 5. אם הספרה שלפני ה-5 היא אי זוגית, עליך לעגל כלפי מעלה, ואם הספרה שלפני ה-5 היא זוגית, עליך לעגל כלפי מטה.

לדוגמה, 23.345 יעוגל לזוגי על אחוזים יהיה 23.34. ו-12.335 יעוגל לזוגי על האחוזים יהיה 12.34.

במאמר זה, אדבר על איך לבצע עיגול בנקאי ב-Excel.

עיגול מספרים לזוגי עם פונקציה מותאמת אישית

עיגול מספרים לזוגי עם קוד VBA

עיגול מספרים לזוגי עם Kutools for Excel

עיגול מספרים לזוגי עם פונקציה מותאמת אישית

ניתן להשתמש בפונקציה המוגדרת הבאה כדי לעגל מספרים לזוגי ב-Excel. אנא עשו כך:

1. בחרו את המספרים שברצונכם לעגל לזוגי.

2. לאחר מכן החזיקו את המקשים ALT + F11, וזה יפתח את חלון Microsoft Visual Basic for Applications.

3. לחצו על Insert > Module, והדבקו את המקרו הבא בחלון Module.

Function BankersRound(num, precision)
BankersRound = Round(num, precision)
End Function

4. שמור את הקוד, והכניסו את הנוסחה = bankersround(a1,2) לתא הריק הסמוך. ראו צילום מסך:

5. לאחר מכן לחצו על מקש Enter. ובחרו את התא B1, ואז גררו את הידית למילוי מעל הטווח שברצונכם לכלול את הנוסחה הזו. ראו צילום מסך:

עיגול מספרים לזוגי עם קוד VBA

אם אינכם רוצים להשתמש בפונקציה המוגדרת, הקוד VBA הבא גם יכול לעזור לכם. עשו כך:

1. בחרו את הטווח שברצונכם לעגל לזוגי.

2. לאחר מכן החזיקו את המקשים ALT + F11, וזה יפתח את חלון Microsoft Visual Basic for Applications.

3. לחצו על Insert > Module, והדבקו את הקוד הבא בחלון Module.

Sub RoundToEven()
'Update 20131107
Dim rng As Range
Dim WorkRng As Range
Dim intNumberOfDecimal As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
intNumberOfDecimal = Application.InputBox("NumberOfDecimal", xTitleId, Type:=1)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each rng In WorkRng
    rng.Value = Round(rng.Value, intNumberOfDecimal)
Next
End Sub

4. לאחר מכן לחצו על מקש F5 כדי להריץ את הקוד הזה, בתיבת ההודעה, הזינו את מספר הספרות העשרוניות שברצונכם לעגל. ראו צילום מסך:

5. לאחר מכן לחצו על OK, כל המספרים שנבחרו יעוגלו לזוגי. ראו צילומי מסך:

עיגול מספרים לזוגי עם Kutools for Excel

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

Kutools for Excel כולל יותר מ-300 כלי Excel שימושיים. ניתן לנסות בחינם ללא הגבלה במשך 30 יום. קבלו אותו עכשיו.

לאחר התקנת Kutools for Excel, תוכלו לעשות כך:

1. הדגישו את הטווח שברצונכם לעגל לזוגי.

2. לחצו על Kutools > Round.

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

4. לאחר מכן לחצו על OK או Apply, כל המספרים יעוגלו לזוגי בשתי ספרות עשרוניות.

לחצו על עיגול לזוגי כדי ללמוד עוד על תכונה זו.

מאמר קשור:

עיגול / עיגול למעלה / עיגול למטה טווח של מספרי תאים ב-Excel