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

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

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

السلام عليكم ورحمة الله وبركاته من المعروف ان الاوفيس يأتي بصيغة 32 بت وصيغة 64 بت ، ونظام التشغيل وندوز كذلك يأتي بصيغة 32 بت و 64 بت ، وقد يختلط الأمر على بعض الاشخاص فيعتقدون بأنه يجب تنصيب الاوفيس 64 بت على الوندوز 64 بت ، بينما في واقع الامر ، فإن مايكروسوفت توصي بإستخدام الاوفيس 32 بت على جميع نظم التشغيل ، الرابط التالي من مايكروسوفت يوضح هذا: https://technet.microsoft.com/en-us/library/ee681792.aspx وهناك حالات خاصة لتنصيب الاوفيس 64 بت (كذلك المعلومة موجودة في الرابط اعلاه) ، وهذه الحلات لا تنطبق على الاكسس. ومن المعروف انه اذا كان لديك الاوفيس 64 بت ، فإن معظم البرامج السابقة والتي تحتوي على دالة API المحتوية على 32 بت ، فإن البرنامج لن يشتغل وسيعطيك أخطاء لذلك ، وكما يقول المثل: الباب اللي يجيك منه ريح ، سده واستريح فاذا عندك اوفيس 64 بت على جهازك ، فآن الاوان ان تمسح/تلغي تنصيبه ، وتنصب اوفيس 32 بت ---------------------------------------------------------------------------------------------------------------- تحديث بتاريخ: 20-5-20 في الصفحة الرسمية لمايكروسوفت بتاريخ 8/3/2019 ، فإن مايكروسوفت الآن توصي بتنصيب الاوفيس نواة 64 بت ، وهي النواة التي يتم تنصيبها تلقائيا في الاوفيس 2019 والاوفيس 365. طبعا لا يمكن تنصيب الاوفيس نواة 64 بت ، إلا على الوندوز نواة 64 بت. شو فائدة هذه الرسالة لنا؟ اعتقد من الافضل ان نبدأ بتحويل برامجنا الى النواة 64 بت ، فقد يأتي اليوم الذي تُلغى في نواة 32 بت جعفر

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

مشاركة مع استاذ حلبي اتفضل جرب هذا الكود Private Sub a_Click() On Error Resume Next Dim i As Integer For i = 1 To Me.Form.RecordsetClone.RecordCount Me.ملاحظات = Me.الحلقة + Me.M DoCmd.GoToRecord , , acNext Next i End Sub

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

حل مشكلتك : 1-افتح مشروع جديد 2- اجلب جميع الكائنات من برنامجك ما عدا النموذج المشكلة (نموذج الواجهة) اعد اعداد برنامجك للتشغيل

وعليكم السلام راجعي المرفق وافتحي الاستعلام المسمي Mini وانظري الي الحقل اول تاريخ يارب يكون المطلوب ان كنت فهمت سؤالك new work.rar

اتفضل Private Sub opn_Click() If Len(Me.txtpass & "") = 0 Then MsgBox "ادخل رقم سري القديم" Me.txtpass.SetFocus Exit Sub ElseIf Len(Me.txtpasscadid & "") = 0 Then MsgBox "ادخل رقم سري الجديد" Me.txtpasscadid.SetFocus Exit Sub ElseIf Len(Me.txtpasscedid1 & "") = 0 Then MsgBox "ادخل رقم سري الجديد للتأکيد" Me.txtpasscedid1.SetFocus Exit Sub ElseIf DLookup("[USER_PASSWORD]", "data1", "[USER_NAME]='" & Me.txtname & "'") <> Me.txtpass Then MsgBox "خطأ في رقم سري القديم" Me.txtpass.SetFocus Exit Sub ElseIf Me.txtpasscadid <> Me.txtpasscedid1 Then MsgBox "ھناک خطأ في تأكيد رقم سري الجديد" Me.txtpass.SetFocus Exit Sub ElseIf DLookup("[USER_PASSWORD]", "data1", "[USER_NAME]='" & Me.txtname & "'") = Me.txtpass And Me.txtpasscadid = Me.txtpasscedid1 Then Dim Sql As String Sql = "UPDATE data1 SET data1.USER_PASSWORD = [Forms]![Changepassord]![txtpasscadid] WHERE (((data1.USER_NAME)=[Forms]![Changepassord]![txtname]));" DoCmd.SetWarnings False DoCmd.RunSQL (Sql) DoCmd.SetWarnings True MsgBox "تم تغيير رقم سري بنجاح" DoCmd.Close acForm, Me.Name End If End Sub اليك المرفق مستخدم.rar

