كل الانشطه

اشكرك

السلام عليكم ورحمة الله وبركاته أساتذتي الكرام محمد هشام. @عبدالله بشير عبداللهجزاكم الله كل خير ويعجز لكلام عن شكركم هذا الملف من تعديل أستاذنا محمد هشام. جزاه الله عنا خير الجزاء أنا اسف جدا جدا عندي رجاء بسيط آخر .. هناك في الجدول في الشيت الأول SHEET1 عايز اعمل فلترة لان آخر عمود اسميته (مفتاح) يعني هاكتب فيه كلمه تدل على كل نشاط مثلا الإعاقة او الذكاء الاصطناعي او زوي الهمم وهكذا.. ، فلو عايز اعمل فلترة لكل ما يخص الإعاقة مثلا وطلع عدد من الندوات تخص هذا الموضوع عايز نتيجة الفلترة دي تتفصل برضه بنفس الطريقة الى ملفين مستقلين اكسل وبي دي اف - بمعني عايز النتيجة تشمل نتيجة الفلترة اللي هاعملها للجدول الرئيسD في SHEET1 بحيث بعد الفلتروة في SHEET1 عايز نتيجة لفلترة برضه تتفصل زي الفترة اللي بين التاريخين ومعلش الملف الاكسل او البي دي اف عايز احط ليهم عنوان فهل ينفع وجود خانة لاضافة العنوان لاني كل ما بزود سطر في الاعلى بيدي ERROR معلش انا آسف جدا جدا إنتو اخواتي في الله ربنا مايحرمني منكم يا رب ونفع بكم وزادكم بسطة في العلم وياريت معلش أخيرا عايز احط فيه كود عمل نسخة احتياطية في مكان وليكن في الD في مجلد اسمه Buckup كل فترة من الوقت .. أرجو التعديل بعد اذن حضراتكم على الملف المرفق والمعدل من قبل الأستاذ محمد هشام. زاده الله علما وجزاه الله خيرا وجزاكم الله كل خير مقدما وزادكم بسطة في العلم فلترة وحفظ الملفات V2.xlsm

الأساتذة الأفاضل في هذا المنتدى المباركمحفظتي (2).xlsx بالمرفقات جدول موضح به حركة شراء وبيع اسهم كل شي تمام ولكن عند محاولتي تطبيق آلية احتساب العمولة في حالة الشراء او البيع لم استطع استكمال هذه الجزئية حسب الشرط هذا 👇🏼 : ﺑﺎﻟﻨﺴﺒﺔ ﻵﻟﯿﺔ ﺣﺴﺎب العمولة = عدد اﻻﺳﮭﻢ * 0.0199 ﺳﻨﺖ = ﻗﯿﻤﺔ اﻟﻌﻤﻮﻟﺔ ﺑﺤﺪ أدﻧﻰ 1.99$ وﺑﺤﺪ أﻋﻠﻰ 2.99% ﻣﻦ ﻗﯿﻤﺔ الصفقة

اخي الكريم @طير البحر ، أرجو ان تقبل هذه التعديلات التي أجريتها والتي لم تمس الوظائف في مشروعك ، وإنما اعتبرها لمساتي بطريقتي المتواضعة 🤗 اولا تم توظيف كود Restart بحيث يتم تنفيذه اذا تم التعديل على الوظائف التي أشرت إليها بصورة 💡 - باستخدام ميزة الـ Tag - والتي تتطلب إعادة التشغيل للبرنامج وذلك بإضافة وظيفتين في نموذج dboptions واحدة عند الفتح والأخرى يتم استدعائها عند تنفيذ الزر تطبيق . فإذا لم يتم تغيير اي من هذه الوظائف التي تتطلب إعادة التشغيل فسيتم تطبيق كودك بشكل عادي كالسابق ، أما اذا تم تغيير اي قيمة فسيطلب منك اعادة التشغيل للبرنامج. بالاضافة الى اجراء إضافة بسيطة في مديول myoptions وذلك بتغيير قيمة gogo في الجدول وإعادتها إلى True في حال تم تغييرها الى False قبل تنفيذ إعادة التشغيل للبرنامج وذلك حتى لا يتم التأثير على عموم الكود الخاص بك . الق نظره واخبرني بالنتيجة 🤗 New_Options.accdb

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

