كل الانشطه

السلام عليكم اريد ان اطلب من الخبراء في الأوفيس نصحي او مساعدتي في هذا العمل. انا اعمل لدى مؤسسة سفريات كمنسق سفريات و مؤسستي تعمل كمقاول مستقل لدى شركة متوسطة، مهمتي هي كتالي عندما استلم كشف العمال المسافرين ليوم غد اقوم بتنسيقهم في (كشف الرحلات) بحسب المنطقة التي سوف يسافر أليها العامل، يتضمن الكشف رقم كل رحلة و اسم السائق و رقم السيارة و المنطقة التي سوف يسافر منها و المنطقة التي سوف يذهب إليها و نوع الرحلة هل هي اتجاه واحد او اتجاهين او رحلة ليوم كامل او رحلة ليوم كامل مع مبيت. بعدما انتهاء رحلات هذا اليوم و قبل انتهاء الدوام اقوم بأنشاء (فواتير يومية) لكل رحلة تحتوي على معلومات الرحلة كاملة. فأذا كانت لدي 17 رحله فأنني اقوم بعمل 17 فاتورة يومية لهذه الرحلات و اذا كانت لدي 12 رحلة أقوم بعمل 12 فاتورة يومية لهذه الرحلات و كهذا. و بعد الانتهاء من عمل الرحلات اليومية لهذا اليوم أقوم بكتابة جزء من تفاصيل هذه الرحلات في مستند يسمى (ملخص الرحلات) يضم هذا المستند كل رحلات الشهر الحالي من أوله و حتى آخر يوم. أقوم بتسجيل جميع الفواتير اليومية كل يوما بيومه بعد الانتهاء من انشاء الفواتير اليومية و مهمه هذا الملخص أنه يحتوي على مجموع مبالغ الرحلات اليومية خلال الشهر الحالي و عند الانتهاء من تعبئة تفاصيل فواتير الرحلات اليومية في آخر يوم في الشهر يظهر لي المبلغ النهائي لجميع هذه الرحلات التي حصلت في هذا الشهر. ثم و بعد تعبئة آخر الفواتير اليومية في ملخص الرحلات في آخر يوم في الشهر اقوم بعمل (الفاتورة الشهرية) للرحلات و اقدم هذه الفاتورة الشهري مع الفواتير اليومية التي حصلت خلال الشهر للشركة التي تعمل مؤسستي لديها بها، تحتوي الفاتورة الشهرية على المبلغ المستحق على الشركة مقابل جميع الرحلات التي حصلت خلال هذا الشهر. ما اطلبه هو انني ابحث عن طريقة لبرمجة هذه العملية التي اقوم بها ببرنامج مصغر بالأكسس او عن طريق اتممة هذه العمليات بواسطه دوال الاكسيل لتسهيل هذه العملية بسبب كثرة الرحلات و ضغط العمل و قلة الوقت الذي استطيع عمل هذه الفواتير اليومية في كل يوم. Trips List for 24-12-2025 Wednesday.docx Daily invoice trip no.1 24-12-2025.docx ‫Daily invoice trip no.2 24-12-2025.docx Trips ‫Summary 12-2025.xls ملخص سير العملية.docx

اخي العزيز انا لا اعرف اعمل الا على شيء انا افهمه العمل الذي امامي غامض .. فارجوا ان تعذرني لا اريدك ان تحزن فهذا هو فهمي قد اتمكن من مساعدتك لو اعطيتني قصة السجل كاملة من مولده وحتى يصل الى التقرير ما لون بالاحمر يدل على وجود اشياء غائبة يتم عملها منفصلة عن الجزء المرفق ................................. اعيد واكرر لو انا من صمم هذا العمل سأعمل على طريقة يفهمها اي مبرمج ومصمم وهي طريقة منطقية سهلة بدون اي تعقيد والتعديل عليها يسير +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ الطريقة : اذا دخل شهر3 من كل سنة .. في الفورم زر يعمل تصفية لمن يشمله هذا الاجراء .. يتم من خلاله الحاقهم في الجدول .. وزر آخر يتم اجراء الاقتطاع حسب ما نضعه من شروط ونكرر هذا الاجراء عند دخول شهر 7 ... اوغيره من الشهور للحالات الخاصة هنا يستحيل ظهور اي خطأ ... بمعنى انه يجب ان يكون لكل نوع من الأنواع عملياته الخاصة المنفصلة عن الاخرى الاقتطاع يتم تصفيته لوحده / القروض كذلك / ... الخ كل ذلك من خلال هذين الزرين وفورم واحد +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ اما مسألة كود واحد يقوم بجميع الاجراءات وآليا ايضا .. هذا يجب اعادة النظر فيه .. العجيب ان الكود يعمل عمل التقرير فيعرض رسالة احصائية . اكتب لك هذا وانا لم افهم بعد طريقة تحصيل المبالغ .. لأني لم افهم اصلا طريقة العمل على البرنامج