الملف مرفق salimمجموع.rar

نسخ هذه المعادلة الى C3 استعملها مع (Ctrl+Shift+Enter) ثم اسحبها الى باقي الخلايا =SUM(IF(ورقة1!$C$6:$C$500<>"",IF(ورقة1!$C$6:$C$500=C$2,IF(ورقة1!$B$6:$B$500=$B3,ورقة1!$D$6:$D$500),0)))

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

ليس هناك المشكلة .. اذا تريد ان يكون هناك حقل اي دي مكرر القي نظرتا الى هذه الصورة واليك القاعدة test.rar

الاخ الكريم Amr Ashraf اشكرك على مرورك الكريم بس ياريت تلقى نظرة على المرفق لانه الموضوع مش مشتريات ومبيعات فيه مرحلة بينهم اسمها التصنيع او الانتاج يعني نظام محاسبة تكاليف مش إدارة محلات بيع وشرا ياريت تلفى نظرة على المرفق ربما يكون لك رأي تاني

انسخ هذه المعادلة الى C2 استعملها مع (Ctrl+Shift+Enter) ثم اسحبها الى باقي الخلايا =SUM(IF(ورقة1!$B$6:$B$500=$B2,ورقة1!C$6:C$500,0))

السلام عليكم ورحمة الله بالضغط على زر الزيادة والنقصان ستتغير الاسماء فى الورقة المطلوبة اليك الملف الصف الرابع والخامس 2016-2017.rar

تفضل عرض البيانات من خلال مربع نحرير وسرد2.rar

تفضل doc.ActiveDocument.ActiveWindow.PrintOut _ Range:=wdPrintFromTo, From:="2", To:="2" باعتبار ستطبع الصفحة رقم 2

بارك الله فيكم إخواني الكرام وجزيتم خيراً لحرصكم على تعلم العلم والاستفادة مما يقدم في الحقيقة توجد المئات من الموضوعات والأكواد المشروحة هنا وهناك ويوجد موضوع بعنوان "مكتبة الصرح زاخرة بالشرح" وفيها أكواد كثيرة وبشرح معظمها ويوجد حلقات "افتح الباب وادخل لعالم البرمجة" والتي تعطيك فكرة كبيرة عن الأساسيات والبدايات .. ولكن بعد التجربة وجدت أن شرح الأكواد غير مفيد (من وجهة نظري الخاصة) حيث أن ما يأتي سهلاً يذهب سدى ، وما أقصده هو أنه على المتعلم أن يبذل جهذاً .. وأكرر أن يبذل جهداّ في تعلم الأكواد وذلك عن طريق استخدام مفتاح F8 ليتمكن من تنفيذ الكود سطر بسطر ويرى ما يتم تنفيذه ويستفيد ، وإذا تعثر في سطر ما يسأل عنه .. فالفكرة في أن يجتهد في فهم الكود بنفسه فذلك وعن تجربة أفضل بكثير من تقديم شروحات جاهزة .. وفي النهاية أسأل الله أن يوفقنا جميعاً لما فيه الخير والصلاح في الدنيا والآخرة تقبلوا وافر تقديري واحترامي

نعم اعمل جدول اخر باسم table4 وادخل البيانت لكن خلي الرقم اي دي بيكون غير مكرر مع الجداول الاخرى وفي استعلام توحيد اكتب select * from table1 UNION select * from table2 UNION select * from table4;

