نجوم المشاركات

تفضل اخي الكريم صالح ملفك بعد التعديل وتطبيق القاعدة الشرطية عليه :: تحياتي استيراد و تصدير.rar

الاخ أبو حنــــين الاخ حسين22 يجب تبديل مكان السطرين Set My_Excel = Workbooks.Add Range("A1:H1000").Copy ليصبح Range("A1:H1000").Copy Set My_Excel = Workbooks.Add والا الملف المنتج يكون فارغ

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

السلام عليكم ورحمة الله وبركاته ،،، بناء على طلب احد الاصدقاء في المنتدى فيما يلي قاعدة بيانات تحوي نموذج به زر امر يقوم بتوليد ملف اكسل به قاعدة التحقق من الصحة بين رقمين اتمنى الفائدة للجميع :: تحياتي Excel-validation.rar

السلام عليم جرب المرفق تجميع.rar

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

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

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

وعليكم السلام ورحمة الله وبركاته الجدول الرئيسي يحتوي على الرقم والاسم والرف والقسم والرتبة؟ واضفت جدولا اخر يحتوي على نفس الحقول؟ وتريد ان تاخذ حقول الجدول الجديد المعلومات الموجودة في نفس الحقول في الجدول الرئيسي؟ متى تريد ان تاخذ نفس المعلومات؟ هل لحظة تعبئة الجدول الرئيسي؟ أم بزر امر بعد الانتهاء من تعبئة الجدول الرئيسي؟ :: في انتظار توضيحك

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

السلام عليكم ورحمة الله وبركاته فقط غير الكود الموجود في حدث زر الطباعة بهذا الكود DoCmd.OpenReport "rep1", acViewPreview, "", "", acNormal DoCmd.RunCommand acCmdPrint DoCmd.Close acReport, "rep1" بمعنى اخر فقط اضف كود اغلاق التقرير Rep1 جرب ووافني بالنتيجة :: تحياتي

بطريقة بسيطة خالص حدد العمود المراد التعديل عليه اضغط بحث واستبدال ضع في البحث علامة / وفي الاستبدال علامة / ايضا واضغط استبدال الكل وخلصت الحكاية

العفو اخي صالح لا شكر على واجب

وعليكم السلام ورحمة الله وبركاته حياك الله اخي صالح هذه جملة بناء شرط التحقق AddType: نوع المدخلات رقم او نص او رمز ويتم تغير رقم 4 حسب نوع الادخال AlerStyle: هي المتحكمة بشكل مربع الاخطار "التنبيه". وبتغيير الرقم سوف تلاحظ الفرق بعد التصدير والخطأ Operator: الرقم 1 لشرط التحقق الوارد في الورمولا1 والثاني ولو وضعت 2 سوف يتم العكس بمعنى شرط التحقق سوف يستثني الفورمولات formula1:, formula2: هذه متغيرات الشرط هذه لمسح الاوبجكت وتستطيع الاستغناء عنها في هذا المثال :: تحياتي

الاخ حسين22 بكود الاخ أبو حنــــين نكون وصلنا الي حل المشكلة فقد كنا ننسخ كامل الصفحة فلا يعمل الكود معك الان يمكن ل الاخ أبو حنــــين استخدام اخر ملف لي بأن يغير فقط طريقة النسخ فيه الي نسخ المدي بدلا من الصفحة

الأخ الكريم أبو العقاب جرب المعادلة التالية =IFERROR(IF(OR(RANK(AV93;$AV$18:$AV$92;0)=COUNTA($AV$19:$AV$92);RANK(AV93;$AV$18:$AV$92;0)=COUNTA($AV$19:$AV$92)-1);1;"");"")

ما شاء الله عليك أخي العزيز كود ممتاز جدا الله يجزيك كل الخير مطلوب شرح هذا الكود أخي .Add Type:=4, AlertStyle:=1, Operator:=1, Formula1:="1", Formula2:="20" و لماذا كتبت قبل هذا السطر .Delete

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

السلام عليكم بالفعل أخي عمر الحسيني جزاكم الله خيرا ، لم انتبه لذلك

حياك الله اخي ابو منه تفضل هذا ملفك وقد تم تعديله بما يلي: تم اضافة الكود التالي الى مربع التحرير والسرد بعد التحديث: If IsNull(Me.qsm) Then Me.FilterOn = False Else Me.Filter = "GroupID = " & Me.qsm.Column(0) & "" Me.FilterOn = True End If وتم اضافة الكود التالي لمربع نص StudentName في حدث بعد التحديث: GroupID = Me.qsm.Column(0) جرب ووافني بالنتيجة :: تحياتي waz-Copy.rar

جرب هذا الكود الذي يحفظ الملف باسم الخلية F3 و G3 لكن في المسار الموجود فيه الملف المصدر aman2.rar

بعد أذن الاخ ابو حنين و اثراءً للموضوع هذا الملف (ربما اسرع قليلاً) تجميع salim.rar

السلام عليكم ورحمة الله الشرط على التاريخ المكرر على الحقل نفسه يختلف عن الشرط الخاص بالأسماء لأن التاريخ المطلوب هو التاريخ المحصور بين التاريخين المحددين بالخلايا F1 و H1 بينما الشرط على الأسماء هو التطابق مع الاسمين المحددين بالخلايا J2 و J3 وهذا لا يتحقق في آن واحد في النطاق B:B... وفي هذه الحالة الدالة SUMIFS تعطي النتيجة 0... ولحل المشكلة يمكن استبدال معادلتك بالمعادلة التالية: =SUMPRODUCT(($C$2:$C$1000)*($A$2:$A$1000>$F$1-1)*($A$2:$A$1000<=$H$1)*(($B$2:$B$1000=$J$2)+($B$2:$B$1000=$J$3))) بن علية

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

مشكور اخى الكريم على الرد غير المتوقع فهل من سهر وبحث وكتب ونقل لك المعلومة لايستحق منك كلمة "جزاك الله خيرا ؟"