أ/حكيم

شكراً أخي العزيز أتضحت الصورة والف شكر وبارك الله فيك

باستخدام التصفية المتقدمة .... تفضل بدون تكرار الأسماء.zip

الاخوة الاعزاء شكراً على سرعة الرد المطلوب كما ورد في رد الأخ عباد ولكن عند حذف الجمع وتشغيل الكود لا يتم الجمع إلا في الصف الأول فقط ؟؟؟؟؟؟

الاخوة أعضاء المنتدى الأعزاء أرجو المساعدة في تحويل معادلة الجمع إلى كود وشكراً جمع.zip

الأخوة أعضاء المنتدى أرجو إيجاد الترتيب للأوائل حسب الموضح في الملف ......... ولكم جزيل اشكر .... ترتيب متعدد.rar

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

شكراُ على المعادلة .... ولكن هل يوجد كــــود لعمل ذلك لتخفيف حجم الملف ... معيار النجاح حسب المجموع فالنهاية الصغرى هي 50 درجة في عمود المجموع

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

الأخ الأستاذ أبو أنس حاجب شكراُ والف شكر ........

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

الاخوة أعضاء المنتدى هل يمكن ظهور رسالة تنبية كل ربع ساعة في ملف اكسيل؟

الف شكر للإخوة جميعاُ وجزاكم الله الف خير وبارك الله فيكم................

الاخوة الاعزاء ارجو عمل كود يقوم بعمل تسلسل للبيانات حسب التوضيح في الملف المرفق ولكم جزيل الشكر مسلسل متعدد.zip

هل من إجابة لهذا السؤآل .......................................... نداء إلى عمالقة البرمجة .

شكراُ للأخ و العضو المميز الشهابي ولكن أرغب في تعديل الكود الموجود في الملف لتنفيذ المطلوب .

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

الاخوة الزملاء الاعزاء أرجو المساعدة في تعديل الكود . بنقل الاسم مع اللقب متصلين إلى العمود D في ورقة نسخة نقل.zip

ارجو أن يكون المطلوب Sheet1.zip

شكراً للأخ يوسف عطا ولو تتكرم بشرح الكودلأتمكن من إضافة أعمدة أخرى (مواد) هل يمكن ترحيل أعمدة محددة فقط وتكون الاعمدة غير متجاورة مثلا العمود 1و3و7و8و9و12و30و50:36 ...... الخ

الأخ العزيز عباد و كل أعضاء المنتدى الكرام شكراً المطلوب الأول مضبوط و المطلوب الثاني هو أن يتم مسح البيانات السابقة في الاوراق دائن و مدين و الكل قبل الترحيل حسب عدد العملاء فمثلا اذاكانالعدد 10 يتم مسح عشرة صفوف فقط وليس النطاق كاملاً . المطلوب الثالث هل يمكن ترحيل أعمدة محددة فقط وتكون الاعمدة غير متجاورة في نطاق كبير مثلا 100 عمود مثلا العمود 1و3و7و8و9و12و30و50:36 ...... الخ مع الاعتذاء للعضاء المنتدى على تعدد المطالب

شكراً استاذنا العزير أولا للكود وثانباً لسرعة الرد وكل عام وأنت و الاعضاء الكرام بخير ولو أمكن شرح بعض أجزاء من الكود ليمكن التعديل في الكود في حالة زيادة عدد المواد (زيادة أعمدة)

الاخوة الزملاء الاعزاء الموضوع موجود في المنتدى سابقا ... لو تكرمتم أرجو أضافة بعض التعديلات وهي فصل الغائبين في ورقة منفصلة ثم ترحيل الناجحين ثم الراسبين ثم الغائبين في ورقة أخرى و لكم جزيل الشكر فصل الراسب والناجح و الغائب.zip

المرفقاتترحيل5.zip الاخوة أعضاء المنتدى الاعزاء أرجو أن يكون المطلوب واضح حسب الملف المرفق.

المطلوب التعديل في الكود بحيث يتم ترحيل القيم فقط بدون تنسيقات ولا معادلات يتم الترحيل و مسح الأوراق حسب عدد العملاء وليس في نطاق ثابت بحيث يتم المسح في الأوراق دائن و مدين و الكل حسب عدد المرحلين وليس في كل النطاق عذرا لم أتمكن من ارسال الملف Sub myfilter() ' Dim lastrow As Long Application.ScreenUpdating = False With Sheets(1) .AutoFilterMode = False lastrow = Range("a" & Rows.Count).End(xlUp).Row Range("A1:D22").Select Selection.AutoFilter ActiveSheet.Range("$A$1:$D$22").AutoFilter Field:=4, Criteria1:=[F7], _ Operator:=xlOr, Criteria2:=[F9] .Range("a2:d" & lastrow).Copy Sheets(Range("F3").Value).Range("a2") .AutoFilterMode = False End With Application.ScreenUpdating = True End Sub

شكرا للإخوة الاعزاء على الاهتمام ... الأخ دغيدي الدالة RANK تعطي الترتيب إلا أنها لا تعطي الرقم التالي بعد التكرار ... لو أمكن المطلوب هو عندما يتكرر الرقم 1 مثلا ثلاث مرات تعطي معادلة الترتيب رقم 2 وليس 4 وهكذا حتى نهاية الصف وشكراُ.