ياسر خليل أبو البراء

هل الملف يعمل معك أخي إبراهيم؟

بسم الله ما شاء الله تبارك الله شرح أكثر من رائع وأسلوب متميز نتمنى الاستمرار في هذه السلسلة الممتعة أسأل الله عزوجل أن يجعل أعمالك في ميزان حسناتك يوم القيامة وأن ينفع بك المسلمين

الأخ مجدي الأخ ضاحي الغريب الأخ تامر ديجيتال الأخ أبو محمد عباس بارك الله فيكم على مروركم العطر وتشريفكم بالردود على موضوعي المتواضع

السلام عليكم إخواني عثرت على هذا الملف في ملفاتي القديمة عند فتح الملف لا يعمل البرنامج حاولت أغير إعدادت الماكرو كما هو موضح بالملف ومفيش فايدة لا يظهر الخيار Enable Content HijriCalendar File 07.zip

السلام عليكم إخواني الكرام اقترب العام 2015 وهذه هدية بسيطة لكم .. تقويم يمكنم الاستفادة منه .. يمكن طباعة التقويم للعام كله في ورقة واحدة 2015 Calendar.rar

يمكن استخدام النطاق بدلا من كتابة بنود المصفوفة بالشكل التالي : Sub SortCustomList() Dim vArray() As Variant 'Change the range which you want to set the custom list. vArray = Range("J1:J5") Dim i As Long For i = LBound(vArray, 1) To UBound(vArray, 1) Debug.Print vArray(i, 1) Next Application.AddCustomList vArray Range("A1").CurrentRegion.Sort key1:=Range("A1"), OrderCustom:=Application.CustomListCount + 1 Application.DeleteCustomList Application.CustomListCount End Sub كل عام وأنتم بخير إخواني الأعزاء

تفضل أخي قصي Sort Custom List.rar

بعد إذن الأستاذ رجب عدلت في ملفك ليناسب طلب الأخ أكرم الانتقال الى أى كلمة داخل المستند.rar

وجدت حل للكود حتى يعمل مع اللغة العربية تفضل المرفق التالي Sort Custom List.rar

الأخ سالم تفضل الملف المرفق فيه ترتيب محدد كما تريد Custom List أي قائمة مخصصة بالأكواد رجاء من كبار المنتدى حل مشكلة اللغة العربية في هذا الكود ، حيث أن الكود يعمل بكفاءة مع الإنجليزية أما إذا استخدمت قائمة مخصصة باللغة العربية فلا تكون النتائج صحيحة أرجو الحل Sort Custom List.rar

الحمد لله الذي بنعمته تتم الصالحات الحمد لله أن تم حل المشكلة التي تم طرحها مسبقاً .. أؤكد لك أن الموضوع المطروح مسبقا لم يلتفت إليه عمالقة المنتدى وإلا لكانت المشكلة قد تم حلها في حينها..

أخي الغالي هل جربت حذف المكتبات المفقودة Missing وجرب أن تقوم بعمل ريستارت للجهاز بعد حفظ الملف

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

الحمد لله الذي بنعمته تتم الصالحات

جرب أخي المرفق التالي Advanced Search.rar

أو حل آخر جرب هذا الملف Remove Library References.rar

أخي الحبيب جرب التالي اذهب إلى محرر الفيجوال بيسك ثم من قائمة Tools اختر Reference ثم ابحث عن كلمة Missing وأزل علامة الصح التي بجانبها

وهذا مرفق للكود الذي تفضل به أستاذنا الكبير عبد الله فتح مصنف اعتمادا على قيمة خلية.rar

وهذا حل آخر ليس الاختلاف في المعادلة إنما في النطاق المتغير FirstC و SecondC معادلة باستخدام نطاق متغير.rar

لن أزيد على كلمة واحدة أخي رجب جاويش مبدع

جرب الدالة TRIM =TRIM(A1) حيث A1 هي الخلية المراد حذف الفراغات منها

الأخ الحبيب عادة ما يتم تجهيز أرقام الجلوس مرة واحدة بشكل متسلسل حسب ترتيب الصف ثم الاسم ما الداعي لعمل معادلة لها مع وجود تصفية تلقائية؟

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

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

الأخت أم عبد الله بارك الله فيكي ومشكور جدا على مرورك العطر ودعائك الجميل