مشكلة في الفرز التصاعدي

[seif eldin]

السلام عليكم

تواجهني مشكلة عندما أصدر هذا الملف

من موقع البنك على الأكسيل

فلا يكون مرتبا للعمليات تاريخيا

فعندما أحاول الفرز لا يمكنني ذلك

فهل يمكن مساعدتي لأنني أقوم بعملها يدويا في كل مرة

Banking2_1_10_to_31_10_06.rar

[ابو اسامة العينبوسي]

اجريت تعديل على الملف شاهده واخبرني

عند الانتقال من خليه لاخرى في العمود الاول يتم الفرز مباشره

Banking2_1_10_to_31_10_06.rar

تم تعديل نوفمبر 25, 2006 بواسطه ابو اسامة العينبوسي

[seif eldin]

أخي لقد شاهدت الملف

جزاك الله خيرا

ولكنه لا يزال كما هو ولا يتم ترتيبه

[ابو اسامة العينبوسي]

حسب اي عمود تريد الفرز اخي العزيز ؟؟

[seif eldin]

أريد الفرز حسب العمود الأول

[علي السحيب]

أسمحوا لي على المُداخلة ..

الكود الذي وضعة الأخ ابو اسامة العينبوسي سليم ولكنه لا يشتمل على نطاق الجدول بأكمله فهو يقوم بفرز البيانات التي في العمود الأول فقط.

وبعد التعديل على الكود لكي يشمل جميع أعمدة الجدول .. يصبح هكذا:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.[A3:E1000].SortSpecial xlAscending
End Sub

وهذا الكود أيضاً يقوم بنفس المهمة:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A3:E1000].Sort [A3], xlAscending
End Sub

[ابو اسامة العينبوسي]

شكرا اخ على

و بارك الله فيك