اذهب الي المحتوي
أوفيسنا

Recommended Posts

السادة الافاضل

ارجو منكم المساعدة وذلك لتغير المعادلات الي اكواد vba وذلك لان الاصناف تتعدى 10000 صنف وعند العمل بالملف يصبح بطيء جدااا

شاكر اليكم حسن التعاون والمساعدة

حركة2018.rar

شارك هذه المشاركه


رابط المشاركه
شارك

يمكنك أخي الفاضل تحويل المعادلات إلى أكواد ، لكن لا أعتقد أن الملف سيكون أخف

افتح محرر الأكواد وأدرج موديول ، واكتب الكود التالي :

sub jard ( )

[g5].formula="=SUMIFS('حركة اليوميه'!G5:$H$10000,'حركة اليوميه'!E5:$F$10000,E5)"

range("g5:g10000").filldown

end sub

لاحظ أخي الفاضل أن السطر الأول هو تعريف لمحتوى ( g5 ) مع تغيير شكل الفواصل في المعادلة

والسطر الثاني لسحب المعادلة على النطاق المراد . ويمكنك تكرار هذا الكود قبل اغلاقه على بقية المعادلات التي تريد تحويلها إلى أكواد

آمل أن تكون الصورة واضحة ، علماً بأنني لست ضليعاً في هذا الجانب ، وإنما رأيت المساهمة على قدر معرفتي المتواضعة

فتقبل ما فيها من خلل .. وفقكم الله

sub jard ( )

[g5].formula="=SUMIFS('حركة اليوميه'!G5:$H$10000,'حركة اليوميه'!E5:$F$10000,E5)"

range("g5:g10000").filldown

end sub

 

  • Like 1

شارك هذه المشاركه


رابط المشاركه
شارك

أخي الفاضل 

اعتذر من حضرتك . لعدم معرفتي بذلك . وإنما أجبتك آنفاً على قدر معرفتي ، حباً في مد يد العون

ولعل الإخوة الأفاضل بفيدونك بما تريد 

وهم كثر ولله الحمد

  • Like 1

شارك هذه المشاركه


رابط المشاركه
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • محتوي مشابه

    • بواسطه Abdulkareem87
      https://youtu.be/GEWA0QKZJ7A
      ملفات الدرس الخامس.rar
    • بواسطه lord.anas

      السلام عليكم 
      اقدم لكم نسخه من برنامج كاشير للمطاعم حسب ارقام الطاولات 



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

      * - الجدول : _
      الفواتير المسدده يمكنك رجوع وتعديل عليها عن طريق الجدول وضغط دبل كليك على المراد تعديله 

      * - التقرير :_



      *- حذف الفواتير :_
      يمكنك حذف الفواتير عن طريق تحديد الرقم وضغط على حذف 
      يمكن استعلام على الفواتير المحذوفه من التقرير - فواتير محذوفه

      *- نقل الطاولة :_
      يمكن نقل الطاولة حسب طلبك بتحديد على الطاولة المراد نقلها واختيار امر نقل الطاولة
      يظهر مربع تختار رقم الطاولة الجديد بحيث لا يكون مظلل بالاحمر .

      *- تعديل على الفاتورة : _ 
      في حال رغبت الزبون طلب اوردر تختار رقم الطاولة المظلل بالاحمر وتغضط تعديل الفاتورة وتضيف الاوردر الثاني ويمكنك تكرار العملية

      في حال تكرار الصنف تضغط دبل كليك على الصنف +1
      في حال الغاء -1 يوجد زر بجانب الشاشة الاصناف -1
      في حال الغاء الصنف يوجد زر بجانب الشاشة *

      * - الاصناف : _ 
      يمكنك اضافة اصناف رئيسية واصناف فرعيه 
      الاصناف لا تحتاج الى كود لانها تختار كود اتوماتيكي 






      طباعه الفواتير بشكل جديد دينماكيه



      صلاحية كامله للبرنامج 

      الدخول : الدعم الفني 
      كلمة سر : 123

      يمكنك اضافت صلاحيات ومستخدمين


      كما قلت لكم نسخه قيد تطوير ...
      الحقوق النشر محفوظه  ...

      اتنمنى ان ينال اعجابكم

      لتحميل : _ 
      ‫كاشير-توزيع.xlsb
    • بواسطه أ / محمد صالح
      لكل عشاق الحديث في برمجة الأوفيس المتقدمة VBA يسعدني أن أقدم لكم شرح كود ترجمة جوجل 2019 في فيجوال بيسك للتطبيقات vba الموجودة ضمن حزمة ميكروسوفت أوفيس وسيكون الشرح على الأكسس microsoft access 2019 ومعالجة خطأ عدم ظهور الترجمة التعرف على أكواد لغات العالم world languages codes الموجودة في ترجمة جوجل وعددها 105 لغة التعرف على أسماء لغات العالم بالإنجليزية وباللغة العربية وباللغة المحلية لكل لغة دالة معرفة لإيقاف تنفيذ الكود فترة من الثواني wait مثل application.wait الموجودة في إكسل كتابة سطرين كود في سطر واحد نطق النصوص من خلال vba بجميع لغات العالم text to speech ترجمة سجلات الجداول أو الاستعلامات من خلال ADO وغيرها الكثيييييير اكتشفها بنفسك         رابط القناة لمن لم يشترك معنا حتى الآن   https://www.youtube.com/user/ostazmas2   #ostazmas   ************   فتابعونا وقوموا بتفعيل زر الجرس للتنبيه وقت صدور الفيديو وعلق ولو بحرف لكي تدعمنا للاستمرار من أجلكم   ********************* وفي هذه المرة لن أضع لكم الملف المستخدم في الشرح
      ولكن سأطلب ممن فهم الشرح أن يقوم بتطبيقه ويرفع لنا هنا ما تعلمه فعلا كنتيجة الفيديو /////////////////
      وتذكر معي الحكمة القائلة: لا تعطني سمكة ولكن علمني كيف أصطاد
    • بواسطه abdulrahmankalari
      سلام عليكم اخواني ...
      في هذا الفيديو نشرح كيف تحمي اكسس في مشروعاتك بدون كود فيجوال بيسك
      طريق سهل جدا
      https://www.youtube.com/watch?v=1AvCOO_ee4M
    • بواسطه edkawy
      السلام عليكم 
       
      الاخوده الكرام برجاء المسلعده فى الملف المرفق
      فى معادله فى العمود K  , (تراكمى) برجاء زضع المعادله فى كود VBA  لان الملف الاساسى تقيل جدا بسبب هذه المعادله
       
      ولكم وافر الشكر مقدما
      officena 2.xlsm
  • المتواجدين الان   0 اعضاء متواجدين الان

    لايوجد اعضاء مسجلون يتصفحون هذه الصفحه

×
×
  • اضف...