تفضل استاذ @Emad.85 المرفق بطلبك ووافني بالرد . Emad.85.rar

استاذ وجدت صعوبة في ارفاق الفيديو سوى بصيغة rar او mp4 عندما قمت بمسح مبلغ اقتطاع القرض للمنخرط رقم 4 خلال تاريخ 2025/12/01 وقمت بالدخول للنموذج لقد تحقق اعادة الاقتطاع من جديد ولكن عند الدخول بتاريخ 2026/03/01 تحقق اقتطاع الانخراط ولكن ليس للكل " اي منخرط عنده مبلغ 3000.00 من سنة 2025 استثناه الكود في سنة 2026 " .......... (1) مثلا المنخرط رقم 4 وكذا المنخرطين 256/261/290 استثناهم كما في (1) لم يقتطع لهم مبلغ الانخراط لسنة 2026 المقدر ب 1500.00 يفيد ان بان الكود لا يؤدي بواجبه مائة بالمئة وخاصة في شطره الاستنثناء هذا ' مجموع ما دفعه سابقًا totalPaid = Nz(DSum("Payment_Made", "tbl_Loans", _ "Loan_ID= 0 AND EmployeeID=" & EmpID), 0) ' إذا وصل 3000 ? توقف If totalPaid >= 3000 Then GoTo SkipInkhirat End If

لا استاذ يمكن تعديل الاخ الي قبل هو سبب عدم اقتطاع الشهري للقروض بعدما كان يقتطع عادي والان بحكم خبرتكم لم تعرفو اين تكمن المشكلة بالرغم من وجود فورم FrmTransfer1 بقتطع عادي الم يتم التنسيق بينه وبين FrmTransfer الذي به المشكلة ديسمبر فعلا تم الاقتطاع يدويا لو غير تاريخ الجهاز الى شهر جانفي 2026 لأكتشفت المشكلة عند المنخرط رقم 4 او قمت بمسح المبلغ المقتطع لتاريخ 2025/12/01 وقمت بالدحول للفورم FrmTransfer ستجده يبقى فارغا اي الكود لم يقتطع المبلغ استاذ هذه السجلات تنشي من جديد خلال أشهر الاقتطاع فقط ولك دالة النموذج الثاني FrmTransfer1 كمثال اقتطاع

جرب هذا الحل تسجيل الطرمبات2.xlsx

انا لم أقم بتعديل أي شيئ كل ما قمت به هو تصحيح الكود الخاص بك كالتالي السطر الأول كان هكذا Set rstE = db.OpenRecordset("SELECT * FROM Employee WHERE Nr <= 5", dbOpenDynaset) وكان يحتوي الأخطاء التالية - كنت تتعامل مع الحقل Nr في الجدول Employee على أنه حقل رقمي ولكنه حقل نصي - أعتقد أنك تظن أن هذا الحقل يحتفظ برقم الوظيفة إلا أنك مخطئ فهو يحتفظ بإسم الوظيفة والصورة التالية ستوضح لك ما أقصده مما سبق يتضح لنا أنه لن يتم تحقيق معيار التصفية Nr <= 5 لذلك قمت بتعديله إلى السطر التالي Set rstE = db.OpenRecordset("SELECT *,TblDetaché.Nr as NrE FROM Employee INNER JOIN TblDetaché ON Employee.detach = TblDetaché.detach WHERE (((TblDetaché.Nr) <= 5));", dbOpenDynaset) حيث سيتم ربط الجدول Employee مع الجدول TblDetaché وسنأخذ قيمة Nr من الجدول TblDetaché لأنه رقمي وقمنا بتسمية الحقل هذا بإسم NrE أما التعديلات التالية كلها تخص الحقل EmpID فأنت تتعامل معه كحقل نصي وهو حقل رقمي لذلك قمت بإزالة علامة الإقتباس المفردة التي قيل وبعد EmpID فمثلا 'تم تعديل هذه العبارة EmployeeID='" & EmpID & "' 'بهذه العبارة EmployeeID = " & EmpID & " اخر تعديل ونظرا لأنه وكما سبق توضيحه بخصوص الحقل Nr تم تعديل السطر التالي 'إستبدلنا هذا السطر rst!Nr = rstE!Nr 'بهذا السطر rst!Nr = rstE!NrE حتى يتم أخذ قيمة Nr من الحقل الذي قمنا بتسميته بالإسم NrE في جملة Sql أعلاه هذه هي كل التعديلات التي قمت بها فهل هذا سيؤثر على طريقة احتساب القروض؟

