yara ahmed

بارك الله لك

احتاج مساعدتكم اخواتى ضرورى جدا في تقرير مطلوب منى عمله والملف كبير جدااااااااااا خايفة البيانات اعملها يدوى تطلع غلط واتعرض لمشكلة كبيرة لان التقرير بيتم بناء عليه اتخاذ قرارات من صاحب الشركة التقرير يكون بالتاريخ من الى العمود الأول يستدعى اسم الشيتات من اول الشيت رقم6 العمود الثانى يستدعى التاريخ العمود المكتوب فيه 1و2و3و4و5 هي نفس ا الموجودة في الشيتات من العمود e الى العمود i الاستدعاء من الشيتات من الصف رقم5 العمود h بالتقرير به اجمالى ما تم صرفه معادلة جمع الأرقام الاصغر من0 ولونتها باللون الموف هي وخلية الجمع العمود I بالتقرير المعادلة تجمع الأرقام اكبر من صفر العمود j معادلة طرح المحصل -المنصرف الموضوع هام جدااااااااااااا مع الشكر الخالص من قلبى المنصرف YAra.xlsm

سلام عليكم اخواتى الطيبين الممتازين احتاج مساعدة فى التقرير استدعاء للخلايا e4&F4&G4&H4&i4 المحصل - المنصرف خلية A4 اجمالى ما تم صرفهJ2 اجمالى المحصل J4 هذه الخلايا من كل الشيتس اريد استدعائها لعمل تقرير يتم طبعه يوميا مع عدم استدعاء الشيتس منsheet2:sheet4 لوجود تقارير بهم اذا كانت الخلايا من E4:I4=0 لا تستدعى الى التقرير ليس لنا بها حاجة وستأخذ مكان في الصفحة يعيق الطباعة مشكورين يا طيبين المنصرف YAra.xlsm

يسعد وقتك يارب بص انا تعبتك جدا فى الموضوع ده ولو مفيش امل لا تتعب نفسك اختك متعودة على الشغل اليدوى الشغل الاوتو تعلمته بعذ التعرف عليكم بالمنتدى ومساعدتكم الكثيرة لنا لا حرمنا منكم ابدا انا نفذت ما قلته كله وعند الاختيار من القوائم مثلا اسم شيت يتوقف الكود هنا If sh.Cells(x, itm) < 0 Then وعند اختيار ALL توقف الكود هنا If Main.Range("B2") <> "ALL" Then Exit Sub جزيل وخالص الشكر من القلب

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

اشكرك data reeport-تقرير اول المدة-تقرير المدة الثانية-DATA-نقدية اول المدة-نقدية بالخزينة-ارباح وخسائر كل الشكر من القلب

اشكرك بس فى مشكلة الاسماء الشيتات لا استطيع تغير اسماء الشيتس وليس كلها بنفس الاسم مشكلة كبيرة اشكرك بارك الله فيك مستر سليم الجميل جداااااااا

مستر سليم حاصبيا اتقدم بالشكر والامنيات الطيبة لك المعذرة والسماح نقلت الكود بملفى ولدى اسماء الشيتس متغيرة عنsh مثلا لدى شيت اسمه datareporrt وهكذا كل الاسماء مختلفة حوالى 44 شيت توقف الكود فى هذا السطر If sh.Cells(x, itm) < 0 Then عملت stop وتشغيل وقف الكود هنا Sub Extract_negative() Main.Range("B3:B8").ClearContents وعند اختيار ALL توقف الكود هنا For Each itm In a_sh

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

هذا هو ملف به فورم كليندر وعملته لضغط دبل كليك على خانات التاريخ يظهر بس مش بيكتب التاريخ الففففففففففففففف شكرررررررررررررررررررررررررررررر يا باشا takrir_ yara.xlsm

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

