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

أنشاء قائمة


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

  • 2 weeks later...

السلام عليكم

اخي العزيز ابو تامر

جزاك الله كل خير اخي ابو تامر علي هذا العمل

اخي هادي سالم

الملف الذي ارسلته الكمبو بوكس كان لا يعمل لذا لم افهم ملفك في البدايه

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

تحياتي لكما

Fill.rar

تم تعديل بواسطه aah_aah2008
رابط هذا التعليق
شارك

السلام عليكم

أخي الكريم: هادي , أبو تامر, aah

بارك الله فيكم

أخي أبو تامر :

كودك جميل و عملي , لكن المشكلة أن تعليمة CHANGE بالكود عندك محجوزة عندي لكود آخر و هو الحساب التلقائي و لا يمكنني التخلي عنها , فقط هذه المشكلة ؟؟؟؟ جربت تعليمة SELECTCHANGE فلم تنجح ؟؟؟؟

أخي هادي :

بعد تعديل aah على ملفك , أصبحت الكومبوبوكس تعمل جيدا, لكنني أريد أن أكتب في أي خلية من المجال و يتم التغيير , عندك التغيير فقط في الخلية A1, هل أنا مخطأ بطريقة التشغيل , الميزة عندك أن تعليمات الورقة لا يتم حجزها,

أرجوكم ... لا تضجروا مني

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

الاخ nyef

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

يمكنك اضافة سطور التعليمة CHANGE خاصتى الى نهاية التعليمة خاصتك CHANGE قبل السطر End Sub

واذا واجهتك صعوبة فى ذلك

ارسل التعليمة CHANGE خاصتك واقوم بالدمج لك حتى لا يكون هناك تعارض

تم تعديل بواسطه أبو تامر
رابط هذا التعليق
شارك

بسم الله الرحمن الرحيم

اخي هادي سالم

الملف الذي ارسلته الكمبو بوكس كان لا يعمل لذا لم افهم ملفك في البدايه

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

لك حق اخى عادل , و شكرا على التعديل 0

أخي هادي :

بعد تعديل aah على ملفك , أصبحت الكومبوبوكس تعمل جيدا, لكنني أريد أن أكتب في أي خلية من المجال و يتم التغيير , عندك التغيير فقط في الخلية A1, هل أنا مخطأ بطريقة التشغيل , الميزة عندك أن تعليمات الورقة لا يتم حجزها,

أرجوكم ... لا تضجروا مني

فعلا يتم التغيير فى خليه واحده 0

فهل تريد التغيير فى مجموعه خلايا ؟

السلام عليكم

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

السلام عليكم

أخي أبو تامر

أريد اضافة تعليمة حساب تلقائي للورقة

activesheet.calculate

فقط يا اخي الكريم

أود التوضيح منك

هل يقبل الكود أسماء نطاقات بدل من تسمية خلابا

أي بدل ("a1:a2") أضع أسم نطاق

أخي هادي

نعم أريد التغيير في أي خلية و ليس في الخلية الأولى فقط

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

السلام عليكم

اخي هادي

لك كل الشكر

اخي nyef

ارجو ان اكون فهمت صح

راجع الملفان المرفقان

فاذا كنت تريد التغيير للخليه الاولي فقط فالملف الاول يتيح ذلك

اما اذا اردت التغيير يتم في مجموع الخلايا فالملف الثاني يتح ذلك

وايضا علي نفس كود اخي هادي سالم

تحياتي

Fill.rar

Fill2.rar

تم تعديل بواسطه aah_aah2008
رابط هذا التعليق
شارك

الاخ nyef

نعم اخى يمكن استبدال مراجع النطاقات بأسماء نطاقات

انظر المرفق اخى

تم اضافة تعليمة ( ActiveSheet.Calculate ) الى الكود

و تم استخدام اسماء النطاقات حسب رغبتك

_________________________________________2.rar

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

السلام عليكم

أخي الكريم: عادل

بارك الله فيك .. الملف و للحق ليس كا قدمته بل تماما كما قدمه أخي ابو تامر, أرجوك أن تقبل مني أعتذاري على التعب الذي سببته لك و شكري على مجهودك الغالي

أخي أبو تامر :

الكود جميل و شغال تمام كما قدمته , لكن واجهتني مشكلتين إن أمكن حلهما أكون لك شاكرا

الأولى: لجهة نقل النطاقات لورقة ثانية يسبب توقف الكود عن العمل

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

أعيد الملف بعد أبداء الملاحظات إن أمكن التغيير

شكرا

________________.rar

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

السلام عليكم

أخي ابو تامر

ماشاء الله ..ماشاء الله.. ماشاء الله

بحر من العلم بعون الله

المطلوب بالضبط

بارك لك في أعمالك و حياتك و عيالك , لقد أزلت الكرب من نفسي ..

مششششششششششششششششكور يا أخي

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

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



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

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

Important Information