omar elhosseini

اكثر من رائع اخى وجهد مشكور يستحق الدراسة والاستفادة منه

شاهد الرفق اخى يتم انتاج ملف جديد كل ورقة تحمل اسم احد الافراد وتحتوى على بياناتة فقط Copy_Every_Name_2_Sh_2_N_Wb.rar

السلام عليكم ورحمة الله وبركاتة أبو عبدالله اخى الاكثر من رائع والاكثر منى نشاطا لمساعدة اعضاء المنتدى لاتعتذر اخى العزيز جميعا سعداء بالنشاط الملحوظ فى منتدانا منك ومن الكثير من الاخوة اللذين يسارعون فى خدمة اخوانهم وحل مشاكلهم وهى شيم الكرام (العربان) وهذ يعنى او بصيغة اخرى ان نقول (نحن العرب هنا اخوة) اما عدم تعقيبى فتلاحظ قلة تعقيباتى فى الاسابيع الاخيرة لإنشغالى بملف للأخ (ناصر أحمد حاجب) اعمل عليه منذ 3 اسابيع ولكنى من خلال هذا اقوم بالرد على بعض المشاركات وعلاوة على ذلك دائما اعمل على ترك فسحه كبيرة للأخرين بالرد لزيادة نشاط منتدنا العزيز واقوم بالرد على بعض المشاركات المتروكة بدون رد واستطيع العمل عليها واحيانا اشترك فى مشاركة قام بالرد عليها احد الاخوة بفكرة اخرى كما فعلت لإثراء الموضوع من ناحية اخرى او ارى ان الرد يحتاج بعض التدعيم والاصل هنا هو حصول العضو على افضل مساعده وليس اول مساعدة وفى النهاية اخى العزيز كلنا نبغى الثواب من الله عز زجل والسلام عليكم ورحمة الله وبركاتة

شاهد المرفق ______________2.rar

شاهد المرفق اخى طريقة اخرى بجانب مساعدة اخى ابو اسامة ______________________.rar

رائع اخى هارون الى الامام دائما الكثير من الاخوة الجدد على الاكسيل يحتاجون مثل هذه الشروحات الاولية

اخى العزيز سيتم التعديل كما تريد ولكنى اود توضيح عمل الملف السابق الزر ( SHOW ALL ) ليس لإظهار الارقام المفلتره بل لإظهار كل الارقام بدون استخدام الفلتر وعند مسح الارقام من النموذج يكون العمود (F) خالى من الارقام وتوجد ميزة اخرى ايضا وهى : عند ادخال اى رقم فى عمود (من) وقبل ادخال الرقم فى عمود (الى) يتم اظهار الجميع وعند ادخال الرقم فى عمود (الى) تتم الفلترة اليك المرفق بعد التعديل كما تريد ______________1.rar

واليك طريقة اخرى بجانب اقترحات الاخوة ______________0.rar

شاهد المرفق ahtmal_1.rar

شاهد المرفق Test_2.rar

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

مقياس الصبر لن يكون بالساعات

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

استكمالا لطرق تحويل الصف الى عمود والعكس يمكن استخدام المعادلة التالية وهى ليس مصفوفة ولكن معادلة عادية وفى المثال المرفق يمكن تحويل العمود الى صف وايضا تحوبل الصف الى عمود عند تحويل العمود الى صف على سبيل المثال يمكن استخدام المعادلة التالية =INDEX(MyCol;COLUMN()-3+1) مدى العمود المراد تجويلة الى صف هو (A3:A12) وهو مدى مسمى يأسم (MyCol) والرقم (3) الموجود فى الصيغة هو رقم عمود اول خلية فى الصف المراد التحويل اليه ويوجد بالمرفقات مثالين احدهما تحويل العمود الى صف والاخر تحويل الصف الى عمود . شاهد المرفقات : TRANSPOSE_1.rar

وعلى هذا الرابط ايضا يمكنك فى خطوة واحدة استرجاع اعدادات الاكسل الاصلية حمل ملف استرجاع اعدادات الاكسل الاصلية

الحل النهائى لك بإذن الله يا اخى على هذا الرابط استرجاع اعدادات الاكسل الاصلية, فى خطوة واحدة اجعل الاكسيل جديدا بدلا من ازالتة وتركيبة