ولا يهمك أخي @طير البحر ، إن شاء الله تعالى 🤗

شكرا جزيلا وبارك الله فيك

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

sheet1.Range("i1") = ComboBox1.Text TextBox1.Value = sheet1.Range("i2").Value Dim a Dim i As Long Me.ComboBox1.Text = StrConv(Me.ComboBox1.Text, vbProperCase) Me.ListBox1.Clear For i = 3 To Application.WorksheetFunction.CountA(sheet1.Range("A:A")) a = Len(Me.ComboBox1.Text) If Left(sheet1.Cells(i, 6).Value, a) = Left(Me.ComboBox1.Text, a) Then Me.ListBox1.AddItem sheet1.Cells(i, 1).Value Me.ListBox1.List(ListBox1.ListCount - 1, 1) = sheet1.Cells(i, 2).Value Me.ListBox1.List(ListBox1.ListCount - 1, 2) = sheet1.Cells(i, 3).Value Me.ListBox1.List(ListBox1.ListCount - 1, 3) = sheet1.Cells(i, 4).Value Me.ListBox1.List(ListBox1.ListCount - 1, 4) = sheet1.Cells(i, 5).Value Me.ListBox1.List(ListBox1.ListCount - 1, 5) = sheet1.Cells(i, 6).Value End If Next i يوجد خطاء عند الدخول فى (( Me.ListBox1.Clear )) و يكوم باظهار العامود الاول فقط

ولا يهمك أخي الكريم 🤗 على العموم لتوضيح الفكرة لديك . في الجدول وداخل الحقل المحسوب لا يمكنك التعديل او الإضافة فيه نهائياً.

تفضل استاذ @ابو محمد 4 المرفق بعد التعديل. ومعه شرح عمله .ووافني بالرد . هنا الشرح https://www.mediafire.com/file/nc4hq82nq7xeotw/150.gif/file واليك المرفق DDTest506-2.rar

شكرا اخي وفي انتظاركم غدا اذا توفر لكم الوقت ان شاء الله .

ولا يهمك أخي الكريم ، إن شاء الله سأتابع معك والأساتذة ، ولكن دوامي انتهى اليوم بنهاية الأسبوع ، إن استطعت غداً سأرسل لك طلبك

أخي الدكتور @الحلبي ، في مربع النص Text131 اجعل مصدره هذه الجملة :- =IIf([unitmain]="جملة",[qtyin]+[qtyout]+[reout]+[rein],([qtyin]+[qtyout]+[reout]+[rein])/[no]) أو هذه الكود لإختلاف النتيجة التي تريدها في فكرة الحساب التراكمي :- =IIf([unitmain]="جملة",[qtyin]-[qtyout]+[reout]-[rein],([qtyin]-[qtyout]+[reout]-[rein])/[no]) وأخبرني بالنتيجة إن كانت صحيحة

أبشر أخي

بارك الله فيكم جميعا استاتذتي

قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف هذا الموضوع مخالف لقوانين المنتدي ×××××××× موضوع مكرر ×××××××× يغلق ××××××××

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

الأخ Foksh هل يمكنك مساعدتي في إعادة هيكلة الاستعلامات والتقارير فمعرفتي محدوده وانا محاسب ولست خبير مثلكم والبرامج بساعدني كتير في عملي مشكورا

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

بمنتهى الوضوح يؤثر ام لا طيب لو حبيت اخليه يأثر الفوتير القديمة لا تهمنى

السلام عليكم مرفق مثال مصغر لما هو مطلوب المطلوب حساب الرصيد التراكمى ان كان عملية (البيع ـ الشراء ـ مرتجع شراء ـ مرتجع بيع) جملة يبقى الرصيد كما هو اما اذا كان قطاعى فيحول الكمية الى جملة بالقسمة على عدد الوحدات ويحسب التراكمى لهم جزاكم الله خير test.accdb

بارك الله فيك اخى كمال اخى السائل هذا رابط للموضوع الاساسي للمرفق الذي في سؤالك يمكنك الاستفاده منه

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

انا صممت برنامج محاسبة ولما بعد فترة نعدل سعر الشراء والبيع كان يؤثر على كل الفواتير حتى لو كانت قبل 5 سنوات الحل اني الغيت سعر الشراء وسعر البيع من جدول الاصناف وجعلته يضاف يدويا لكل فاتورة