تجميع وترحيل البيانات بالفلترة بدلالة أسماء شيتات المصنف

[أبو عبد الرحمن سعيد]

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

وبه نسستعين

السادة الزملاء الافاضل

السلام عليكم ورحمته الله وبركاته

أسعد الله أيامكم بكل خير وكل عام أنتم جميعا بخير

الكود المبين بالمرفق التالى يُرحل البيانات لعدة شيتات

ايا كان عددها بدلالة عمود معين باستخدام المصفوفات

المطلوب بإذن الله تعالى بعد إذن حضراتكم

المساهمة فى عمل كود من شأنه فلترة وتجميع الاصناف المدونة بالورقة data  

وترحيلها بدلالة إسم المخزن التابع لهذه الاصناف كلما أعددنا بيان جديد

تقبلوا وافر تقديرى وإحترامى **** وجزاكم الله خيرا

تجميع وترحيل البيانات بالفلترة.xlsb.rar

تم تعديل مارس 30, 2016 بواسطه ابو عبدالرحمن بيرم

[ياسر خليل أبو البراء]

أخي الكريم سعيد بيرم

وعليكم السلام ورحمة الله وبركاته

الكود المرفق في الملف المرفق يؤدي المطلوب ..فما المطلوب بالضبط؟

جرب تضيف أصناف جديدة ونفذ الكود سيتم تحديث البيانات الموجود في كل أوراق المخازن السبعة ..

إذا كنت قد فهمت الطلب بشكل خاطيء فأرجو الإيضاح بالتفصيل .. وما المشكلة التي بالكود؟

 

[أبو عبد الرحمن سعيد]

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

وبه نستعين

أخى وحبيبى فى الله // ابو البراء

وعليكم السلام ورحمته الله وبركاته ***** وصباح الفل والياسمين 

بشأن الكود المبين بالمرفق نعم اخى الحبيب  بسم الله ماشاء الله 

هو يؤدى المطلوب نحو الترحيل لاكثر من ذلك ولكن دون تجميع للأصناف

برجاء الاطلاع على المرفق التالى ومن حيث التجربة ابقيتها على مخزن 1 ذات اللون الاصفر ارقام 2 و 6 و 11

ولتقريب وجهة النظر نحو المطلوب وبعد إذنك برجاء الاطلاع على المرفقين 

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

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

تقبل وافر احترامى وتقديرى **** وجزاكم الله خيرا

Extract Unique Values From Multiple Sheets YasserKhalil (1).rar

تجربة1.xlsb.rar

تم تعديل مارس 30, 2016 بواسطه ابو عبدالرحمن بيرم

[ياسر خليل أبو البراء]

لم يتضح المطلوب بعد ..قم بالإطلاع على المرفق المسمى تجربة1 ووجدت أنه يتم ترحيل الأسطر باللون الأصفر إلى ورقة العمل مخزن 1 ...

هل تقصد أنه سيكون هناك أصناف مكررة وتريد تجميع هذه الأصناف أولاً قبل عملية الترحيل أم أن التجميع يكون مع عملية الترحيل ...

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

 

[أبو عبد الرحمن سعيد]

اخى الحبيب ابو البراء

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

واعتقادك على صواب  بشأن المرفق الاول ***  حيث يحتوى المرفق على ذات الفكرة المراد تحقيقها

وافر تقديرى واحترامى *** وجزاكم الله خيرا

 

تم تعديل مارس 30, 2016 بواسطه ابو عبدالرحمن بيرم

[أبو عبد الرحمن سعيد]

أخى وحبيبى فى الله **** ابو البراء

السلام عليكم

أسأل الله تعالى أن يصلح مابين أيديكم ويديم عليكم وايانا نعمة الصحة والعافية

إعانكم الله تعالى على مشغولياتك

هل هناك غموض أو أية إستفسارات أخرى نحو هذا الموضوع

وافر تقديرى واحترامى *** وجزاكم الله خيرا

تم تعديل أبريل 1, 2016 بواسطه ابو عبدالرحمن بيرم

[ياسر خليل أبو البراء]

