تمام اخي ياسر و لكن اريد منك اخر تعديل للكود هو
=Wish(D8:R27,X12:Y23,3,14,15,10)
و هو ان يكون الكود من D8 الى R ما لا نهاية بدلا من D8 : R27
و ايضا قمت باضافة الكود للزرالتوجيه و لكن بعد الاضافة اتر ايضا على زر مستخرجات الملفات حيت اصبح يستخرج قوائم التوجهات الكلية فقط و ليس كما كان سابقا يستخرج ملف اكسل لكل توجيه اكتر توضيح موجود في الملف المرفق
Export Workbooks Using Filter Method.rar