كيفية نسخ قيمة Combo Box إلى خلية نشطة في Excel؟
في بعض الحالات ، قد تحتاج إلى نسخ القيمة المحددة من مربع تحرير وسرد إلى الخلية النشطة. عادة ، تحتاج إلى الدخول إلى مربع التحرير والسرد ، ونسخه ولصقه في الخلية النشطة يدويًا. تقدم هذه المقالة طريقة ملائمة لتحديث الخلية النشطة تلقائيًا أثناء تحديد القيم في مربع تحرير وسرد.
انسخ قيمة مربع التحرير والسرد إلى الخلية النشطة برمز VBA
فبا 1: نسخ قيمة مربع التحرير والسرد إلى الخلية النشطة من خلال الأوامر
VBA 2: قيمة مربع التحرير والسرد للنسخ التلقائي إلى الخلية النشطة
انسخ قيمة مربع التحرير والسرد إلى الخلية النشطة برمز VBA
يمكن أن تساعدك رموز VBA أدناه في نسخ قيمة مربع التحرير والسرد إلى الخلية النشطة تلقائيًا. الرجاء القيام بما يلي.
فبا 1: نسخ قيمة مربع التحرير والسرد إلى الخلية النشطة من خلال زر الأمر
1. أولاً ، تحتاج إلى إدراج زر الأمر في ورقة العمل كما هو موضح أدناه.
2. انقر بزر الماوس الأيمن فوق زر الأمر ، ثم انقر فوق عرض الرمز من قائمة النقر بزر الماوس الأيمن. انظر لقطة الشاشة:
3. في ظهرت ميكروسوفت فيسوال باسيك للتطبيقات النافذة ، استبدل الكود الأصلي في نافذة الكود برمز VBA أدناه.
كود فبا: انسخ قيمة مربع التحرير والسرد إلى الخلية النشطة
Private Sub CommandButton1_Click()
ActiveCell.Value = Me.ComboBox1.Text
End Sub
ملاحظات: في الكود ، CommandButton1 هو اسم زر الأمر المدرج ، و ComboBox1 هو اسم مربع التحرير والسرد الذي ستنسخ القيمة منه. الرجاء تغييرها كما تريد.
4. اضغط على قديم + Q مفاتيح لإغلاق ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
من الآن فصاعدًا ، عندما تحتاج إلى نسخ قيمة مربع التحرير والسرد إلى الخلية النشطة ، يرجى تحديد الخلية ، ثم النقر فوق زر الأمر لإنجازها.
VBA 2: قيمة مربع التحرير والسرد للنسخ التلقائي إلى الخلية النشطة
يمكن أن يساعدك رمز VBA أدناه في تحديث الخلية النشطة تلقائيًا أثناء تحديد القيم في مربع تحرير وسرد. يمكنك القيام بما يلي.
1. تأكد من أن وضع التصميم قيد التشغيل تحت المطور علامة التبويب.
2. انقر بزر الماوس الأيمن فوق مربع التحرير والسرد الذي ستقوم بنسخ القيمة منه ، ثم انقر فوق عرض الرمز من قائمة النقر بزر الماوس الأيمن. انظر لقطة الشاشة:
3. في ظهرت ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، استبدل الكود الأصلي في ملف رمز نافذة مع رمز VBA أدناه.
كود فبا: انسخ قيمة مربع التحرير والسرد إلى الخلية النشطة
Private Sub ComboBox1_Change()
ActiveCell.Value = Me.ComboBox1.Value
End Sub
ملاحظات: في الكود ، ComboBox1 هو اسم مربع التحرير والسرد الذي ستنسخ القيمة منه.
4. اضغط على قديم + Q لإغلاق نافذة Microsoft Visual Basic for Applications ، وإيقاف تشغيل وضع التصميم ضمن علامة التبويب Developer.
من الآن فصاعدًا ، عند تحديد قيمة من مربع التحرير والسرد ، سيتم عرض هذا السجل المحدد في الخلية النشطة تلقائيًا.
مقالات ذات صلة:
- كيفية عرض تنسيق التاريخ في إخراج مربع التحرير والسرد في Excel؟
- كيفية إخفاء أو إظهار زر الأمر بناءً على قيمة الخلية المحددة في إكسيل؟
- كيفية فتح ورقة عمل محددة بالقيمة المحددة لمربع التحرير والسرد في إكسيل؟
- كيفية منع أو تعطيل الكتابة في مربع التحرير والسرد في إكسيل؟
- كيفية الخروج من مربع التحرير والسرد لتحديد خلية معينة في إكسيل؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!