triste

أنت فعلاً خير للمنتدى ، زادنا الله من اسمك نصيباً و بارك لنا فيك و أنا بسبيلى للبدء ك self learner فى تعلم VBA من خلال بعض الكتب , و لكن بصراحة البداية صعبة قوى :) :) :)

بجد حقيقى و الله ما شاااااااااااااااااااااااااااااااااااااااااااء الله عليك إن منتدانا ليشرف بوجود أستاذ و خبير مثلك لقد فتحت الملف لتوى ، و سأحاول جاهداً أن أفهمه ، فقد (عملت اللى عليك و زيادة ) و كتيته بصيغة للشرح مع أسهم توضيحية فالحقيقة أننى بعد قراءة الكود السابق ، - و هذا أيضاً - أدركت و تأكد لى أنه مهما كان المرء قد تمكن من معادلات الإكسيل فإنه لا يزال ينقصه الكثير إذا لم يكن قد تعلم بعد كيف يكتب أكواد بلغة الفيجوال بيزيك ، فهناك الكثير من الأمور ما لا يفلح معه المعادلات ، و عندما طرحت مشكلتى هذه بالمنتدى توقعت أن الحل سيكون عن طريق كود لذا لم أحاول كثيراً - عى خلاف طبيعتى - أن أجرب بالمعادلات لأ ن ليس هناك معادلة تخبر الإكسيل أن يبحث فى نطاق بشكل Dynamic مرة أخرى أشكرك أستاذى العزيز و أدعو لك بالتوفيق و الخير الوفير بإذن الله و الشكر موصول لكل من أخى الحبيب : اكسيلجى الذى تفضل مشكوراً بموافاتى بالملف الأول على بريدى الإليكترون أخى الحبيب : عمر الحسينى ، الذى أيضاً بادر مسرعاً بموافاتى بالملف المذكور أخى الحبيب / هادى سالم ، الذى بث فى الطمأنينة بعد أن أكد لى أن تساؤلى يتم بحثه فشكراً لك جميعاً إخوتى الأحباء و حقاً إن منتدانا ليشرف بوجود أمثالكم

و النطاق الذى سأضع به أكواد الفروع فى كل من الشيتين هو من : AX4 نزولاً حتى AX13 و العمود الذى يجب وضع أكواد العاملين به هو العمود A و من الوارد استمرار اضافة صفوف جديدة و ذلك فى كل من الشيتين consolidated و POVERTY و لا داعى للجزء من الكود الذى سيستدعى كود الفرع فى كلا الشيتين لأن هذا يتم فى كلا الشيتين بموجب معادلة VLOOKUP تعتمد على أكواد العاملين كمعيار للبحث و الإستدعاء ( و هى التى سيتم استدعائها من خلال الكود) أما أكواد الفروع فى الشيت المحتوى على الجدول الأصلى فهى بدءاً من O5 و نزولاً أنا أحاول أرفاق الملف لتيسير الأمر و لكن حجمه 5228 KB و من ثم يحتاج لموقع رفع و ليس على سيرفر المنتدى

