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

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

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

وبقية النصائح !! لازم اكتب قائمتي هنا ، واكتب مشاكل الاعضاء اللي صادفها 🙂 الحمدلله ، مشكلة واحدة وطاحت عنك ، شد حيلك في مراعات بقية الامور اللي بكتبها على قائمتي ان شاء الله 🙂 جعفر

وعليكم السلام 🙂 التوقيع في تقرير الاكسس ، معناه انك يكون عندك صورة من هذا التوقيع ، اولا ، صيغة صورة التوقيع : 1. اذا كانت الطباعة ستكون على اوراق بيضاء ، فيمكن ان تكون الصورة بأي صيغة ، سواء jpg ، bmp ، png 2. اما اذا كانت الطباعة ستكون على اوراق ملونة ، فيجب ان يكون التوقيع على خلفية شفافة ، ويمكن استخدام الصور بصيغة png ، وهذه العملية تحتاج عدة خطوات لعملها في الاكسس ، وهنا مثال: ثانيا ، مكان حفظ صورة التوقيع ، هناك طريقتين لحفظ الصور : أ. إما في مجلد في الكمبيوتر ، والخصوصية والسرية تعتمد اذا كانت البيانات في سيرفر ، ولا احد يوصل لمجلد الصور إلا الشخص المسؤول عن البرنامج ، ب. وإما في قاعدة بيانات ، ويمكن ان تكون في قاعدة بيانات خاصة للصور ، ومختلفة عن قاعدة البيانات التي بها المعلومات الاخرى ، مما يتيح خصوصية وسرية اكثر . ولكن اذا كان عدد الصور كبير جدا ، فسيجعل حجم البرنامج كبير. نعم بإمكانك حفظ الصور بصيغة وطريقة (1 اعلاه) ، ولكن لا اعتقد انه يمكنك حفظ الصور للطريقة (2 اعلاه). جعفر

الاخوة المبتدئين بالاكسس مثلي هذه معزة مني لكم نموذج login في خيارين admin & user الباسوورد 1 للجميع لما تدخل على الادمن شوف تقرير الدخول والخروج اذا أعجبكم شغلي تقدروا تطبقوا الفكرة على برامجكم أي استفسار انا جاهز كوني انا اللي صممت البرنامج دخول وخروج مع صلاحيات.accdb

الظاهر ان عندك حقل في الجدول من نوع Lookup ، فهذا الحقل لا يمكن استعماله في الاستعلام . جعفر

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

احيانا نستخدم امر معين في اكثر من نموذج مثلا امر اضافة او حفظ الخ او حتى رسالة معينة فبدلا من اعادة كتابتها في كل نموذج ممكن نعمل وحدة نمطية ونستدعيها عند الحاجة وكذك قد نحتاج الى تنفيذ حدث معين في نفس النموذج فيدلا من اعادة كتابتة ممكن نستدعيها Call tx11_AfterUpdate هنا استدعينا حدث بعد التحديث للحقل tx11 عند تحديث حقل اخر او عند النقر على زر امر

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

حطأ بسيط بالكود يحب استبدال حرف الــ J بالحرف M كما في الصوررة mostafa _new 2.xlsm

جرب هذا الكود Option Explicit Dim x%, y% Dim Dic As Object Dim Sh As Worksheet Dim My_rg As Range Sub All_in_One() Application.ScreenUpdating = False Set Sh = Sheets("Sheet1") Set Dic = CreateObject("Scripting.Dictionary") With Sh .Range("H1").CurrentRegion.Clear For y = 1 To .Range("A1").CurrentRegion.Columns.Count For x = 2 To _ .Range("A1").CurrentRegion.Rows.Count If .Cells(x, y) <> "" Then Dic(.Cells(x, y).Value) = "" End If Next x Next y If Dic.Count = 0 Then GoTo Bay_Bay .Range("H1") = "ALL" .Range("H2").Resize(Dic.Count) = _ Application.Transpose(Dic.keys) If .Range("H1").CurrentRegion.Rows.Count > 1 Then With .Range("H1").CurrentRegion .Borders.LineStyle = 1 .Font.Bold = True: .Font.Size = 14 .InsertIndent 1 .Interior.ColorIndex = 35 .Cells(1, 1).Interior.ColorIndex = 6 End With End If End With Bay_Bay: Set Sh = Nothing Set Dic = Nothing Application.ScreenUpdating = True End Sub الكلف مرفق abou_has_All_in_one.xlsm

الملف جاهز mostafa _new.xlsm

