כיצד לשלב שורות עם אותו מזהה/שם ב-Excel?

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

• שילוב שורות עם אותו מזהה/שם באמצעות VBA
• שילוב שורות עם אותו מזהה/שם באמצעות Kutools for Excel

שילוב שורות עם אותו מזהה/שם באמצעות VBA

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

1. לחץ על המקשים "Alt + F11" כדי לפתוח את חלון Microsoft Visual Basic for Applications.

2. לחץ על "הוסף" > "מודול", ולאחר מכן הדבק את קוד ה-VBA לחלון המודול.

VBA: שילוב שורות עם אותו מזהה/שם ב-Excel

Sub Consolidate_Rows()
Dim xRg As Range
Dim xRows As Long
Dim I As Long, J As Long, K As Long
On Error Resume Next
Set xRg = Application.InputBox("Select Range:", "Kutools For Excel", Selection.Address, , , , , 8)
Set xRg = Range(Intersect(xRg, ActiveSheet.UsedRange).Address)
If xRg Is Nothing Then Exit Sub
xRows = xRg.Rows.Count
For I = xRows To 2 Step -1
For J = 1 To I - 1
If xRg(I, 1).Value = xRg(J, 1).Value And J <> I Then
For K = 2 To xRg.Columns.Count
If xRg(J, K).Value <> "" Then
If xRg(I, K).Value = "" Then
xRg(I, K) = xRg(J, K).Value
Else
xRg(I, K) = xRg(I, K).Value & "," & xRg(J, K).Value
End If
End If
Next
xRg(J, 1).EntireRow.Delete
I = I - 1
J = J - 1
End If
Next
Next
ActiveSheet.UsedRange.Columns.AutoFit
End Sub

3. לחץ על מקש F5 או לחץ על כפתור ההרצה כדי להריץ את ה-VBA.

4. בתיבת הדו-שיח Kutools for Excel שתופיע, אנא בחר את השורות שתרצה לשלב, ולחץ על כפתור אישור. ראה צילום מסך:

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

שילוב שורות עם אותו מזהה/שם באמצעות Kutools for Excel

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

1. בחר את טווח הנתונים שתרצה לשלב, ולחץ על "Kutools" > "מיזוג והפרדה" > "מיזוג מתקדם של שורות". ראה צילום מסך:

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

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

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

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

מאמרים קשורים:

כיצד לשרשר תוך שמירת עיצוב מספרים/תאריכים ב-Excel?

כיצד לשרשר תאים מתוך גיליון אחר/גיליונות שונים ב-Excel?