السلام عليكم
أخي الكريم taksmdz
جزاك الله خيرا على الملاحظة
فقد نبهتني إلى الخطأ وهو أن القائمة المنسدلة كانت خلافا لما في العمودF
وذلك هو السبب الذي أدى لعدم إستدعاء المستويات الأخري
فجزاك الله خيرا
أما طلبك فيحققه كود أستاذنا الحبيب خبور خير
If .Cells(R, 6) = Range("E4") And .Cells(R, 7) = Range("F4") Then
بشرط أن تجعل العمودF للقسم والعمود G للصف
وتستدعي الأقسام في الورقة Liste في الخلية:E4 تكتب القسم وفي الخلية:G4 تكتب الصف
وجزا الله الجميع خيرا
أخوكم محمد