Excel-VBA - إجراء اختيار متعددة

القضية

لدي مشكلة في VBA لا يبدو أنني استدرت رأسي. لدي صفحتان (سميت على نحو مناسب A و B).
- في الورقة AI ، توجد قائمة بالأسماء ذات القيمة (القيم) على اليمين.
- في ورقة BI لديك قائمة من الأسماء مع عدم وجود الصب (القيم) إلى اليمين.
أرغب في تصميم ماكرو يأخذ الاسم الأول في الورقة A ، والعثور على هذا الاسم في الورقة B ، ونسخ التكلفة المرتبطة بهذا الاسم في الورقة A ولصقها في الورقة B.
من هناك ، يجب أن يستمر الماكرو في تحديد الاسم التالي لأسفل في الورقة "أ" ، وأن يفعل الشيء نفسه.
لذلك ستكون حلقة حتى يتم الانتهاء من الأسماء الموجودة في الورقة "أ".
يرجى عدم ظهور بعض الأسماء في الورقة "ب" على الورقة "أ" والعكس بالعكس.

يمكنك القيام بذلك دون ماكرو

ضع الصيغة التالية في الخلية B1 من الورقة 2 (يفترض أن الاسم موجود في العمود A)
= إذا (iserror (vlookup (A1 ، sheet1! A: A ، 2 ، false)) ، "" ، vlookup (A1 ، sheet1! A: A ، 2 ، false))
واسحبه إلى أسفل
إذا كنت تريد ماكرو سجل النشاط أعلاه