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

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

مساهمة مع استاذي خالد إذا كانت المادة غير موجودة في القائمة ستخرج رسالة هل تود إضافة المادة أم لا . أما مطلوب الحذف تم أيضا Sub.mdb

السلام عليكم أخي محمد أهنئك على صبرك و مثابرتك في طلب الحل دون المساس أو التعدي على قوانين المنتدى. لذلك قمت بتصميم مثال شمال لما تحتاجه. و هو كالتالي: 1- تختار قاعدة البيانات في المربع الأول 2- تظهر جميع نماذج القاعدة في المربع الثاني 3- تظهر أسماء مربعات نص النموذج المختار في المربع الثالث نقوم بالضغط على زر الأمر فتظهر رسالة تقول أن النموذج مفتوح أو مغلق و إذا كان مفتوح تظهر رسالة أخرى بها قيمة مربع النص التحكم في نماذج قاعدة بيانات خارجية.rar

وعليكم السلام ورحمة الله وبركاته ATabsVer16.accdb

وعليكم السلام ورحمة الله وبركاته ضع في الاستعلام احد المعياريين <>"," او not "," مرفق ملفك بعد التعديل تحياتي Nouveau Microsoft Access Base de données.rar

وعليكم السلام-تفضل دالة طرح السنوات.xlsx

تفضل تم عمل كل طلباتك Book2.xlsm

الحمد لله ذي الرضا المرغوب، يعفو ويصفح ويغفر الذنوب... يملي ويمهل لعل العاصي يتوب، يعطي ويرضى ويحقق المطلوب... يُطعم ويَسقي ويستر العيوب، يغني ويشفي ويكشف الكروب... نحمده تبارك وتعالى حمدًا هو للذات العليا منسوب... ونعوذ بنور وجهه الكريم من شر الوسواس الكذوب... ونسأله السلامة فيما مضى وما سوف يأتي من خطوب... اما بعد موضوعنا هذا الشهر يشغل بال الكثيرين الذين يلجؤون للاقتراض التمويلي لشراء منزل او سيارة او اقامة مشروع ما ، وما يترتب علي هذا القرض من فوائد وبدون الخوض في الناحية الشرعية سوف نتاول كيفية حساب القرض الفائدة المركبة هي إحدى طُرُق احتساب الفوائد البنكية على القروض، وحيث أن الفائدة هي مقدار الزيادة على أصل المبلغ على أساسٍ سنوي، فإن الفائدة المركبة هي تركيب للفائدة وزيادة قيمتها – وليس نسبتها – على أصل القرض في كل سنةٍ من عمر القرض. وبما أن عوائد الفوائد هي المصدر الرئيسي لإيرادات البنوك في شتى بلاد العالم؛ فإنه يتم اتِّباع طريقة الفائدة المركَّبة على القروض وليس على الودائع؛ حتى يستفيد البنك من مقدار الفرق الهائل بين ما يدفعُه من فوائد للودائع للعملاء؛ وبين ما يأخذُه على القروض من فوائد. إجمالي المبلغ النهائي مع الفوائد يساوي أصل المبلغ مضروبا ب 1+معدل الفائدة مرفوعاً لعدد الفترات الزمنية. مثال : اقترض أحد الأعضاء من بنك أوفيسنا التجاري مبلغا وقدره 1000 وحدة نقدية بفائدة سنوية 10% لثلاث سنوات. يصبح المبلغ بنهاية المدة 1000 × ( 1.10 ^3 ) = 1000 × 1.331 = 1331 وبذلك تكون الفائدة المركبة بعد 3 سنوات 331 وحدة نقدية في حال كانت الفائدة بسيطة تكون قيمتها بعد 3 سنوات 300 فقط حيث تحسب على أصل المبلغ فقط دون اعتبار الفوائد المتراكمة ولحساب قيمة القرض باستخدام الدالة PMT =PMT(a,n,p) حيث a هي قيمة الفائدة (المتراكمة) في الفترة ، في هذه الحالة هنا الشهر n هي عدد الأقساط المتساوية ، في هذه الحالة هنا 36 p هي قيمة القرض ويوجد شروحات علي المنتدي لشرح الدالة بالتفصيل وشرح القيمة الحالية للفوائد المتراكمة . تسهيلا للبعض اعددت فورم بسيط يقوم بحساب القرض والفائدة المتناقصة (( وبدون الخوض في الأحكام الشرعية المتعلقة بالقروض )) شرح الفورم .... (1920x1080) اضبط تباين الشاشة على loan_calculator2.xls loan calculatorV1-2019.xls