طبعاً أكثر من راااااااااااااااااااااائع و مبدع كعادتك أخى الفاضل و أستاذى / خبور فقط أستأذنك أحتاج تعديل بسيط فى الكود حيث أن هناك شيت آخرسيتم اضافته، كى يتم فيه استدعاء بيانات بعض العاملين ممن يعملون بفروع معينة فيه، و الباقى ممن يعملون فى فروع أخرى يتم استدعاء بياناتهم فى الشيت الآخر و يستقى كل منهما البيانات من نفس الشيت الموجود به جدول البيانات الأصلى و لكى أسهل عليك الأمر و على نفسى :) أيضاً : سأضع لك أسماء الsheets الفعلية حتى أضع الكود كما هو - لأننى لا أفهم فى ال VBA شيئاً الشيت AA اسمه الفعلى لدى (Sheet1 (2 و هو الموجود به الجدول الأصلى الذى يحوى بيانات جميع العاملين الشيت bb اسمه الفعلى لدى consolidated الشيت الجديد الذى أرغب فى إضافته و يكون عمله مماثل فى الطبيعة للشيت السابق اسمه الفعلى لدى POVERTY أى أن محتويات الجدول فى شيت (Sheet1 (2 سيتم توزيعها على كل من شيت consolidated و شيت POVERTY بنفس الشكل و بحسب أكواد الفروع التى سيتم إدخالها فى كل منهما أرجو أن أكون قد نجحت فى توصيل فكرتى و لك خالص الشكر مرة أخرى

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

الأخوة المشرفين : للرفع (للأهمية)

الآن لا أستطيع تحميل أى ملف من المنتدى ، و أجد عدد مرات تحميل الملف الموجود بالمشاركة التى وضعها الأخ / خبور فى إزدياد فهل المشكلة موجودة عندى أنا فقط أم ماذا ؟؟؟!!!!!! أفيدونى أفادكم الله

هذة صورة رسالة الخطأ

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

لو كان هناك مشكلة ما فى المنتدى ، هل يمكن لأحد الأخوة ممن نجحوا فى تحميل الملف مشكوراً أن يرسل لى بالملف على بريدى الإليكترونى sedap12345@hotmail.com جزاكم الله كل خير

الأخوة الأعزاءمشرفى المنتدى لا أدرى لماذا كلما حاولت تحميل الملف تظهر لى رسالة خطأ تفيد بأن الخاصية محجوبة !!!! أجو منكم التكرم بمساعدتى و لكم جزيل الشكر حيث أننى بحاجة شديدة لتحميل هذا الملف

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

السلام عليكم و رحمة الله و بركاته : لدى كتاب عمل يتضمن ورقتين : الأولى بها جدول يتضمن بيانات خاصة بالعاملين بإحدى المؤسسات ، و مكون من 3 أعمدة A,B,C العمود A يتضمن أسماء جميع العاملين العمود B يتضمن الرقم الكودى لكل عامل العمود C يتضمن الرقم الكودى للفرع الذى يعمل به العامل و للمؤسسة 10 فروع الأرقام الكودية لهم هى (11،9،8،7،6،5،4،3،2،1) و من ثم فالعمود C يتضمن أرقام من الأكود الموضحة فى السطر بعاليه و فى ورقة العمل الثانية يوجد نفس الجدول ، و لكن بدون أى بيانات بداخله ، و يوجد نطاق محدد من الخلايا بجوار هذا الجدول الفارغ (بواقع 10 خلايا) كعمود مجاور له كى يتم إدخال أرقام أكواد الفروع التى يتم إختيارها و التى يجب أن يتم البحث و ملء الجدول بموجبها و المطلوب هو : عندما يتم إدخال أى من أكواد هذه الفروع فى هذه الخلايا فى هذا النطاق بواقع رقم كودى واحد فى الخلية الواحدة يتم ملء الجدول تبعا للرقم / الأرقام التى تم إدخالها ( بمعنى لو تم إدخال الأكواد 11،9،8،4 فى الأربعة خلايا الأولى من النطاق المذكور يتم ملء الجدول بأعمدته الثلاث ببيانات هؤلاء العاملين الذين يعملون بهذه الفروع التى تم كتابة الأرقام الكودية لها فى النطاق فقط دون غيرهم ، و بإفتراض أن ملء النطاق سيتم مراعاة الترتيب التصاعدى فيه من أعلى لأسفل ، فالمطلوب أن يتم ملء الجدول أيضاً وفق هذا المنطق فى الترتيب ( بمعنى العاملين بالفرع 4 يليهم العاملين بالفرع 8 يليهم العاملين بالفرع 9 و أخيراً العاملين بالفرع 11 ) و إذا اقتصر ملء النطاق على رقم واحد فقط يمثل أحد أكواد الفروع يتم ملء الجدول ببيانات العاملين بهذا الفرع فقط دون غيره ، و إذا لم يتم إدخال أى قيمة فى أى من خلايا النطاق يبقى فارغاً بطبيعة الحال ، و إذا تم إدخال أى قيمة ليست من ضمن أكواد الفروع تظهر رسالة تحذيرية VALIDATION ترفض الإدخال. حاولت جاهدا حل هذه المشكلة و لم أجد أى حالة مشابهة لأن VLOOKUP تضع أول قيمة مقابلة فقط للمعيار المطلوب و تبحث وفق معيار واحد فقط على حد علمى و لا أريد استخدام PIVOT TABLE أو فلترة لأن الجدول الحقيقى _فما طرحته هو مجرد مثال مبسط سأستخدم فكرة الحل له - مكون من نحو 40 عمود , 200 صف و بهم معادلات كبيرة الحجم و معقدة لكل خلية و هو يستقى البيانات من جدول فى ورقة عمل أخرى كبير الحجم أيضاً ، إلى الحد أن الإكسيل بدأ يعجز عن القيام بإعطاء النتيجة الصحيحة عند نسخ المعادلات أو إدراج صفوف جديدة لذا لن تسعفنى الفلترة أو الPIVOT TABLE فهل أجد لديكم الحل ، لأننى فى سباق مع الزمن لأن هذا سيدخل فى جزء من تقرير أقوم بعمله و مطلوب من رؤسائى فى العمل على وجه السرعة بارك الله فيكم و جزاكم كل خير

هل هذه الرسالة أيضاً ستكون كسابقاتها بدون أى رد عليها !!

الأخوة الأعزاء : لدى WorkBook مكون من 13 Sheet و به 2 Modules أحدهما لفك الحماية عن الخلايا المحمية و إعادتها عن جميع ال Sheets فى خطوة واحدة و الثانى لإجراء طباعة فى الصفوف التى تحتوى على Date فى خلايا معينة بالصفوف دون باقى الصفوف و ذلك أيضاً فى جميع ال SHEETS و الثانى يقوم بفك الحماية و إجراء الطباعة و إعادة الحماية مرة أخرى دون تدخل المستخدم الغريب فى الأمر : أننى بعد قيامى بعمل حماية تمنع المستخدم من الإطلاع على محتويات هذه ال Modules لأن بها - بطبيعة الحال - كلمات السر و ذلك من خلال VBA EDITOR VBA PROJECT PROPERITIES PROTETION و منها وضع علامة (صح) أمام LOCK PROJECT FOR VIEWING فوجئت بعد ذلك أن الإكسيل يعترض على حفظ البيانات التى يتم إدخالها فى أى من ال SHEETS طالما الحماية قائمة لل SHEETS ( على الرغم من أن هذه البيانات يتم إدخالها فى الخلايا التى لاتشملها الحماية ، و يطلب منى إزالة حماية ال VBA PROJECT على الرغم من أنها مجرد حماية لمنع إطلاع المستخدم على نص ال MODULES و المفروض أنه لا يجب إزالتها كشرط لقيام الإكسيل بحفظ ال DATA فكيف أحل هذه المشكلة ؟؟؟؟؟؟؟؟؟ :')

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

أخى / GHMN7174 أخى / ابو اسامة العينبوسي أشكركما جزيل الشكر على كلماتكما الرصينة العاقلة الطيبة و لباقتكما الشديدة ، و مهارتكما فى نزع فتيل الأزمة ( و ليست هناك أى أزمة إن شاء الله ) ، كل ما فى الأمر أننى اندهشت قليلاً ، و لكنى أقول لأخى / dangerman - لا تأخذ على خاطرك منى . و لا أقصد الإساءة لك .

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

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

أقترح تغيير اسم الموضوع ، ليصبح أكثر دلالة على طبيعة الموضوع ، و شكراً لجميع الأخوة المشرفين :)

جرب أن تضع فى ال return type الرقم (7)

سبق حدوث هذا الأمر معى أكثر من مرة ، حتى يئست من الرد :(

تفضل أخى الكريم http://www.officena.net/Taher/Pivot/Pivot.htm

سؤال جيد بالفعل

سبق أن حاولت عمل كشف مراجعة للفوائد البنكية (بطريقة النمر) ، و على أساس إدخال الحركات مرتبة بتاريخ الحق (value date) و ليس بتاريخ القيد ، و على أساس أن المسحوبات تأخذ حق نفس يوم العمل ، و الإيداعات تأخذ حق يوم العمل التالى ، عدا الشيكات التى قد يكون لها تاريخ حق مختلف . لكنه و على الرغم من ذلك لم يعطى نتائج مطابقة فى جميع الأحوال ، و إنما فقط فى بعض الأحيان ، مع قيمة الفائدة المحتسبة فعلياً من البنك . و للغرابة لم أجد من تطرق مطلقاً لهذا الموضوع ، رغم أهميته الحيوية !! أما عن عمل كشف لمجرد التسوية و حصر القيود الموجودة هنا و غير موجودة هناك ، فهو مسألة سهلة بطبيعة الحال ، و تحتاج لمعادلات بسيطة للغاية ، و هناك موجوع بالمنتدى لهذا الأمر.