احمد عبد الناصر

السلام عليكم اخي علي جرب المرفق تحياتي Natega+.rar

السلام عليكم اسف تسرعت , يبدو ان هذا التعديل لا يتناسب مع المشكلة المطروحة . تحياتي

السلام عليكم دالة مميزة حقا . من الممكن اضافة الشرط عليها ليعطيها بعد جديد و تتناسب مع المطلوب . المحاولة بالمرفق . تحياتي VLOOK2ALLIF.rar

السلام عليكم اخي علي , اعتقد انه من الممكن عمل ذلك و لكن عن طريق الاكسيل (مثل الملف الاول) ,(فمعرفتي بالاكسيس بسيطة) . فان كان هذا يناسبك اخبرني و الله المستعان . تحياتي

حياك الله استاذ محمود .

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

السلام عليكم جرب المرفق لي ملاحظة : العمودين J و L لايؤثر فيهما الكود الاصلي و لذلك فكود التعديل الذي وضعته جعلته لا يؤثر كذلك فيهما . تحياتي Ad_4+.rar

السلام عليكم جرب المرفق تحياتي تحليل درجات +الطلاب.rar

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

السلام عليكم جرب تغير تنسيق الخلايا التي ترحل فيها البيانات الي رقم ,( قبل الترحيل) . و لكن من الافضل ان ترفق ملف كما تفضل الاستاذ حمادة عمر . تحياتي

السلام عليكم حياك الله استاذ علي بالطبع ابدي اعجابي بهذا العمل المتقن و المتكامل . اختم بقوله تعالى "وما أوتيتم من العلم إلا قليلا"

" إِنَّا لِلّهِ وَإِنَّـا إِلَيْهِ رَاجِعونَ " اللـهـم اّنسه في وحدته وفي وحشته وفي غربته. اللـهـم انظر اليه نظرة رضا فإن من تنظر إليه نظرة رضا لا تعذبه ابداً. اللـهـم أسكنه فسيح الجنان واغفر له يارحمن وارحم يارحيم وتجاوز عما تعلم ياعليم . اللـهـم اعفو عنه فإنك القائل "ويعفو عن كثير".

السلام عليكم جرب هذه =SUMPRODUCT(($F$2:$F$28=A1)*($H$2:$H$28=IF(COUNTIF($A$1:A1;A1)=1;"الزوج";IF(COUNTIF($A$1:A1;A1)=2;"الزوجة";IF(COUNTIF($A$1:A1;A1)=3;"الابن"))))*($G$2:$G$28)) تحياتي

السلام عليكم جرب هذه =I6&H6&G6&F6&E6&D6 تحياتي

؟؟؟ اسف يبدو انني لم اوفق في توضيح وجة نظري . لاثراء الموضوع هذا حل اخي باستخدام جملة sql و لكن اظن انها تأخذ من الوقت الكثير . select *,(select count(*) from (select distinct total as t,school as l from result ) as x where total<x.t and school=l )+1 ,(select count(*) from (select distinct total as t,Edara as l from result ) as x where total<x.t and Edara=l )+1 ,(select count(*) from (select distinct total as t from result) as x where total<x.t)+1 from result order by total desc تحياتي

السلام عليكم افتحه علي الاكسيل بإذن الله سوف يعمل ثم من اكسيس استخدم الاسترداد من ملف اكسل . تحياتي

السلام عليكم جرب المرفق تحياتي Janvier+.rar

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

السلام عليكم يستبدل هذا Val(Me.ComboBox1) بهذا Me.ComboBox1.Text و هذا Val(Me.ComboBox2) بهذا Me.ComboBox2.Text لان VAL علي حسب علمي تستخرج الارقام فقط و تهمل النص . تحياتي

جرب هذه {=MAX((اجازه!$A$2:$A$200='طلب اجازه'!$B3)*(اجازه!$C$2:$C$200))} تحياتي

السلام عليكم هذا حل اخر لاثراء الموضوع تحياتي Book1+.rar

للامانة جزء كبير من الكود مقتبس من كود الاستاذ القدير رجب جاويش . تحياتي

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

فعلا يوجد خطأ هذا كود بعد التعديل . Z = Cells(Rows.Count, 16).End(xlUp).Row + 1 X = Cells(Rows.Count, 16).End(xlUp).Row + 1 T = 16 For I = 1 To 15 If Me.Controls("textbox" & T) <> "" And Me.Controls("textbox" & T + 1) <> "" Then Cells(X, 16) = Me.Controls("textbox" & T).Value Cells(X, 17) = Me.Controls("textbox" & T + 1).Text Cells(X, 18) = Me.Controls("textbox" & T + 2).Text Cells(X, 19) = Me.Controls("textbox" & T + 3).Text Cells(X, 20) = Me.Controls("textbox" & T + 4).Text Cells(X, 21) = Me.Controls("textbox" & T + 5).Text X = X + 1 End If T = T + 6 Next Y = Cells(Rows.Count, 16).End(xlUp).Row If X > Z Then For T = 1 To 15 Cells(Z, T).Value = Me.Controls("textbox" & T).Text Next If X <> 10 Then Range("a" & Z & ":o" & Y).FillDown End If For T = 1 To 105 Me.Controls("textbox" & T) = "" Next تحياتي

السلام عليكم كلمة المرور : 951 لي استفسار : علي حد علمي يجب ان يكون تقرير الضريبة مفصل و ليس اجماليات ؟! تحياتي