تفضل لقد أضفت زرا آخر يقوم بإختبار حالة القاعدة هل هي مفتوحة أم مغلقة التحكم في نماذج قاعدة بيانات خارجية.accdb

الأستاذ هشام .. وعليكم السلام ورحمة الله ما فهمته هو ان لديك ثلاث شعب (إحصاء ـ رياضيات ـ إحصاء تطبيقي) .. تمام ؟ ولديك أيضا قاعتين ( 2309 ـ 1607 ) .. تمام ؟ وجد فى الجدول بعض المسافات الزائدة سواء فى حقل Course_name أو Room مما يؤثر بدوره فى عملية التجميع والفرز .. وقد تم حذفها فصار التقرير 3 صفحات وليس 4 أرجو أن يكون المطلوب بالتوفيق Rep2.accdb

ما عليك سوى تغيير سطر في الكود السطر من MsgBox driveObject.serialnumber الى Range("a1") = driveObject.serialnumber وسينسخ في الخليةA1

كان عليك من البداية استخدام خاصية البحث بالمنتدى -تفضل تدوير وانعكاس الجداول في إكسل flip rotate transpose tables in excel

جرب المرفق Sub.mdb

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

حسب ما استوعبت 🙂 Insert2.accdb

أحسنت استاذ مجدى عمل ممتاز بارك الله فيك وزادك الله من فضله

السلام عليكم بعد اذن استاذنا ابو تامر جرب المرفق CONSULTATION_A.xlsm

رائع استاذ مجدى بارك الله فيك وزادك الله من فضله

أحسنت استاذ مجدى بارك الله فيك وجزاك الله كل خير

مثال مهم لتغيير لون التاب كنترول محصله من موقع اجنبي لكنة يعمل فقط لحد اوفيس xp هل ممكن تعديل الكودات كي يعمل على أوفيس 2010 ومرفق قاعدة البيانات Files555.zip

جزاك الله كل خير اخى واستاذى ابو ياسين نحن بانتظار مشاركتكم حتى نتعلم منكم ونستفاد اخى ابو ياسين حقل ما قبله فى الصفحه الاولى المفروض يكون 0 وحقل الحالى تمام 3865 حقل الكلى المفروض يكون 3865 هذا بالنسبه للصفحه الاولى الصفحه الثانيه ما قبله المفروض يكون 3865 والحالى 698 تمام الكلى مظبوط 4563 واين حقل bb مش لاقيه خالص بشوفه فالخصائص ولكن لا اجد اى حقول فى انتظار تعديلكم ومشاركتكم للاستفاده والتعلم اخى واستاذى تقبل تحياتى وجزاك الله كل خير طبتم واهتديتم

على راسي أستاذنا الغالي التحكم في نماذج قاعدة بيانات خارجية.accdb

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

مشاركة مع الاستاذ محمد تفضل : اختار الكورس ثم اختار عدد السجلات ثم انقر "ابدأ" بالتوفيق DATA_BASE.accdb