ممكن عمل كود تاني يتم تنفيذه بعد الكود الأصلي ..؟؟ ما رأيك بالأمر؟

[أبو عبد الرحمن سعيد]

والله ياأبو البراء

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

وربنا يجعله فى موازين حسناتك

إن كان هناك إتاحة لعمل كود إضافى فعلى الرحب والسعة

أرجو بأن لا يكون هناك قلق من جهتى لاننى أعلم أن الموضوع معقد بعض الشيىء

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

فإحنا مع بعض ***** تقبل وافر تقديرى واحترامى **** وجزاكم الله خيرا

[ياسر خليل أبو البراء]

أخي الحبيب أبو عبد الرحمن

إليك الملف المرفق فيه الكود بعد إضافة كود آخر له ليقوم بالمهمة (بس هتعبك لمدة دقيقة واحدة في شوية مساعدة)

حمل الملف من هنا

تصحيح ستجد في الكود هذا السطر

If LCase(Left(WS.Name, 5)) = "مخزن" Then

غير الرقم 5 إلى 4

تقبل تحياتي

[أبو عبد الرحمن سعيد]

أخى وحبيبى فى الله أبو البراء

السلام عليكم ورحمته الله وبركاته

ياحبيبى هو مين اللى تاعب مين

انت تأمر ***** جارى تحميل المرفق

تقبل وافر تقديرى واحترامى **** وجزاكم الله خيرا

 

[ياسر خليل أبو البراء]

وعليكم السلام ورحمة الله وبركاته

جزيت خيراً أخي الحبيب سعيد بيرم

وإن شاء الله معاك لو فيه أية ملاحظات

[أبو عبد الرحمن سعيد]

اخى الحبيب الغالى ابو البراء

السلام عليكم

الم تخطرنى بنوع المساعدة المطلوبه *** أرى ان هناك الكثير فى انتظارى *** مجرد إحساس

جارى إضافة ماتفضلت به سيادتكم على الملف الاصلى

وبحول الله سأوافيك بالنتيجة غدا إن قدر الله تعالى لى البقاء نظرا لاننى فصلت يدوبك أصلى الفجر

تصبح على ألف خير وسعادة وهناء

تقبل وافر تقديرى واحترامى **** وجزاكم الله تعالى واحسن اليك

تم تعديل أبريل 2, 2016 بواسطه ابو عبدالرحمن بيرم

[أبو عبد الرحمن سعيد]

اخى وحبيبى فى الله ابو البراء

السلام عليكم

  كما تعلم أخى الحبيب الغالى أن بيان الاسعار متغير حسب طلب كل عميل

فعلى مستوى الفاتورة الواحدة لايوجد أصناف مكررة 

والكود الاضافى الذى تفضلت به لايعمل الا فى وجود أصناف مكررة 

سيتم رفع موضوع جديد ربما نصل لحل أخر

تقبل وافر احترامى وتقديرى **** وجزاكم الله خيرا

تم تعديل أبريل 2, 2016 بواسطه ابو عبدالرحمن بيرم

[ياسر خليل أبو البراء]

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

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

حاول ترفق ملف معبر ميكونش البيانات فيه هي هي البيانات ..عايز بيانات واقعية والأفضل كما أخبرتك أن ترفق شكل النتائج المتوقعة لكي يزول أي لبس ..

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

تقبل تحياتي

[أبو عبد الرحمن سعيد]

اخى الحبيب المحترم // ابو البراء

السلام عليكم

أشكرك لحسن طيب المتابعه

اعتذر لعدم الرد فى حينه نظرا لظروف طارئة 

جارى إعادة ترتيب أوراقى ربما يكون هناك لبس ما من عندى

وسأوافيك بالرد النهائى فى حينه *** أما بشأن ملفاتى المرفقه فهى دائما معبرة عن الواقع الذى أعمل عليه

تقبل وافر تقديرى واحترامى **** وجزاكم الله خيرا

تم تعديل أبريل 3, 2016 بواسطه ابو عبدالرحمن بيرم

[ياسر خليل أبو البراء]

وعليكم السلام أخي الالغالي سعيد بيرم