السلام عليكم ورحمة الله وبركاته اخواني/اخواتي رأيت الكثير من الاسئلة حول تصدير بيانات الاكسس الى الاكسل ، وكل سؤال يختلف عن غيره بطريقة او اخرى ، فحبيت ان اضع بين يديكم برنامج اشتغلت عليه ، واتمنى من الله سبحانه وتعالى انه يقدر يخدم الكل البرنامج سهل الاستعمال ، فكل المطلوب في الواجهة ، ولا تحتاج الذهاب للكود اولا: الواجهة: 1. تختار من مربع السرد ، جدول او استعلام ، 2. على اساس الاختيار في رقم 1 ، ستظهر لك قائمة باسماء الجداول او الاستعلامات في برنامجك ، 3. اسم ملف الاكسل المراد حفظه به ، ومجلد التخزين ، فتلقائيا يكون في نفس مجلد البرنامج ، 4. هنا تكتب اسم صفحة الاكسل التي تريدها (انظر الصورة في الاسفل) ** تستطيع ان تصدر اي عدد من الصفحات الى اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم اسم صفحة جديدة) ، ** تستطيع ان تصدر بيانات جديدة الى نفس الصفحة في اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم *الادخال من خانة* اسفل الخانات الموجودة في الاكسل) ، 5. تستطيع بدء تصدير البيانات الى اي خانة في اكسل مثل A2 او C5 او اي خانة اخرى ، ** تستطيع ان تصدر بيانات جديدة الى نفس الصفحة في اكسس (طبعا التصدير يكون باستعمال البرنامج عدة مرات ، في كل مرة تستخدم *الادخال من خانة* اسفل الخانات الموجودة في الاكسل) ، 6. تستطيع ان تحفظ ملف الاكسل بالصيغ التاليه: "xls" او "xlsx" او "xlsm" او "xlsb" او "csv" او "txt" ، والصيغتين الاوليتين هما الاهم ، والصيغتين الاخيرتين بهم قيود معينة ، 7. تستطيع ان تختار المجلد الذي تريده ، مع كتابة اسم الملف المناسب لك (انظر الرقم 3 اعلاه) ، 8. تستطيع تصدير البيانات مع اسماء الحقول (في الاكسس) ، وتستطيع تصدير البيانات مع عناوين/مسميات الحقول (في الاكسس) ، نلاحظ اعلاه ، بان الجدول elemnts لا يحتوي على عناوين/مسميات الحقول بالعربي ، بينما الجدول elemnts2 يحتوي عليها ، وتستطيع تصدير البيانات فقط بدون اسماء الحقول ، 9. تستطيع ان تصدر البيانات الى ملف اكسل فيه بيانات سابقة ، وهنا تستطيع الاستفادة من الارقام 4 و 5 اعلاه ، او ان تحذف ملف الاكسل الموجود حاليا بنفس الاسم ، وتبدأ تصدير ملف جديد ، 10. بعد تصدير البيانات الى اكسل ، هل تريد إحتواء وتوسيع كل الاعمدة فيه ، حتى ترى كل البيانات بدون الحاجة الى توسيع كل عمود على حدة ، او لا تريد توسيع الاعمدة. 11. الزر الذي يقوم بعملية تصدير البيانات الى اكسل ، حسب الاختيارات اعلاه ، مع ملاحظة: يجب تعبئة الحقول داخل المربعات الحمراء ، اما بقية الحقول فإختيارية ، 12و 13. لجعل هذا البرنامج يعمل على اي من برامجكم الحاليه ، يجب تصدير النموذج frm_Export_to_Excel و الوحدة النمطية fFolder_Dialog اليها. طبعا هناك أفضلية تصدير البيانات من الاستعلام ، حيث تستطيع ان تتحطم بالبيانات المطلوب تصديرها. ملاحظات؟ اخطاء/عطل؟ إضافات؟ انا في الخدمة ، قدر المستطاع جعفر -------------------------------------------------------- الموضوع منقول من منتدى شقيق وتم نقله كماهو وذلك للاهميه الرجاء الدعاء للاستاذ : جعفر بارك الله فيه Export_to_Excel تصدير البيانات الى اكسيل.zip