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

السلام عليكم ورحمة الله وبركاته بعد ان استفاضنا فى المناقشات فى هذه المشاركة http://www.officena.net/ib/topic/63756-نسخ-قاعدة-بيانات-الجداول-المرتبطة-فقط-عند-الخروج/ وقام استاذنا ابوخليل بامدادنا بكود اكثر من رائع .. فبارك الله فيه وجزاه الله عنا كل الخير له ولاولاده Shell "cmd.exe /C copy " & """" & DBOld & """" & " " & """" & _ DBNew & "\" & Format(Now(), "yymmddhhnn") & ".mdb" & """", 0 فخطرة ببالى فكرة تطوير اداه (لضبط خيارات النسخة الاحتياطية للجداول المرتبطة عن طريق قاعدة الواجهات كل فترة زمنية بطريقة تلقائية ساعة / يوم / شهر / سنة) والكود الذى امدنا به استاذنا العزيز ابو خليل يتحكم فى الموضوع ولكن من داخل الكود ــ بمعنى لو انت حبب تعمل نسخة كل ساعة عند الخروج من البرنامج لازم ترجع للكود وتحذف hh وهكذا على النحو المشار بالمشاركة المدرج رابطها بعاليه yymmddhhnn الفكرة تتلخص فى نموذج تظبط منه الاعدادات التالية وتحفظ الاعدادات لمرة واحدة واذا ارات تغيير الاعدادات عليك بالذهب الى النموذج واعادة الضبط مرة اخرى وهكذا انظر الصورة المطلوب هو التعديل على الكود حتى يتناسب مع النموذج المرفق حسب ما هو مبين بالصورة مرفق القاعدة main1.rar برجاء فك الضغط داخل البارتشن ال D محمد سلامة main1.rar

الأخ الكريم الأستاذ / محمد الدسوقى جرب الملف التالى لعلة يفى بالغرض abo_abary_ترحيل ناجح وراسب.rar

أخي الحسام احب ان اشكرك على ردودك السريعة ، واجاباتك الواضحة ، فانت ساعدتني على حل الاشكال جعفر

السلام عليكم ورحمة الله اتمنى من الله عز وجل ان يكون هذا هو المطلوب ترحيل ناجح وراسب.rar

Protect and maintain databases حماية و صيانة قواعد البيانات 1. ضغط و اصلاح قاعدة البيانات تساعدنا في تحسين أداء قاعدة البيانات و اصلاح الملف عند حدوث المشاكل. 2. تشفير قاعدة البيانات بتطبيق كلمة مرور لتقييد الوصول, فقط المستخدمون الذين يعرفون كلمة المرور يستطيعون الوصول الى قاعدة البيانات. 3. العمل مع النسخ الاحتياطي. 4. دمج قواعد البيانات. 5. تقسيم قاعدة البيانات و هي خطوة تطبق خصيصا للمشاركة مع عدة مستخدمين. ------------------------------------------------------------------------- ------------------------------------------------------------------------- تحميل ملف PDF https://www.dropbox.com/s/00e1yxc9rf60rlo/Lesson14.pdf?dl=0 تحميل ملف البوربوينت https://www.dropbox.com/s/xz2wt4p4y4ahvxi/Lesson14.ppsx?dl=0 -------------------------------------------------------------------------

تفضل الكود يشتغل ، بس بسبب انك كنت علامة صح بالكود القديم ، فالجدول كله عليه علامة صح ، انا الغيت الصح من الجدول بالكامل ، وارفقت لك البرنامج بكود الاستعلام جعفر 523.Selection.accdb.zip

أخي الكريم حسين الموضوع يحتاج لوقت ومزيد من التفاصيل .. في الملف "مصاريف شهر7--2016" يوجد البند "مسجد 4" ليس له قيم (ما المطلوب في هذه الحالة) .. وهل سيكون كل بند في ورقة عمل مختلفة ومنفصلة؟ الأفضل وضع النتائج المتوقعة ليسهل تخيل المطلوب بشكل أفضل ..

وعليكم السلام إثراءً للموضوع جرب الكود التالي Sub Test() Dim curRow As Long Dim col As New Collection Dim itm As Variant Dim cnt As Long Dim rng As Range Dim cel As Range Const firstRow As Integer = 1 'رقم صف البداية Const dataCol As Integer = 1 'رقم العمود مصدر البيانات Const extractCol As Integer = 8 'رقم العمود للنتائج المطلوبة Application.ScreenUpdating = False Set rng = Range(Cells(firstRow, dataCol), Cells(Rows.Count, dataCol).End(xlUp)) On Error Resume Next For Each cel In rng col.Add Item:=cel.Value, Key:=CStr(cel.Value) Next cel On Error GoTo 0 curRow = firstRow For Each itm In col cnt = Application.CountIf(rng, itm) If cnt > 10 Then 'عدد مرات التكرار Cells(curRow, extractCol).Value = itm Cells(curRow, extractCol + 1).Value = cnt curRow = curRow + 1 End If Next itm Application.ScreenUpdating = True End Sub

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

وفقك الله لما فيه صلاح الإسلام و المسلمين إن شاء الله

أخى ممكن ان يكون هذا الرابط مفيد لك.

وعليكم السلام الرابط التالي فيه برنامج فنادق مجاني http://www.access-diva.com/dm13.html جعفر

Motels.rar

اتفضل اخي الفاضل ، واتمنى من الله بأن يكون هو المطلوب تقبل تحياتى المصنف1.rar

الف الف شكر هو ده المطلوب

رابط مفيد لنسخ صف لعدة صفوف شكرا لكم

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