إن شاء الله تكون المشكلة حلها بسيط .. وأعتذر عن تكرار التوجيه فيما يخص أن يكون الملف المرفق معبر ..

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

قم بإعادة ترتيب أوراقك (فيه ناس ممكن تقراها أوراكك .. فمتزعلش منهم) وإن شاء الله نحن والأخوة بالمنتدى معك في أي مساعدة تحتاجها

تقبل تحياتي

[أبو عبد الرحمن سعيد]

ههههههههههههههه

معتشى اصلا لا أوراك ولاحتى صدور

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

ههههههه  ههههههه ههههههههه

حبيبى ابو البراء أحببت أن أنوه فقط لاننى وبفضل الله تعالى الوحيد على 

مستوى الموقع اللى كان بينزل برامج كامله المحتوى من حيث الشكل والمضمون

أما عن التوجيهات فأرى وبكل أمانه انها فى محلها ***** عموما جارى إعادة ترتيب 

المره دى " زى ماقلت " لك وافر تقديرى واحترامى *** وجزاكم الله خيرا

تم تعديل أبريل 3, 2016 بواسطه ابو عبدالرحمن بيرم

[أبو عبد الرحمن سعيد]

أخى فى الله ابو البراء

السلام عليكم ورحمته الله وبركاته

برجاء الاطلاع على المرفق التالى

فقط 3 دقائق من وقتك مع ملاحظة التوضيح المشفوع بالمرفق

 تقبل وافر تقديرى واحترامى *** وجزاكم الله خيرا

تجميع وترحيل البيانات بالفلترة +1111.xlsb.rar

[ياسر خليل أبو البراء]

اخي الكريم أبو عبد الرحمن

الموضوع محتاج أكتر من 3 دقايق .. إن شاء الله إذا تيسر لي الوقت سأقوم بمحاولة العمل على الملف المرفق ..لأن الطلب مختلف تماماً عما فهمته في بداية الموضوع

الرجاء الصبر لغدٍ إن شاء الله

تقبل تحياتي

 

[أبو عبد الرحمن سعيد]

اخى الحبيب ابو البراء

السلام عليكم

ليس عندى مشكلة فى عامل الوقت

اعتقد ان الامور اتضحت الان نحو المطلوب

ولى رجاء الا وهو الاطلاع على المرفق التالى حيث يقوم

بجمع وفلترة الاصناف تلقائيا وماهو الا مجرد مثال لتقريب وجهة النظر نحو المطلوب

تقبل وافر تقديرى واحترامى **** وجزاكم الله خيرا

Extract Unique Values From Multiple Sheets YasserKhalil (1).rar

[ياسر خليل أبو البراء]

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

[أبو عبد الرحمن سعيد]

نعم أخى وحبيبى فى الله ابو البراء

ادرك ان الموضوع عكس الملف المرفق

اعانكم الله وجعلكم الله عونا للجميع

وافر تقديرى واحترامى *** وجزاكم الله خيرا

[ياسر خليل أبو البراء]

أخي الحبيب أبو عبد الرحمن ..

أنا بدأت أتوه في الموضوع بصراحة ونظراً لضيق وقتي أستسمحك في إرفاق آخر نسخة من الملف المراد العمل عليها ...

أعتذر إليك ..

تقبل تحياتي

[أبو عبد الرحمن سعيد]

اخى الغالى المحترم ابو البراء

السلام عليكم ورحمته الله وبركاته

بداية جزاكم الله خيرا وبارك فيكم

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

اكيد طبعا حضرتك إطلعت على المرفق الأخير الذى لايختلف عن المرفق التالى

والمعبر تماما للملف الاصلى دون تغييير ***  معلشى ياابو البراء عشمى فى الله وفيكم كبير

لاننى على ثقة تامه بالله ثم بكم ان الموضوع يسير ولكنه سيستغرق بعض الوقت فخذ وقتك

تقبل وافر تقديرى واحترامى **** وجزاكم الله خيرا

تجميع وترحيل البيانات بالفلترة +2016.xlsb.rar

[ياسر خليل أبو البراء]

أخي الحبيب سعيد بيرم

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

تقبل تحياتي