تم معالجة الامر بعد تنسيق الجداول في الصفحة الاولى لحسن عمل الماكرو تغيير اسماء الشيتات الى اللغة الاجنبية لنسخ الكود ولصقه بدون ظهور احرف و كلمات غريبة الكود Option Explicit Sub All_in_One() Dim A As Worksheet, B As Worksheet Dim i%, x%, m%, ro%: m = 1 Set A = Sheets("SheetA"): Set B = Sheets("SheetB") B.Range("ِA1").CurrentRegion.ClearContents With A x = .Cells(3, Columns.Count).End(1).Column For i = 1 To x Step 5 ro = .Cells(3, i).CurrentRegion.Rows.Count B.Cells(m, 1).Resize(ro, 4).Value = _ .Cells(4, i).Resize(ro, 4).Value m = m + ro - 1 Next End With End Sub الملف مرفق MY_sheet.xlsm

وعليكم السلام ورحمة الله وبركاته مرحبا اخي الكريم جرب المرفق واعلمني بالنتيجة DATA_BASE.accdb تحياتي

السلام عليكم جرب المرفق حذف جميع سجلات الذي اخترنا من قائمة ....rar تحياتي

بارك الله فيك الأستاذ علي محمد علي وجعله في ميزان حسناتك صدقة جارية علم ينتفع به. يعجز اللسان على التعبير بارك الله فيك

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

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

في هذه الحالة احذف النتسيق الشرطي من النطاق الاول

اللغي التنسيق الموجود في الخليه من A1:F27 عن طريق conditional Formatting في ملف الاستاذ سليم حاصبيا

ربما كان المطلوب File_1.xlsx

بعد إذن الأستاذة الأفاضل عمر الحسيني و العيدروس جرب هذا لعله يفي الغرض CONSULTATION_A.xlsm

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

السلام عليكم ما رأيك في انشاء استعلام مصدره جدول = tabl1 نقوم بحساب الكمية = Qty الموجودة في جدول tabl2 T1: DSum("Qty";"tabl2";"barcode=" & [barcode]) ثم نقوم بطرح الموجود في المخزن من الكمية المصروفة Balance : Nz([SAVE])-Nz([T1]) جرب الاستعلام Query1 الموجود في المرفق واعلمني بالنتيجة Qty in table - Qty on form.rar تحياتي

من بعد اذن استاذنا واخونا الفاضل @ابوخليل تفضل اخي الكريم كتابة الدورات بجانب بعضها لكل موظف2.rar تحياتي

اتفضل اخى الخطأ كان فى الكود التالى كنت حاطت >= Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer) Prev = Nz(DSum("[Price_Bought]", "TFSAI_JRD", "[ID_Sanf]<'" & Me.ID_Sanf & "'"), 0) End Sub بس كده انت جايب المجموع بس بدون ضرب الكميه كما قلت سابقا مجموع كل 111_صفحه.accdb شوف كده بعد اضافه ضرب حقل الكميه هل ظبط معك ام لا اخى مجموع كل 115_صفحه.accdb

تفضل شرح مبسط في الكود تم انشاء جدول الذي اسمة الجدول3 في الشيت A_2.xlsm

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

عليكم السلام بدون مرفق يصعب فهم الكلام جرب المرفق Book1.xlsm

أحسنت استاذنا الكبير برنامج رائع بارك الله فيك وزادك الله من فضله

بارك الله فيك وزادك الله من فضله كلها اعمال رائعة

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

تفضل Suivi des Créances1.xlsm

تفضل Suivi des Créances1.xlsx

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

موجود في الكود غيّر المسار في السطر الاول ، واحذف السطر الثاني: 'File_Path="C:\Temp" File_Path = Application.CurrentProject.Path & "\" جعفر

تفضل هذا الكود: Private Sub رقم_الحافظه_DblClick(Cancel As Integer) 'File_Path="C:\Temp" File_Path = Application.CurrentProject.Path & "\" File_Name = Me.رقم_الحافظه & ".pdf" Name_Path = File_Path & File_Name If Dir(Name_Path) <> "" Then Application.FollowHyperlink Name_Path Else MsgBox "File not found." End If End Sub جعفر New Microsoft Office Access Application.zip

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