تفضل اخي الكريم Dim tbl As TableDef DoCmd.SetWarnings False For Each tbl In CurrentDb.TableDefs If Left(tbl.Name, 4) = "MSys" Then Else DoCmd.DeleteObject acTable, tbl.Name DoCmd.SetWarnings True End If Next tbl تحياتي

السلام عليكم احببت ان اقدم لكم شرح لي لكيفية عمل شاشة دخول مع صلاحيات مستخدمين شاشة دخول بصلاحيات - للشرح.mdb

طلب مني العديد من الاحبة عمل درس مبسط لطريقة ترحيل السجلات من النموذج الى الجدول بحيث مدخل البيانات لا يستطيع استرجاع السجلات والتعديل عليها بعد الترحيل مرفق قاعدة البيانات وفيديو شرح سلوم.accdb

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

رجاء الانتباه !! وبسبب سرية التواقيع ، فإذا قمت بتصدير التقرير الى ملف pdf ، فأي شخص يحصل على هذا الملف يستطيع ان ينسخ هذه صورة التوقيع الى كمبيوتره !! جرب التالي بالمثال المرفق: اعمل تصدير للتقرير الى صيغة pdf . وفي اي برنامج قارئ لملفات pdf ، افتح الملف ، وبالنقرة اليمين تستطيع ان تأخذ نسخة من الصورة . فلا تصدر التقرير الى pdf ، اذا كنت مهتم بسرية التوقيع 🙂 جعفر 1233.test_Report_pdf_image.mdb.zip

حقل في الجدول من نوع Lookup يحتوي على اكثر من قيمة ، ما يعرف الاكسس يتعامل اي من هذه القيم !!

السلام عليكم 🙂 شكرا اخوي خالد ، وياريت تكمل القائمة ، وبالتفصيل بدل الايجاز ، فالمعلومة يجب ان تصل واضحة 🙂 هذه ملاحظاتي على ملاحظاتك جعفر

ابشر أخي محمد document.getElementById("mobile-info").getElementsByTagName("h1")(0).innerHTML document.getElementById("mobile-info").getElementsByTagName("h2")(0).innerHTML document.getElementById("mobile-info").getElementsByTagName("h3")(0).innerHTML شرط يكون اول عناصر <h1> <h2><h3> في ديف mobile-info بتوفيق

هذة رسائل تحذير عند تنفيذ استعلام ويمكن اخفائها بالامر قبل تنفيذ الاستعلام DoCmd.SetWarnings False وبعد تنفيذه نعيد تفعيل رسائل التحذير بالامر DoCmd.SetWarnings true وفي برنامج اخينا الفاضل عبداللطيف لم يستخدم الاكواد وانما الماكرو فيمكن عملها بالدخول على الماكرو ثم قبل تنفيذ الاستعلام في سلسلة اجراءات الماكرو نظيف اجراء setwarning تشغيل التحذير : لا واذا لم نجد الامر ضمن قائمة الاجراءات نذهب الى شريط الادوات ونختار اضهار كافة الاجراءات تحياتي

بالإضافة لرد الأستاذ جعفر جزاه الله خيرا طلب مني سابقا التوقيع عن طريق جهاز توقيع الكتروني بالقلم الالكتروني فا استخدمت برنامج اكروبات الاصدار الكامل وبه خصية التوقيع علي التقرير بصيغة PDF بعد تصديره من الاكسس وهذه الطريقة تستخدم في التوقيع الفوري للعملاء علي استلم بطاقة الهوية أو جوز السفر تحياتي 🌹

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

مرفق ملف أتمنى ان يكون هو المطلوب تعتمد المعادلة على ادخال تاريخ بداية ونهاية الفترة المطلوب عنها التقرير تقرير المنصرف والمحصل.xlsx

ربنا يحفظك يارب استاذى استاذ سليم كل الشكر والاجترام والتقدير بارك الله فيك ربنا يبارك فى عمرك يا رب

1. احذف العلاقات ، كانت غلط ، 2. اعمل الاستعلام التالي: وبعض نتائجه . الآن استعمل هذا الاستعلام كمصدر بيانات للتقرير الجديد rpt_Sheet2 ، والنتيجة : . اكمل العمل لباقي الجداول 🙂 جعفر

1. انا لازال عندي مجال انك تدعي عليّ بالزوجة الرابعة (زوجتي ، واثنين من الاستاذ فايز صاروا 3 وباقي لي الرابعة 🙂 ) 2. في الواقع هذا الكود نسخ ولصق من احد ردودي لسنة 2015 ، ووجدت الكود على الانترنت في وقتها ، وما لقيت له صاحب معين علشان اكتب رابطه ، ولكن طبعا عملت عليه التعديلات علشان يناسب السؤال. 3. رجاء ارجع للمادة 1 اعلاه جعفر

