اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

توزيع القيمة آليا علي عدد من الخلايا أفقيا


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

هذا كود بسيط لتوزيع القيمة أفقيا علي مجموعة من الخلايا بالتساوي

اكتب رقم فى أي خلية

شغل الماكرو

سيسأل عن عدد الخلايا المطلوب التوزيع عليها

نفذ

مفيد لمن يقومون بالتدفقات النقدية المتساوية

مع تحياتي

DistributeEqual.rar

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

  • 2 weeks later...

أستاذي بعد تجربة البرنامج

ظهر لي التوزيع أصفار

بمعنى لم يوزع الرقم الذي استخدمت

بل وضع أصفار بعدد الرقم الذي وضعت بالإنبوت بوكس

أنا أستخدم أوفيس 2000

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

هل كتبت القيمة المراد توزيعها فى الخلية الفعلة قبل تشغيل الماكرو

مثلا اكتب 1000

ثم و انت مازلت فى نفس الخلية التي بها ا 1000

شغل الماكرو

و اختار 10 فترات

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

  • 3 weeks later...

شكرا جزيلا استاذي الفاضل محمد طاهر الملف يعمل بطريقة جيده وبالنسبه للاستاذ ابوأحمد بعد تشغيل الماكرو وانت في نفس الخلية المكتوب بها 1000 يفتح قائمة الماكرو قبل تشغيل run اختار من اسفل macros in واختار thes workbook ثم اضغط على run وحدد عدد الخلايا المراد التوزيع عليها الرقم

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

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

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

Important Information