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

أخي طاهر ، هل هذا ما تريده ؟؟ إذا كان هو فعلاً ، فانظر ماذا سنفعل . أولاً انشاء مربع نص ولنفترض اسمه = txtRowNumber ، وسنجعل قيمته أو مصدر بياناته = "=1" ليقوم بعد السجلات الحالية في التقرير . ( الإضافات حتى لا نقوم بتعديل أي تركيبة في تقريرك وللتوضيح طبعاً ) ثانياً إنشاء مربع نص أيضاً للتاريخ ولنفترض اسمه = txtAutoDateDisplay . وسنجعل له قيمة مصدر بيانات بناءً على الاستعلام مصدر التقرير = =IIf([txtRowNumber]=Int(DCount("*","tbl_Loans","EmployeeID=" & [EmployeeID] & " AND Auto_Date=#" & [Auto_Date] & "#")/2)+1,[Auto_Date],"") حيث الهدف من فكرتي هو عدّ السجلات بناءً على مربع النص txtRowNumber وقسمتها على 2 للتوسيط وبالتقريب طبعاً حتى لة كان عدد السجلات 10 مثلاً فسيكون العرض في السجل 6 مثلاً . ثالثاً إنشاء مربع نص أيضاً للرقم وسأفترض اسمه = txtEmployeeIDDisplay . وسيكون له قيمة مصدر بيانات = =IIf([txtRowNumber]=Int(DCount("*","tbl_Loans","EmployeeID=" & [EmployeeID] & " AND Auto_Date=#" & [Auto_Date] & "#")/2)+1,[EmployeeID],"") وطبعاً قمت بإخفاء الحقول الأصلية . ولكن عليك تجربة الفكرة على سجلات كثيرة للتأكد من الفكرة . المرفق لتجربته :- Z1.zip

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

السلام عليكم بريمج صغير في حجمه وادواته .. ولكنه محكم ويفي بمتطلبات عملية الحضور والانصراف واحتساب ساعات ودقائق العمل . ومع ذلك هو قابل للتطوير واضافة خدمات اخرى مثل الغيابات والاجازات والعطل والاستئذان ونحوها ومثل جعل شاشة الحضور منفصلة عن البرنامج الاساسي واشياء اخرى كثيرة لا يمكن حصرها المهم ان العمل هذا يفي بالحاجات الأساسية والضرورية ....................... عملية التحضير تتم اما بادخال المعرف يدويا ثم النقر على انتر وإما استخدام قارىء الباركود كل ذلك تم تهيئته في البرنامج .. بطاقات وكشوف الباركود المطلوب قبل العمل على البرنامج هو نسخ ملف اداة الباركود barcodex.ocx الى نظام وندوز وتسجيلها تم العمل على وندوز 64 وأوفيس 32 بت الملف موجود ضمن المرفقات ، وتم اضافة المرفق المطور ChkInNetUp ايضا .. وهو خلاصة الملاحظات والطلبات في المشاركات اللاحقة ChkInOut.rar ChkInNetUp1.rar

السلام عليكم نهنىء انفسنا و حبيبنا محب العقيدة @محب العقيدة اهلا وسهلا بك ضمن مجموعة الخبراء زادك الله علما ورفعة ونفع بك

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

يتم ذلك من خلال دمج المراسلات بين الاكسيل و الوورد راجع الرابط التالي https://www.officena.net/ib/topic/53571-ملف-pdf-لشرح-دمج-المراسلات-بين-الاكسل-والوورد-مفيد-جدا

السلام عليكم ورخمة الله وبركانه " 🌟 نأمل في المرات القادمة إرفاق الملف بدون كلمة مرور للصفخات ومحرر الاكواد لتتمكن مشاركته بشكل أوسع من قبل الزملاء. شكراً لتفهمك! 🤝" المشكلة في ملفك في استدعاء رقم التسجيل صفحة قوائم التلاميذ - تم عملها بكود تلقائي وان اردت معادلة استخذم المعادلة التالية وهي نفس المعادلة تطبق على كل الشيتات والتغيير الوحيد فيها يتم في خلية اختيار القسم او الفوج =IFERROR(INDEX(Data!B:B;AGGREGATE(15;6;ROW(Data!$Z$4:$Z$1000)/(Data!$Z$4:$Z$1000=$C$6);ROW(A1)));"") الملف التقرير اليومي لمستشار التربية - ثانوي - 12.5.0.xlsm