اتفق معك اخي الفاضل ودائما توجد طريقة وطريقة افضل الحل السابق تكمله لما قام به الزملاء الكرام واعلم بانه ليس الاحل الامثل للسجلات الكثيرة

مشاركة مع عبد اللطيف سلوم سلوم.rar

تفضل اخي الكريم Dim tblName As String tblName = "tbl1" DoCmd.DeleteObject acTable, tblName تحياتي

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

تفضل هذا التعديل اخي الكريمالشهادات_المدرسية _للقدامى - Copie.accdb

أولاً ارفع ملف نموذج عما تريد (3 صفحات لا اكثر واحدة للطلاب و 2 للاساتذة) لأن الماكرو الذي يعمل على صفحة واحدة يمكنه العمل على الالوف منها ثانياً تخفيف حجم الملف (أكثر من 3 ميغا) بدون هذه الزركشة من الألوان التي تبهر البصر و مجرد النطر الى الصفحات يجعل من يريد المساعدة يغير رأيه

تفضل أخي الكريم .. الشهادات_المدرسية _للقدامى - Copie.accdb

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

تفضل اخي العزيز التعديل ارجو ان يكون طلبك Inv01-100.rar

تفضل أخي محمد بعد ضغط على زر "بحث" و عرض فواتير اضغط على زر جديد في اعلى يسار نموذج كهرباء.mdb

هناك طريقة اخرى ربما تكون الحل 1- ضعي اسماء الشيتات التي تريدينها في عامود معين مثلا ( Z1- Z100) في الشيت "TAkrir" 2- الخطأ باسماء الشيتات المطلوبة (مسافات ناقصة أو زائدة همزة الألف نفاط الياء الخ....) غير مقبول لأنه يعطي نتيحة حاطئة من الافضل استعمال نسخ ولصق 3- القوائم المنسدلة تأخذ بياناتها من هذا النطاق (لبس بالضرورة كاملاً فقط لغاية اخر خلية ربما تكون Z50 مثلاً) 4 - استبدال هذا الجزء من الكود كما في الصورة (اكثر من مرة موجود هذا الجزء) 5- الانتباه الى " _ " Under Score و قبلها مسافة واحدة فقط في المربع الأزرق بعد كلمة ,Name.

لا ينفع يجب ان يكون بين اسماء الشيتات الي يجب ان يتعاطى معها الماكرو شيء مشترك (MyData1 / Mydata2/....) مثلاً - لا أنصح بتسمية الشيتات باللغة العربية

ماهي اسماء الشيتات المطلوبة؟؟؟ هاتي 4 أو 5 اسماء فقط

كل الشيتات التي يجب ان يتفحصها الماكرو يحب ان بيدأ اسمها بـ sh يليه رقم من 1 الى ما تريدين من أرقام مثلاً ٍsh100 /....... sh3 / sh2/ sh1 لأن الكود يتعرف على الشيت من خلال اسمها اذا اردت يمكن تغيير اسماء الشيتات الى 1 datareporrt 2/datareporrt الح.... و لكن بشرط تغيير هذا الجزء في الكود كما في الصورة (اينما تجدينه) اقصد في اكثر من مكان s

لست انا من وضع الكود لذلك لا اعرف كيفية التعامل معه

وعليكم السلام -يمكنك استخدام معادلة المصفوفة(Ctrl+Shift+Enter) فى الخلية J4 =INDEX($B$5:$B$9,MATCH(1,MMULT(--($C$5:$F$9=$K$4),TRANSPOSE(COLUMN($C$5:$F$9)^0)),0)) code departement1.xlsx

هذا الوصف واضح ، بينما الوصف السابق لم يكن تفضل نقوم بإعادة ترقيم [رقم المادة] كلما حدث حذف ، هكذا: Private Sub Form_AfterDelConfirm(Status As Integer) Dim rst As DAO.Recordset Set rst = Me.RecordsetClone rst.MoveLast: rst.MoveFirst RC = rst.RecordCount For i = 1 To RC rst.Edit rst![رقم المادة] = i rst.Update rst.MoveNext Next i End Sub جعفر 316.students.accdb.zip

كنت محتاج مساعده اخواتي في طلب برنامج يساعدني علي اداره محل صغير نشاطه تجاره الموبيلات بسبب استغلال الاخرين و اسعارهم العاليه في البرامج المدفوعه و جزاكم الله خيرا