جزاك الله الخير الملف مظبوط شكرا جزيلا استاذنا

وعليكم السلام ورحمة الله وبركاته جرب الكود في الملف المرفق 1الجرد.xlsm

اشكرك جزيلا

السلام عليكم الاخوة الاعزاء الرجاء المساعده في ملف مرفق اريد ترحيل اكواد الاصناف الموجوده في المخزون (عمود O) رقم 1 يعني موجود واذا صفر يعني غير موجود اريد الترحيل من 3 صفحات الي صفحه الجرد بالترتيب صفحه RX وبعدها صفحه W وبعدها صفحه D في العمود B في صفحه الجرد ترحيل معرف المخزون فقط اذا موجود الصنف شكرا مقدما للجميع الجرد.xlsm

طيب .. انا فتحت الملف الذي هو الفورم خرجت رسالة معنونة بشهر ديسمبر 2025 .. تقول تم التوزيع بنجاح .. دخلت الجدول ولم اجد شيئا دخلت الى الكود افهمه وجدت اول شرط ان يكون الجدول يشتمل على تاريخ مساو للتاريخ على النموذج وطبعا يوجد في الجدول بيانات لسجلات قديمة فقط وانت تريد اقتطاع شهر 3 و 7 من سنة 2026 اليس من المفترض وجود هذه التواريخ في الجدول قبل فتح النموذج ؟ ( لأن الكود يعمل بمجرد فتح النموذج) انا اتصور لو قمت انا بتصميم هذه الجزئية ان يكون هناك 2 ازرار .. واحد لالحاق البيانات الرئيسية مع التواريخ المختارة والثاني لعملية الاقتطاع

نسخت لك FrmTransfer1 للتوضيح فقط والعمل علىFrmTransfer الذي يكون فيه التعديل

اخي الكريم ذكرت انظر في الكود في فورم FrmTransfer1 بينما البرنامج يفتح على FrmTransfer والكود cmd_Pay_installments موجود في النموذجين لا اخفيك تهت .. اذا العمل على FrmTransfer1 لماذا FrmTransfer موجود ؟ اذا يوجد ازرار غير مهمة احذفها .. هذا مجرد مثال

في إتقان، نحن نقدم الترجمة العلمية والأكاديمية التي تساعدك على توصيل أفكارك البحثية بشكل دقيق وواضح إلى جمهورك العالمي، نحن نختص في ترجمة أبحاث علمية وترجمة أوراق علمية من وإلى مختلف اللغات، مع ضمان الحفاظ على المصطلحات العلمية والتقنية بدقة، سواء كنت بحاجة لترجمة أبحاثك للنشر في مجلات أكاديمية دولية أو للمشاركة في مؤتمرات، اتقان تقدم لك خدمة ترجمة احترافية تتوافق مع المعايير الأكاديمية الدولية؛ مما يساعدك في الوصول إلى النجاح الأكاديمي بشكل أسرع.

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

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

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

في شركة إتقان للاستشارات الأكاديمية والتدريب، نحن نساعدك في ترجمة بحث علمي بطريقة احترافية؛ حيث نقدم لك ترجمة بحوث باللغة الإنجليزية مع ضمان الحفاظ على المعنى العلمي والموضوعي للمحتوى، لدينا فريق من المترجمين الأكاديميين المختصين في أبحاث بالإنجليزي عبر مختلف التخصصات العلمية، سواء كنت بحاجة إلى ترجمة بحث طبي، هندسي أو اجتماعي، نحن نضمن لك تقديم ترجمة دقيقة وسليمة لغويًا، مع اتقان سيكون لديك ترجمة عالية الجودة تساعدك على نشر أبحاثك في المجلات العلمية الدولية.

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

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

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

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

هل تريد ترجمة بروفايل لشركتك؟ في شركة إتقان نقدم لك خدمة ترجمة بروفايل الشركة الجرمانية أكاديمي الرأس الدائم وصول رسالتك دقيق جدا الدولي، ترجمة بروفايل الشركة المهمة الجوهرية الالتزام صورة الشركة في التنوع العالمي؛ مما يساعد على جذب العملاء والشركاء من ثقافات ولغات مختلفة، عند القيام بـ ترجمة الأساسيات لشركة بروفايل ، خذ بعين الاعتبار اتقان لسبب مثل الالتزام بالأسلوب الرسمي في الترجمة العلمية ، نقل القيمة بشكل جيد، وتناسب اللغة مع الجمهور المستهدف .

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