Skip to main content

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

Author: Siluvia Last Modified: 2025-05-30

قد يكون من السهل عليك دمج نصوص خلايا متعددة في خلية جديدة باستخدام صيغة. ولكن هل تعرف كيفية دمج قيم خلايا متعددة في مربع نص (ActiveX Control)؟ في الواقع، الطريقة في هذه المقالة يمكن أن تساعدك على تحقيق ذلك.

دمج نصوص خلايا متعددة في مربع نص باستخدام كود VBA


دمج نصوص خلايا متعددة في مربع نص باستخدام كود VBA

الطريقة أدناه يمكن أن تساعدك على دمج نصوص خلايا متعددة في مربع نص في Excel.

1. في ورقة العمل التي تريد دمج الخلايا المتعددة فيها، أدخل مربع نص بالضغط على مطور > إدراج > مربع نص (ActiveX Control). انظر لقطة الشاشة:

click Text Box from developer tab

2. ثم اضغط على مطور > إدراج > زر أمر (ActiveX Control) لإدراج زر أمر في ورقة العمل.

click Command Button from developer tab

3. انقر بزر الماوس الأيمن على زر الأمر الذي تم إدراجه، ثم حدد عرض الكود من قائمة السياق. انظر لقطة الشاشة:

Right-click the command button, then select View Code

4. في نافذة Microsoft Visual Basic for Applications، يرجى استبدال الكود الأصلي بالكود التالي لـ VBA.

كود VBA: دمج نصوص خلايا متعددة في مربع نص

Private Sub CommandButton1_Click()
    Dim xRg As Range
    Dim xCell As Range
    Dim xStr As String
    On Error Resume Next
    Set xRg = Application.Selection
    If xRg Is Nothing Then Exit Sub
    With Me.TextBox1
        .Text = vbNullString
        .MultiLine = True
        .WordWrap = True
        For Each xCell In xRg
            xStr = xCell.Value
            .Text = Me.TextBox1 & xStr & Chr(10)
        Next
    End With
End Sub

ملاحظة: CommandButton1 هو اسم زر الأمر الذي تم إدراجه. يرجى تغييره حسب الحاجة.

5. أوقف وضع التصميم بالضغط على مطور > وضع التصميم.

6. حدد الخلايا التي تحتاج إلى دمج النصوص فيها في مربع نص، ثم اضغط على زر الأمر. وبعد ذلك يتم دمج محتويات جميع الخلايا المحددة فورًا في مربع النص كما هو موضح في لقطة الشاشة أدناه.

click the Command Button, all selected cell contents are concatenated into the textbox

a screenshot of kutools for excel ai

פתחו את הקסם של Excel עם Kutools AI

  • ביצוע חכם: בצעו פעולות בתאים, ניתוח נתונים ויצירת תרשימים - הכל מונע על ידי פקודות פשוטות.
  • נוסחאות מותאמות אישית: צור נוסחאות מותאמות אישית כדי להיעיל את זרימת העבודה שלך.
  • תכנות VBA: כתבו והטמיעו קוד VBA ללא מאמץ.
  • פרשנות נוסחאות: הבינו נוסחאות מורכבות בקלות.
  • תרגום טקסט: שברו את מחסומי השפה בגיליונות הנתונים שלכם.
שפרו את יכולות ה-Excel שלכם עם כלים המופעלים על ידי AI. הורידו עכשיו וחוו יעילות כ никогда קודם לכן!

مقالات ذات صلة:

כלי הפרודוקטיביות הטובים ביותר ל-Office

🤖 Kutools AI Aide: מהפכה בניתוח נתונים באמצעות: ביצוע חכם |צור קוד |צור נוסחאות מותאם אישית |נתח נתונים וייצר תרשימים |הפעל פונקציות משופרות
פיצ'רים פופולריים: מצא, הדגש או סמן כפילויות | מחק שורות ריקות | שלב עמודות או תאים מבלי לאבד נתונים |   עיגול ...
חיפוש מתקדם: VLookup עם מספר קריטריונים | VLookup לערכים מרובים | חיפוש במספר גליונות | התאמה עמומה ....
רשימת נפתחת מתקדמת: צור במהירות רשימה נפתחת | רשימה נפתחת תלויה | רשימה נפתחת עם בחירה מרובה ....
מנהל עמודות: הוסף מספר עמודות מסוים | העבר עמודות | החלף מצב תצוגה של עמודות מוסתרות | השווה טווחים ועמודות ...
פיצ'רים נבחרים: מיקוד רשת | תצוגת עיצוב | שורת נוסחאות משופרת | נהל חוברת עבודה וגליון עבודה | ספריית טקסט אוטומטי (Auto Text) | בורר תאריך | מיזוג נתונים | הצפן/פענח תאים | שלח דואר אלקטרוני לפי טבלה חד-ממדית | סינון מתקדם | סינון מיוחד (סנן תאים עם גופן מודגש/נטוי/קו חוצה...) ...
15 ערכות כלים מובילות:12 כלי טקסט (הוסף טקסט, מחק תווים מסוימים, ...) | מעל50 סוגי תרשימים (תרשים גאנט, ...) | מעל40 נוסחאות חכמות (חישוב גיל על פי תאריך לידה, ...) |19 כלי הוספה (הכנס קוד QR, הכנס תמונה מנתיב, ...) |12 כלי המרה (המרה למילים, המרת מטבע, ...) |7 כלי מיזוג ופיצול (מיזוג מתקדם של שורות, פיצול תאים, ...) | ...ועוד

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


Office Tab מביא ממשק טאב ל-Office והופך את העבודה שלך להרבה יותר קלה

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