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

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


طائع

الردود الموصى بها

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

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

=COUNTIF(INDEX($C$3:$EV$5000;0;0);$FA$3)

حيث أنها تعمل على مدى كبير من A3:EV3  هذا بالنسبة للصف وتعمل الى الصف 2003

تحويل المعادلة الى كود لتخفيف البرنامج.rar

رابط هذا التعليق
شارك

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

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

  • Like 1
رابط هذا التعليق
شارك

 

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

وبعد أن تأخذ منها نسخة لباقي الخلايا ، مما يجعل الملف ثقيلا ... إجعل هذه الخلايا الباقية أرقام فقط Copy .. Paste .Value 
جرب ذلك أولا
 

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

فكرتك رائعه ولكن كيف يتم ذلك  ؟

تخيل اننا وضعنا المعادله بالصف السابع مثلا والشيت سيكون به عدد صفوف مقدارها 300 صف

كيف يتم نسخ المعادله الموجوده بالصف السابع الى بقيه الصفوف ؟ جزاك الله خيرا

رابط هذا التعليق
شارك

السلام عليكم
أخي الكريم
تقول

لو اننا وضعنا المعادله بالصف السابع مثلا والشيت سيكون به عدد صفوف مقدارها 300 صف 
كيف يتم نسخ المعادله الموجوده بالصف السابع الى بقيه الصفوف ؟

فقط تظلل الأسطر بداية من السابع إلي 300 أو ماتريد
ثم Ctrl-D
أو Data > Fill down

  • Like 1
رابط هذا التعليق
شارك

الأستاذ الفاضل / طارق محمود

الرجاء شرح مثال عملى لذلك حتى نستطيع التطبيق عليه أو على ملف آخر

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

تقبل وافر احترامى وتقديرى

رابط هذا التعليق
شارك

 

طال انتظارك أخى ومعلمى طارق 

حمدا لله على رجوعك ولعل المانع كان خيرا

جزاك الله خيرا أخي
رجوعي للأسف سيظل قليلا ومتباعدا لإنشغالي الشديد
وأرجو من الله أن أجد بعض الدقائق لمشاركتكم أحبائي
فهذا والله يسعدني أكثر مما يسعدكم

  • Like 2
رابط هذا التعليق
شارك

 

بناء على طلب الاستاذ طارق ارفاق الملف كاملا هذا هو الملف بعد أن جربت ما قلته 

book book.rar

السلام عليكم
أخي الكريم : بالمرفق ملفين
الملف الأول : book book2.xlsb  هو نفس ملفك بلا أكواد وقد أضفت عليه تعديل بسيط وحفظته بامتداد  xlsb الذي يتميز بسرعته وقلة حجمه
تم تخفيض حجم الملف من إلي 13190 إلي 810 كيلوبايت


الملف الثاني: book book3.xlsb  هو الملف بالكود وقد حفظته أيضا بامتداد  xlsb
وفي هذا الملف الثاني سيتم تفعيل الكود أوتوماتيكيا فقط إذا اضفت أو غيرت أي بيانات في أعمدة الأدوية
ولن يحدث أي شيء إذا غيرت أو أضفت من الأعمدة الأخري
وبتفعيل الكود سيضع المعادلة أوتوماتيكيا في الخلية المجاورة لها
تم تخفيض حجم الملف من إلي 13190 إلي 314 كيلوبايت

تفضل أخي المرفق بالملفين واستعمل مايناسبك

book2-3.rar

رابط هذا التعليق
شارك

أخى طارق مازال الملف ثقيل كما هو ماذا حدث بالملف كى يعطى النتيجة المبتغاه 

المعادلة التى مطلوب ان تقلب لكود هى   =COUNTIF(INDEX($C$3:$EV$5000;0;0);$FA3)

وليست معادلة السعر هذه =IF(ISERROR(VLOOKUP(C3;'مخزن أدوية'!$C$6:$I$9998;7;0));"";VLOOKUP(C3;'مخزن أدوية'!$C$6:$I$9998;7;0))

 

رابط هذا التعليق
شارك

2 ساعات مضت, طارق محمود said:

السلام عليكم

تم تحويل المعادلة المطلوبةإلي كود وهى   =COUNTIF(INDEX($C$3:$EV$5000;0;0);$FA3)

أعتقد أن الملف الآن مناسب

book book4.rar

أخى طارق جزاك الله خيرا تم المطلوب بعون الله وفعلا تم تخفيف البرنامج 

أدام الله عمرك فى الخير 

يتبقى سؤال بسيط كيف يمكن حفظ الملف بصيغة xlsb فى اكسل 2010

لك تحياتى

 

رابط هذا التعليق
شارك

13 دقائق مضت, طائع said:

أخى طارق جزاك الله خيرا تم المطلوب بعون الله وفعلا تم تخفيف البرنامج 

أدام الله عمرك فى الخير 

يتبقى سؤال بسيط كيف يمكن حفظ الملف بصيغة xlsb فى اكسل 2010

لك تحياتى

 

بسيطة خالص
Save AS
أو
F12
 

SaveAS.png

رابط هذا التعليق
شارك

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.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

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

Important Information