جدول المحتويات
أثناء العمل مع VBA في Excel ، غالبًا ما يتعين علينا ربط السلاسل (السلاسل) والمتغير (المتغيرات) في ورقة العمل. تُستخدم السلسلة (السلاسل) المتسلسلة والمتغير (المتغيرات) على نطاق واسع في جميع القطاعات تقريبًا في أعمالنا ، بدءًا من تلخيص نتائج الطلاب إلى تحليل الأعمال المعقدة. في هذه المقالة ، سأوضح لك كيف يمكنك ربط سلسلة (سلاسل) ومتغير (متغيرات) في ورقة عمل باستخدام VBA في Excel. سأشرح الأشياء مع الأمثلة والرسوم التوضيحية المناسبة.
سلسلة (سلاسل) متسلسلة ومتغير (متغيرات) في Excel VBA (عرض سريع)
تنزيل المصنف التدريبي
تنزيل هذا المصنف التدريبي للتمرين أثناء قراءة هذه المقالة.
السلسلة المتسلسلة والمتغير. xlsm
سلسلة (سلاسل) متسلسلة ومتغير (متغيرات) في Excel VBA (تحليل خطوة بخطوة)
أولاً ، دعنا نرى كيف يمكننا توصيل سلسلة (سلاسل) والمتغير (المتغيرات) في VBA خطوة بخطوة.
⧪ سلسلة (سلاسل) متسلسلة:
لتوصيل سلسلتين أو أكثر في VBA ، يمكنك استخدام كل من رمز الجمع الحسابي (+) ورمز علامة العطف (& amp؛ ).
على سبيل المثال ، للتسلسل السلاسل “Great Expectations” و “A Tale of Two Cities” مع فاصلة ، يمكنك استخدام:
3013
أو ،
5284
قم بتشغيل أي من الرموز أعلاه. سيعرض الإخراج المتسلسل ، توقعات كبيرة ،حكاية مدينتين .
⧪ سلسلة متغير (متغيرات)
إذا كانت جميع المتغيرات تحتوي على قيم سلسلة ، ثم يمكنك استخدام كل من رمز الجمع الحسابي (+) ورمز علامة العطف (& amp؛) .
ولكن إذا لم يحدث ذلك ، فيمكنك استخدام فقط رمز العطف (& amp؛) للتسلسل.
على سبيل المثال ، لدينا متغيرين ، A و B .
يحتويA على سلسلة ، "A Tale of Two Cities" ، و B تحتوي على سلسلة أخرى ، "The Forty Rules of Love" .
يمكنك استخدام كل من رمز الإضافة (+) و علامة العطف (& amp؛) لربطهما.
5845
أو ،
1626
في كلتا الحالتين ، سيعيدون السلسلة المتسلسلة.
ولكن إذا كان A عبارة عن سلسلة ( "A Tale of Two Cities" ) و B عبارة عن عدد صحيح ( 27 ) ، يجب عليك استخدام رمز العطف (& amp؛) للتسلسل.
1384
سيعيد الإخراج المتسلسل .
أمثلة على Concat enate سلاسل ومتغيرات في Excel VBA (تتضمن ماكرو و UDF و UserForm)
لقد تعلمنا أن نربط سلسلة (سلاسل) ومتغير (متغيرات) باستخدام VBA في Excel . هذه المرة سوف نستكشف بعض الأمثلة التي تتضمن سلسلة (سلاسل) متسلسلة ومتغير (متغيرات) مع VBA .
مثال 1: تطوير ماكرو لسلسلة (سلاسل) متسلسلة و متغير (متغيرات) في Excel VBA
لقد تعلمناربط السلاسل والمتغيرات بـ VBA . هذه المرة سنقوم بتطوير ماكرو لتسلسل سلاسل ومتغيرات أعمدة متعددة في ورقة عمل.
هنا لدينا مجموعة بيانات بها أسماء كتب ، المؤلفون ، و أسعار لبعض الكتب في مكتبة تسمى Martin Bookstore.
دعونا نطور ماكرو لتسلسل الأعمدة 1 ، 2 ، و 3 من مجموعة البيانات B4: D14 في الخلية F4 .
رمز VBA سيكون:
⧭ كود VBA:
7564
⧭ Output :
قم بتشغيل هذا الرمز. ستحصل على أعمدة 3 متسلسلة في النطاق F4: F14.
قراءة المزيد: ماكرو ربط عدة أعمدة في Excel (مع UDF و UserForm)
مثال 2: إنشاء دالة معرّفة من قبل المستخدم لسلسلة (سلاسل) متسلسلة ومتغير (متغيرات) في Excel VBA
لقد تعلمنا تطوير ماكرو لسلسلة أعمدة متعددة من مجموعة بيانات. هذه المرة سننشئ دالة معرّفة من قبل المستخدم لتسلسل السلاسل أو المتغيرات في Excel.
سيكون رمز VBA الكامل:
⧭ كود VBA:
9303
الإخراج:
حدد العمود الذي تريد ربط السلسلة فيه النطاق وأدخل هذه الصيغة:
=ConcatenateValues("She","H. Rider Haggard",", ") ستعيد She ، H. Rider Haggard كإخراج.
مرة أخرى ، أدخل الصيغة:
=ConcatenateValues(B4:B14,30,", ") [ Array Formula . لذلك لا تنسىاضغط على CTRL + SHIFT + ENTER ما لم تكن في Office 365 .]
سوف يتم ربط 30 بكافة قيم النطاق B4: B14 .
أخيرًا ، أدخل:
=ConcatenateValues(B4:B14,C4:C14,", ") [مرة أخرى صيغة المصفوفة . لذلك لا تنس أن تضغط على CTRL + SHIFT + ENTER إلا إذا كنت في Office 365 .]
سوف يربط جميع قيم النطاق B4: B14 مع تلك الخاصة بـ C4: C14 .
اقرأ المزيد: كيفية التسلسل في Excel (3 طرق مناسبة)
قراءات مماثلة:
- كيفية دمج نص من خليتين أو أكثر في خلية واحدة في Excel (5 طرق)
- دمج الصفوف في خلية واحدة في Excel
- سلسلة الأرقام في Excel (4 صيغ سريعة)
- دمج النص في Excel (8 طرق مناسبة)
- كيفية ربط الفاصلة العليا في Excel (6 طرق سهلة)
مثال 3: تطوير UserForm لسلسلة (سلاسل) ومتغير (متغيرات) في ورقة عمل مختلفة في Excel VBA
لقد تعلمنا تطوير ماكرو و من تحديد المستخدم وظيفة لتسلسل السلاسل والقيم. أخيرًا ، سنقوم بتطوير UserForm لتسلسل السلاسل والقيم إلى الموقع المطلوب لورقة العمل المطلوبة.
⧪ الخطوة 1: إدراج UserForm
اذهب إلى إدراج & GT. خيار UserForm في شريط أدوات VBA لإدراج نموذج مستخدم جديد .
⧪ الخطوة 2: السحب أدواتسيتم فتح UserForm
A UserForm يسمى UserForm1 مع Toolbox يسمى Control .
حرّك الماوس فوق مربع الأدوات e واسحب 2 ListBoxes و 5 TextBoxes و 7 Labels و 1 CommanButtons في UserForm .
قم بتغيير شاشات عرض الملصقات كما هو موضح في الشكل.
وبالمثل ، قم بتغيير عرض CommandButton إلى OK .
⧪ الخطوة 3: كتابة التعليمات البرمجية لـ TextBox1
انقر نقرًا مزدوجًا فوق TextBox1 . سيتم فتح إجراء إجراء فرعي خاص يسمى TextBox1_Change . أدخل الكود التالي هناك.
8566
⧪ الخطوة 4: كتابة كود TextBox3
وبالمثل ، انقر نقرًا مزدوجًا فوق TextBox3 . سيتم فتح إجراء آخر إجراء فرعي خاص يسمى TextBox3_Change . أدخل الكود التالي هناك.
7458
⧪ الخطوة 5: كتابة كود TextBox4
أيضًا ، انقر نقرًا مزدوجًا على TextBox3 . سيتم فتح إجراء آخر إجراء فرعي خاص يسمى TextBox3_Change . أدخل الرمز التالي هناك.
3804
⧪ الخطوة 6: كتابة الرمز لـ ListBox2
ثم انقر نقرًا مزدوجًا فوق ListBox2 . عندما يفتح الإجراء الفرعي الخاص المسمى ListBox2_Click ، أدخل هذا الرمز هناك.
7100
⧪ الخطوة 7: كتابة الكود لـ CommanButton1
أيضًا ، انقر نقرًا مزدوجًا فوق CommandButton1 . بعد إجراء إجراء فرعي خاص يسمى CommandButton1_Changeيفتح ، أدخل الكود التالي هناك.
2888
⧪ الخطوة 7: كتابة التعليمات البرمجية لتشغيل UserForm
الآن هي الخطوة الأخيرة. أدخل وحدة وحدة جديدة من شريط أدوات VBA وأدخل الكود التالي.
2705
⧪ الخطوة 8: التشغيل نموذج المستخدم
نموذج المستخدم جاهز الآن للاستخدام. لتشغيله ، حدد مجموعة البيانات من ورقة العمل (بما في ذلك رؤوس ) وتشغيل ماكرو يسمى Run_UserForm .
يتم تحميل نموذج المستخدم مع جميع الخيارات. سيظهر عنوان النطاق المحدد في TextBox1 ( B3: D4 هنا). إذا كنت ترغب في ذلك ، يمكنك تغييره. سيتغير النطاق المحدد في ورقة العمل.
حدد الأعمدة التي تريد تسلسلها من أعمدة إلى Concat ListBox. لقد حددت هنا اسم الكتاب و السعر .
أدخل الفاصل . لقد أدخلت هنا فاصلة ( ، ).
حدد اسم ورقة العمل حيث تريد وضع النطاق المتسلسل من متسلسل في مربع القائمة. لقد أدخلت هنا Sheet3 .
(في اللحظة التي تحدد فيها الورقة ، سيتم تنشيطها ، حتى لو لم تكن نشطة.)
ثم أدخل موقع الإخراج . إنه مرجع الخلية للخلية الأولى من النطاق المتسلسل. لقد وضعت هنا B3 .
(في اللحظة التي تدخل فيها موقع الإخراج ، سيتم تحديد نطاق الإخراج).
وأخيراً ، دخولاسم رأس الإخراج (رأس نطاق الإخراج). لقد وضعت هنا النطاق المتسلسل .
(في اللحظة التي تضع فيها رأس الإخراج ، سيتم تعيين رأس عمود الإخراج.)
انقر فوق موافق . ستحصل على الإخراج المطلوب في الموقع المطلوب.
اقرأ المزيد: كيفية ربط السلسلة والعدد الصحيح باستخدام VBA
الخاتمة
إذن هذه بعض الأمثلة التي يمكنك من خلالها استخدام Excel VBA لسلسلة السلاسل والمتغيرات. أتمنى أن تكون الأمثلة قد أوضحت كل شيء بالنسبة لك. هل لديك اسئلة؟ اسألني بكل حرية. ولا تنس زيارة موقعنا ExcelWIKI لمزيد من المشاركات والتحديثات.
