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

اعرض الملف برنامج كنترول النقل الابتدائي من الصف الثالث ب 2018 عمل متواضع لبرنامج كنترول النقل للصف الثالث الابتدائي العام حسب اخر القرارات الوزارية 2018 اشكر كل من ساهم في انجاح هذا العمل لقد استعنت باعمال كثير من المبرمجين مع شكري واحترامي ارحب بجميع المشاركات والتعديلات صاحب الملف mansour تمت الاضافه 09 ماي, 2018 الاقسام قسم الأكسيس

اعرض الملف برنامج كنترول النقل الابتدائي من الصف الرابع حتي السادس 2018 عمل متواضع لبرنامج كنترول النقل للصفين الاول والثاني الاعدادي العام حسب اخر القرارات الوزارية 2018 اشكر كل من ساهم في انجاح هذا العمل لقد استعنت باعمال كثير من المبرمجين مع شكري واحترامي ارحب بجميع المشاركات والتعديلات صاحب الملف mansour تمت الاضافه 09 ماي, 2018 الاقسام قسم الأكسيس

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

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

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

تم اعادة التحميل Salim.xlsx

تفضل ::بالتوفيق:: إذا كنت ترى هذه المشاركة مفيدة فلا تنسى التقييم برنامج k906.2العقود.rar

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

:: اعمل استعلام لحقول الجدول وبضمنها حقل الوقت والتاريخ في معيار حقل التاريخ ضع () Date ثم ضع هذه الدالة في معيار حقل الوقت .. Between [first time] and [second time]

هذه المعادلة ( Ctrl+Shift+Enter) تحسب لك كل شيء (بدون الخلايا الفارغة) =SUM(IF(FREQUENCY(IF($B$4:$B$52<>"",MATCH($B$4:$B$52,$B$4:$B$52,0)),ROW($B$4:$B$52)-ROW($B$4)+1),1))

اوافقك الرأي تماما استاذي ومعلمي

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

التغيير يكون هنا : Public Sub circl(Rpt As Report, TxtCtrl As Control, TxtDegree As Double) الكلمة في آخر الجملة Double اي ان المتغير رقمي مزدوج بدلا من Integer عدد صحيح طويل ايضا تم التعديل في تنسيق حقل الدرجة في التقرير كي يظهر الكسر .. انظر المثال وضع_دائرة_على_رقمUP2.rar

جرب هذه المعادلة =SUMPRODUCT(IF(FREQUENCY($B$4:$B$52,$B$4:$B$52),1))

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

بارك الله فيك أخي الكريم والشق الثاني من العتب موجه للأخ صابر فهو الذي لم يشر الى صاحب الفضل الحقيقي في برنامجه

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