لم احذف oll shetts بل اريد عند اختيارها من القائمة المنسدلة ان يستدعى الارقام السالبة والموجبة لكل صفحات العمل يعنى يكون عندى امكانية اختيار صفحة كما هو الان وكل الصفحات لما اختار ollsheets وعندما كنت ابحر فى المنتدى وجدت حاجة محترفة جدااااااااا وهى فورم يدرج التاريخ بمجرد ان اضغط دبل كليك على الخلية نفذت الموجود بالملف وفعلا اضغط دبل كليك على خلية التاريخ يظهر الفورم كليندر بس مش بيدرج التاريخ شغل محترفين الف الف شكر من قلبى ليك وكل الدعوات والامنيات لك بسعادة دائمة takrir_ yara.xlsm

والله انت محصلتش انت رائع كود رائع من شخص رائع ومذهل ومبدع صادفنى مشكلة لما اختارت من القائمة المنسدلة Oll sheets الكود توقف عند هذا السطر Set sh = Sheets(Main.Range("B2") & "") تسلم لى وما اتحرمش منك ابدااااااااااااااااااااااااااااااااااااااااااااااااا دكتور واستاذ ورئيس قسم الاكسيل مشكور يا جميل

سلام عليكم عمالقة الاكسيل بحاجة لمساعدة فى عمل تقرير استدعاء للبيانات الموجبة فى عمود والسالبة فى عمود بالتاريخ وذلك من خلال قائمة منسدلة باسماء شيتس المصنف مع استثناء الشيتس التى لون التاب لها اخضر مشكورين ياطيبين takrir yara23.xlsx

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

فى مشكلة ياباشاhttps://www.officena.net/ib/profile/127744-سليم-حاصبيا/ الكود مش بيجمع الا الاسماء المتشابهة بس باقى الاسماء يتجاهلها ولا يحضر باقى الاسماء التى بالعمود a عارف حضرتك التقرير الى بيحضر الشيت التى بالتاب الاخضر لدى خمسة ملفات استخدم فيها كود التاب الاخضر الرائع الى عملتوهولى فى نهاية اليوم اجمع هذه التقارير الخمسة فى تقرير واحد علشان كده كنت عملت الملف باول مشاركة به المطلوب اتمنى اكون شرحت لك تمام

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

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

مثال للمطلوب تجميع الجداول الى هذا الجدول ليكون رقم واحد لكل اسم موجود فى العمود A وممكن ان يزيد عدد الجداول في الصفحات كل صفحة بها جدول العمود A يحتوى على أسماء المطلوب تجميع الأسماء المتطابقة واستخراج total اما لو الاسم غير متطابق بردو يستدعى الى هنا وتحته المجموع الخاص به حيث ان هذا الجدول هو تجميع للجداول بصفحات المصنف واستخراج جدول واحد به مجموع كل اسم ليكون تقرير جاهز يتم حفظه pdf بعد الطباعة مع شكرى الجزيل New Microsoft Excel Worksheet.xlsx

كود ممتاز

ااشكرك استاذ أحمد يوسف شكرك استاذابراهيم الحداد حضرتك كلك زوق وفعلا الكود يعمل وعند اضافة صفحات يعمل ينقص الكود عند تغير التاريخ يظل ماتم استدعائه سابقا موجود لا يتم استدعاء البيانات فى التاريخ الجديد فقط بل يتم استدعاء كافة البيانات مرة اخرى وكذلك لم يتم استدعاء اسم sheet الى العمود a الاسم الملون بالاخضر ارفقت لحضرتك الملحوظات شاكرة كرمك وزوقك بارك الله فيك استدعاء GreenSheets.xlsm

السلام عليكم ممكن تنفيذ هذا المطلوب باستخدام الماكرو وهو المطلوب استدعاء البيانات من Sheets الملونة بالاخضر اى كان عددها هنا بالتاريخ from to وهذا Sheet DataReport هو النتيجة المتوقع الحصول عليها عند تنفيذ الماكرو thank you so much استدعاء GreenSheets.xlsm