يا سلام .. ها انت عبقري .. اختصرت علينا مسافات في البرمجة حين وضعت السعر النهائي العملية لا اعلم كم تحتاج من وقت انتظرني ... نسأل الله التيسير

??????????

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

تفضل استاذ @علاء فوزي الحجازي عل عجالة انشاء الله يفيدك . ووافني بالرد . Alaa_Fozi.rar

وعليكم السلام ورحمة الله وبركاته الاوفيس لو كان ٦٤ بت قم بازالته وتنصيب اوفيس ٣٢ بت ثم اعمل ريجستر للاداه مره اخري

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

وعليكم السلام ورحمة الله وبركاته .. بدايةً أهلاً وسهلاً بك أخي الكريم في المنتدى ، ونتمنى أن تجد ما تبحث عنه دائماً . وطبعاً ذلك يتحقق أولاً باتباع قواعد وسياسة المنتدى للحصول على نتيجة لطلبك ؛ بحيث يكون العنوان ذو شرح مختصر يدل على المشكلة . ومن ثم التوضيح في الطلب داخل المشاركة دون البخل ( ) في الكلمات على أصدقائك وأخوتك هنا . وكي تدعم شرحك وجوب وضرورة ارفاق ملف بسيط ليتم التعديل عليه بعد رؤية المشكلة على أرض الواقع .

شكرا استاذي عبدالله بشير عبدالله وبارك الله فيك على المساعدة

كنت افكر في طلباتك السابقة .. حول تاريخ الصلاحية وقد شرحت هناك الطريقة المثلى لتتبع المنتجات حسب تاريخ نهاية الصلاحية واقترحت عمل جدول وسيط يساعد في تطبيق نظام ( FIFO) الداخل اولا يخرج اولا وبما انه لا يهمك التدرج .. والمسؤلية ستكون على مسؤول المخزن لذا يمكننا حصر طلبك وتحقيقه بشكل عادي خطوات التنفيذ : 1- يجب عمل حقلين في جدول الاصناف : أ- سعر الصنف ( حسب الوحدة ) .. ب- نسبة الضريبة% في جدول التفاصيل ( النموذج الفرعي ) : ( الوارد فقط) - عند اختيار الصنف ينزل : السعر المفرد آليا _ نسبة الضريبة - يدخل العدد ليظهر مجموع السعر شاملا الضريبة - يدخل تاريخ نهاية الصلاحية يدويا يتاح للمستخدم تعديل سعر الصنف يدويا .. ويمكنه لاحقا تصحيح السعر في جدول الأصناف _____ في نموذج الفرعي ( الصادر ) لا يلزم ظهور الاسعار .. وعند عملية اخراج صنف منتهي تظهر رسالة تنبه بذلك والمستخدم حر في اكمال الاجراء او الإلغاء ________ اذا الشرح وافي ومفهوم وراق لك .. يمكنك رفع المرفق بعد عمل الفقرة 1 ( لجميع الاصناف)

السلام عليكم استبدل هذا Private Sub UserForm_Initialize() Call showinlistbox End Sub بهذا Private Sub UserForm_Initialize() TextBox25 = Val(Sheets("table").Cells(Rows.Count, 1).End(xlUp).Value) Call showinlistbox End Sub TextBox25 = Val(Sheets("table").Cells(Rows.Count, 1).End(xlUp).Value)

السلام عليكم ورحمه الله وبركاته هدية لأعضاء المنتدى الكرام برنامج أرشفة الخطابات و الوثائق .. الأرشفة الالكترونية مفتوح للعمل عليه غير محدد المدة ومش تجريبي مغلق المصدر (الاكواد) وتعديل النماذج تحياتي user 1234 1118021174_Archivesopen18-1-2021.rar