كثيرا ما تفقد بعض خواص الاكسيل لأسباب غير معروفة او لبعض الاسباب المعروفة مثل تحميل بعض ملفات الاكسيل ذات المستوى المرتفع التى تقوم بمنع استخدام بعض خواص الاكسيل كنوع من الحماية وغى اغلب الاحوال بعد ان يعجز المستخدم عن استرداد هذه الخواص بالطرق العاديه من داخل الاكسيل يضطر الى ازالة الاكسيل نهائيا واعادة تركيبة واضاعة الكثير من الجهد والوقت وفى بعض الاحيان لاتنفع هذه الطريقة ابضا فيلجأ المستخدم الى ازالة الويندوز واعادة تركيب النظام من جديد وهذا اضعف الايمان مع اضاعة الكثير من الوقت والجهد ولكن كل هذا يحدث من قلة خبراتنا بالاكسيل والويندوز وضعف معرفتنا العلمية بهما . وقد تتاح فى بعض الاحيان لبعضنا بعض المعرفة اثناء البحث والتجوال فيطوع هذه المعرفة لخدمة الاكسيل كما حدث مع الان لإسترجاع اعدادات الاكسل الاصلية لمن يعمل على اكسيل 11 دبل كليك على الملف الموجود بالمرفقات MyBasicExcel_11.rar لإسترجاع اعدادات الاكسل الاصلية لمن يعمل على اكسيل 10 دبل كليك على الملف الموجود بالمرفقات MyBasicExcel_10.rar

اخى ضع فى بداية الكود الامر التالى : On Error Resume Next وضع فى نهاية الكود الامر التالى : On Error Goto تختفى رسالة الخطأ بإذن الله اما اذا اردت بعض الطرق المختلفة لإختيار ورقة ما من مصنف والغير تقليدية مع سلاسة التعامل وبدون كتابة فبمكن عرض بعض الطرق المختلفة

شاهد المرفق ____1.rar

الاخوة الاعزاء لقد سبق شرح هذا الموضع عشرات المرات سابقا فلو وجد احدكم من وقته بعض الدقائق ليبحث فى المنتدى بإستخدام خاصية البحث عن (التصفية المتقدمة) لوجد الكثير من الشروحات لإخوه واساتذة افاضل اسهبو فى شرح الموضوع وعلى العموم التصفية المتقدمة يمكن استخدامها من قائمة (ادوات / تصفية / تصفية متقدمة) ولكن فى هذا الملف تم استخدام كود التصفية المتقدمة بدلا من استخدامها من خلال القوائم والفرق الوحيد بين استخدامها من خلال القوائم او استخدامها من خلال كود الفجوال هو فرق واحد فقط وهو : عند استخدام التصفية المتقدمة من خلال القوائم يجب ان تكون المعطيات والمخرجات فى ورقة واحدة اما بأستخدام كود الفجوال بيسك فيمكن ان تكون المعطيات فى ورقة والمخرجات فى ورقة اخرى والكود المستخدم يستقيل ثلاثة متغيرات : [left] Range("MyData").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _ "MyCri"), CopyToRange:=Range("MyRes"), Unique:=False[/left] وقد استخدمت اسماء النطاقات لأسماء الامدية بدلا من العناوين المرجعية . المتغير الاول : هو مدى جدول البيانات الاساسى المراد استخراج البيانات منه او عنوانه وهو مدى مسمى بأسم (MyData) المتغير الثانى : هو مدى الشروط التى سيتم استخراج البيانات على اساسه وهو المدى (MyCri) المتغير الثالث : هو النطاق او المدى الذى سيتم وضع النتائج المستخرجة فيه وهو المدى المسمى (MyRes) وهناك ملحوظه هامة جدا !!!!!!!!!! حتى يستطيع المتلقى فهم اى شرح لأكواد الفجوال بيسك يجب ان يجيد التعامل مع ورقة الجداول واجادة استخدام الدوال فيها ثم يأتى بعد ذلك دور البحث او طلب اى شرح للاكواد لانه بدون ذلك يكون الشرح عقيم ولا فائده منه للمتلقى لعدم وجود الارضية او المناخ الذى يستطيع من خلاله استيعاب اى شرح للأكواد . واحب ان نوه للأخوة الاعزاء يجب اولا قبل استخدام اكواد التصفية المتقدمة يجب اجادة التصفية المتقدمة من خلال القوائم اولا !!!!!

رغم ان منطق المطلوب به خطأ اليك احد الحلول Help_Me_1.rar

اخى sameer badr لن تفلح هذه الطريقة مع هذا العدد من البيانات فسيكون عدد الخلايا المحتوية على صيغ مركبة يقرب من 85 ألف خلية وهذا سيجعل عملية اعادة الحساب بطيئة قد اجد لك حل اخر ولكن بدون وعد او قد يجد احد الاخوة حل افضل

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

تم زيادة مدى الصفوف من 100 صف إلى 10000 صف (عشرة الاف صف) Test_2.rar

اخى اذا كن المقصود ان الرقم المدخل لا يزيد عن 99999 فيمكن استخدام التحقق من الصحة كعدد صحيح بين 1 و 99999 لبرفض خلاف ذلك مع النبية طبعا و يمكن ايضا التنبية ويخيرك بين القبول او الرفض