نجوم المشاركات

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

السلام عليكم أولا : نشكر استاذنا الحبيب الاستاذ رجب جاويش على اللفتة الطيبة والجميلة لاستاذنا الحبيب الاستاذ ياسر خليل فهو فعلا شعلة لا تنطفئ بل تزداد نورا كل يوم بل كل ساعة ندخل فيها الى المنتدى فبارك الله لنا فيه واطال فى عمره وزاد من علمه تحياتى لكل اساتذتى الكرام والعظام فى هذا المنتدى الرائع وكل من تعلمت على يديه حرفا وما زلت ازداد تعلما من بحرهم الفياض

الاخ الغالي محمد الخازمي مشكور على مرورك العطر وكلماتك الرقيقة ... الأخ رجب طرح الموضوع وسابني أنا أرد ! ماشي يا أخ رجب .. تترد لك إن شاء الله تقبلوا تحياتي

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

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

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

اخى الحبيب حضرتك عامل فى الملف المرفق بتاعك ان قيمة التكلفه تساوى اخر قيمة تم شراء بضاعه بها وهذا غير صحيح علشان تحسب متوسط تكلفه الصنف مجموع قيم الكميات اول المده+مجموع قيم الكميات من المشتريات - مجموع قيم مردودات المشتريات متوسط تكلفه الصنف = ------------------------------------------------------------------------------------------------------------ مجموع الكميات اول المده+مجموع الكميات من المشتريات - مجموع مردودات المشتريات مثال الصنف أ الكمية سعر الحبه القيمة اول المده 5 10 50 مشتريات 6 11 66 مردود مشتريات 2 10 20 --------------------------------------------------- المجموع 9 96 50 + 66 - 20 96 متوسط التكلفه فى هذه الحاله هى = --------------------- = ------ = 10.66 5 + 6 -2 9 طبعا حضرتك مش عندك اول المدة ولا عندك مردود مشتريات كله بس شراء وبيع حركة الشراء تؤثر على تقيم المحزون أما حركة البيع لا تؤثر على تقيم المخزون اتمنى ان اكونا وضحت الفكرة تقبل تحياتى

لمعرفة رقم الصف لاول خلية غير فارغة في العامود A مثلاً (هذا الامرلا يأخذ بالحسبان الغراغات) المعادلات صفيف (ctrl+shift+enter) =MATCH(1,IF($A$1:$A$500<>0,IF($A$1:$A$500<>"",1)),0) لمعرفة عنوانها =ADDRESS(MATCH(1,IF($A$1:$A$500<>0,IF($A$1:$A$500<>"",1)),0),1) لمعرفة ماذا تحتوي =INDEX($A$1:$A$500,MATCH(1,IF($A$1:$A$500<>0,IF($A$1:$A$500<>"",1)),0)) لمعرفة رقم الصف لاخر خلية غير فارغة في العامود A مثلاً =MAX(($A$1:$A$500<>"")*ROW($A$1:$A$500)) لمعرفة عنوانها =ADDRESS(MAX(($A$1:$A$500<>"")*ROW($A$1:$A$500)),1) لمعرفة ماذا تحتوي =INDEX($A$1:$A$500,MAX(($A$1:$A$500<>"")*ROW($A$1:$A$500)))

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

بالاذن من اخي الحبيب ياسر دعني اجيب على هذا السؤال هذه العملية لا تتطلب اكثر من ثوانٍ معدودة حتى ولو كان عندك 5000 اسم و الكود عبارة عن سطرين او ثلاثة هل توافقني الراي يا ياسر

استاذي الكريم "علاء رسلان" شكرا فانك اسعفتني من حيث ابدعت في حل مشكور عليه وله، مكانه؛ ولك مكانتك .... شكرا انه المطلوب ... جازاك الله خيرا أستاذي الفاضل "YasserKhalil" تعلمنا منذ صغرنا ان لا نغضب من معلمينا لأنهم كالنخيل شامخة وعراجين التمر منها تتدلى منها تتدلى لهذا نجلهم ونبجلهم أما أني لم أحدد فذلك صراحة عن قصد لانه في الحالتين لهما مكانهما وأما حلك أستاذي فانه المطلوب؛ وقد حاولت ولم افلح ولو حاولت دهرا ما وصلت الى ما قدمت أستاذي؛وطبعا لم اقصد الفلترة أو الفرز، شكرا أستاذي، واني ادعوك لو تتكرم وترد على طلبي الذي هو هنا: http://www.officena.net/ib/index.php?showtopic=60770&hl=

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

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

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

أخي الحبيب مختار جزاكم الله خير الجزاء على هذا الملف الرائع إن شاء الله بقول إن شاء الله عشان لسه مشتغلش معايا كويس أنا دلوقتي الحمد لله انتقلت لأوفيس 2013 .. والمكتبة اللي أشرت إليها Microsoft Word 12.0 Object Library اللي عندي 15.0 مفيش مشكلة متفعلة ..! وجيت أنفذ الكود خد وقت طويـــــــل - المهم صبرت - وصبرت - وفي الآخر جالي رسالة بتقول : الهاتف الذي طلبته غير موجود بالخدمه !! Microsoft Excel is waiting for another program to complete an OLE action جربت مرة تانية قلت يمكن الكود زعلان من حاجة عندي وصبرت وصبرت وصبرت ... إنما للصبر حدود أخي مختار على رأي الست وفي الآخر لسه الكود شغااااااااااال .. حاسس إنه بيخترع الذرة وأخيرا جاتلي رسالة بتقولي : مبروك جالك ولد (قلت له كنت عايز بنت ) قالي لا جالك ولد .. الحمد لله تم العمل على خير بس استغرق وقت طويل جداً ..فهل من حل؟ قبل تحياتي

من قدّك يا رمهان ومثل ما نحن العمانيين نقول: صرت فوق النخل جعفر

ا / خالد لا داعى ابدا للاسف و كده الملف تمام و فى انتظار ابداعات اخرى

تفضل أخى الكريم هذا النوذج show Images in a Cell based on a condition.rar

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

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

الأخ الفاضل أبو يوسف المصري بداية أهلاً ومرحباً بك في المنتدى ونورت المنتدى يا مصري مشكور على كلماتك الرقيقة والرائعة ، والله وحده يعلم أني لا أستحقها بارك الله فيك ونفع بك .. وإن شاء الله نرى منك في القريب العاجل .. تقبل تحياتي :fff:

ياسر خليل خلق .. ليبتكر ليبادر ليقدم يد العون ليبتسم و نبتسم معه ليقدم لنا علم ننتفع به خلق لكي لا يقول الناس ذهب الابتكار و المبادره و مد يد العون و العلم النافع من الدنيا . نشكرك بكل لغات الدنيا و الاخر الاخ العزيز ياسر خليل

اخى واستاذنا رجب بالفعل والله فما زدت شيئا ليس فى حق اخانا ياسر نسأل الله ان يديم عليه الصحه والعافيه وان يزيده من فضله وعلمه تقبل تحياتى

السلام عليكم ورحمة _الله_ وبركاته أستأذن الأستاذ رمهان وكل المشاركين في إضافة فكرة لعل فيها مراد أخينا محمد وهي إضافة على الكود الخاص بكم أستاذ رمهان. استخدمت فقط (IF) الشرطية في نفس حل الأستاذ رمهان جزاه الله خيرا. أرجو أن أكون أحسنت الفهم A_SearchHighlight.rar

اخى الحبيب الاستاذ هانى بدر فكرتك صحيحيه بنسبة 100% ولكن دعنى الفت نظركم الى شيى ووجب على ذكره ان طرق تقييم المخزون( FIFO .LIFO .WA) نتائجها واحده فى ظل نظام الجرد الدورى (Periodic Inventory System) ونظام الجرد المستمر (Perpetual Inventory System) فيما عدا طريقة المتوسط المرجح تختلف نتائجها فى النظامين لان المتوسط المرجح يستخدم اذا كنت تعمل بالجرد الدورى فقط واما اذا كنت تعمل بالجرد المستمر فانك لابعد من استعمال المتوسط المتحرك ( متوسط متحرك او جديد ) كما ذكر الاستاذ الفاضل هانى بدر تقبلوا منى تحياتى

هذا الملف يجيبك عن سؤالك بعد اذن اخي ياسر حسب ما فهمت من السؤال ان المطلوب اخر اسم تم تسجيله ( يمكن الا يكون اخر اسم في اللاائحة) ذلك لانك اينما تسجل الاسم سوف يرتب ابجديا الكود الذي قدمته يجيب عن هذا لسؤال حتى و لو تم تسجيل الاسم في مكان فارغ من وسط اللائحة اول خلية واخر خلية salim.rar

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

الأخ الكريم علاء رسلان بارك الله فيك على تقديم المساعدة أخي رشراش علي .. يرجى فيما بعد عند طرح موضوع أن تذكر هل تريد الحل بالأكواد أم بالمعادلات .. عموماً عشان متزعلش إضافة لحل الأخ علاء إليك حل بالمعادلات ..عله ينال رضاكم لاتنسى التوجيهات .. تقبل تحياتي Sort Data Based On Dates By Formulas.rar

السلام عليكم اتفضل اخى الكريم الداله TRUNK لفصل العدد او الجزء الصحيح ( بافتراض ان A2 فيها المبلغ) =TRUNC(A2) فى الخليه C2 طرح المبلغ من ناتج الداله TRUNK حيث الخليه A2 التى تحتوى على المبلغ . والخليه B2 تحتوى على المبلغ بدون الكسور =A2-B2 تحياتى 55.rar

اخي الفاضل ياسر خليل المحترم بارك الله بكم وزاد علمكم وانار دربكم . معاذ الله اني اعترض على اقتراحك او تعديلك !!! فانا مجرد تلميذ بالنسبة لكم بالنسبة للكود المرفق بالبرنامج ... قد اكون غيرته بشكل غير مقصود قبل ارساله لكم فهو كان يعمل سابقاً وبالنسبة لي فانا لا اقوم بكتابة الاكواد يدويا ... اي انني اقوم بنسخ الكود الذي يؤدي الغرض واعمل بعض التعديلات عليه بما يناسبني . اما بالنسبة للكود ( المختصر ) الذي ارسلته لي في المشاركة فانه يعمل بكفاءة ... سلَّم الله يديك .

السلام عليكم انا استعمل اوفس 2013 بالتوفيق

السلام عليكم البرنامج يعمل عندي وجربت النسخة المضغوطه ووجدتها تعمل تفحص نسخة الاوفس عندك شاهد الفديو http://up.top4top.net/downloadf-top4top_cf169978681-zip.html

اخى صلاح حل جميل وموفق ولكن فى حالة اختيار قيمتين او ثلاثه تاتى بالقيمه الاولى فقط

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

اخى الكريم تفضل المرفق هل هو طلبك تقبل تحياتى Book2.zip

السلام عليكم ورحمة الله وبركاته أولا اعتذر بشدة عن التاخر في المشاركة والمداخلة ! ثانيا : وجب علي ان البي دعوة وجهت لي بل اعتبرها ثقة يجب علي تقديرها ! ممكن مداخلتي حتعمل رفرش لما سبق او قليلا من الهدم وإعادة بناء ! خلونا ننظر للموضوع على انه مشروع ونظام ! مشروع : ماهي أهدافه الاستراتيجية والتشغيلية وجدوى عمله او الغائه!! نظام : وضع مراحل النظام وهي معروفة في شكلها الأساسي : التحليل والتصميم ويشمل تحليل متطلبات العمل وتحليل النظام وتصميمه من ناحية قاعدة البيانات والكائنات وواجهة المستخدم - التطوير والبرمجة - الاختبار والتركيب ! نحن نعرف ان احد أساليب تحليل متطلبات النظام هي الأسئلة والاجابة طبعا وهناك جمع التقارير او الاطلاع على النظم الحالية ! هنا ساطرح سؤالا يخص المشروع والاهداف الاستراتيجية : هل سيتم استخدام النظام استخدام فعلي !! مع مواجهة كل التحديات ؟ اقصد التحديات : - وجود بيئة تقنية في العمل من حواسيب وغيره - تملك الصلاحية بفرض استخدامه من قبل الاخرين لان الموضوع هو اتمتت عمليات فليس من المعقول انت على برنامج والاخرين او زملاؤك على ورق ! - لن يوجد تعارض مع إدارة الحاسب لديك برفض تركيب النظام - عدم تكامل النظام مع النظام الحالي فالطبيب قد يصعب عليه استخدام نظامين في نفس الوقت وخاصة لو حصل تكرار في عمله على النظامين المهم اريد جوابا صادقا منكما للانتقال للخطوة التالية : هل سيتم استخدامه فعليا ولديكم القدرة على تجاوز أي تحدي ؟ لا اريد هدفا للتعلم فقط لان وقتنا ثمين ولا اريد ان نتعاون وفي الأخير يكون نظاما في الادراج ! هنا وقتكم ووقتي يجب استثماره في شي اخر ! بالتوفيق ونحن معكم وبالله نستعين !!

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

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

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

جزاك _الله_ خيراً

جزاك _الله_ خيراً أستاذ سعيد وحياك ربي

أخي سليم أيوا .. بس الفترات ما بين الثلاثة ورقات عمل 10 - 15 - 20 على أوراق العمل ورقة العمل 3 - 4 - 5 وبيتكرر مرة تانية !! يعني عدد مرات التكرار مرتين .. والفترات ثابتة ..

جزاك _الله_ خيرا أستاذ أبو الآء وما هي صفات طالب العلم؟

الاخ / سنفور تفضل ما طلبت و لكن هناك ملاحظتين : 1 - فى حالة اختيار الكل سوف يظهر كلمة الكل و يمكن تغييرها فى المعادلة 2 - اما فى حالة اختيار اكثر من قيمة سوف يعطيك قيمة خطأ و يا ريت لو حد من اساتذتنا يعرف يحلنا المعضلة دى بحيث فى حالة اختيار اكثر من قيمة فى الفلتر تظهر القيمتين او اكثر فهل يمكن ذلك اظهار قيمة الفلتر.rar

الأخ الحبيب محبوب تعبت والله ..بقالي ساعتين عشان أعمل الكود الملعبك ده بس الحمد لله بفضل الله تم المطلوب .. افتح ملف "الأقساط الشهرية 2015" ستجد الكود بداخله .. في ورقة الفهرس يوجد زر امر انقر عليه لتنفيذ الكود .. Sub YasserKhalil() Dim WBK As Workbook Dim SH As Worksheet, WS As Worksheet, Cell As Range Application.ScreenUpdating = False Application.DisplayAlerts = False Set WBK = Workbooks.Open(ThisWorkbook.Path & "\حسابات العملاء 1.xlsx") For Each SH In ThisWorkbook.Sheets If SH.Name <> "الفهرس" Then SH.Range("C6:F99,H6:I99").ClearContents For Each WS In WBK.Sheets If WS.Name <> "الفهرس الرئيسى" Then With WS If IsEmpty(.Range("A6")) Then GoTo 1 For Each Cell In .Range("A6:A" & .Cells(Rows.Count, 1).End(xlUp).Row) If Month(Cell.Value) = MonthNumber(SH.Name) Then SH.Range("H" & SH.Cells(99, 8).End(xlUp).Row + 1) = Cell.Value SH.Range("C" & SH.Cells(99, 3).End(xlUp).Row + 1) = .Range("C2").Value SH.Range("E" & SH.Cells(99, 5).End(xlUp).Row + 1) = Cell.Offset(, 2) SH.Range("F" & SH.Cells(99, 6).End(xlUp).Row + 1) = Cell.Offset(, 3) SH.Range("I" & SH.Cells(99, 9).End(xlUp).Row + 1) = .Range("M8").Value End If Next Cell 1 End With End If Next WS End If Next SH WBK.Close SaveChanges:=False Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub Function MonthNumber(MonthName As Variant) As Variant Select Case MonthName Case "": MonthNumber = "" Case "يناير": MonthNumber = 1 Case "فبراير": MonthNumber = 2 Case "مارس": MonthNumber = 3 Case "ابريل": MonthNumber = 4 Case "مايو": MonthNumber = 5 Case "يونيو": MonthNumber = 6 Case "يوليو": MonthNumber = 7 Case "اغسطس": MonthNumber = 8 Case "سبتمبر": MonthNumber = 9 Case "اكتوبر": MonthNumber = 10 Case "نوفمبر": MonthNumber = 11 Case "ديسمبر": MonthNumber = 12 End Select End Function تقبل تحياتي ولا تنسى أن تحدد المشاركة إذا أعجتك الإجابة كأفضل إجابة (ساعتين مني قصاد ثانيتين منك .. أظن كدا عدل والحمد لله) Three Loops In Two Excel Files By YasserKhalil.rar

شكرا استاذى الحبيب

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

السلام عليكم إخواني وأحبائي وجدت علي موقع أجنبي قائمة للمبتدئين في تعليمات وبرمجيات الفيجوال بيزيك للاكسل القائمة علي شكل فهرس ولم أفعل غير تنسيقها فقط بالإكسل تفضلوا القائمة بصيغتي 2003 ، 2007 عسي الله أن ينفع بهما Excel VBA Index.rar

الاخوة الافاضل يوجد خطأ بسيط فى معادلة ترحيل اسم المنددوب فى هذة المعالة C هتكون B ثم سحبها لأسفل وذلك بالمرفقين المعادلة الخطأ =IF(C7="","",INDEX(INDIRECT($D$3&"!i4:i1004"),MATCH(C7,INDIRECT($D$3&"!B4:B1004")),0)) المعادلة الصحيحة =IF(C7="","",INDEX(INDIRECT($D$3&"!i4:i1004"),MATCH(B7,INDIRECT($D$3&"!B4:B1004")),0))

السلام عليكم مرحبا بك ياباشمهندس انا أيضا مهندس مدنى أنا حليت لك حل بسيط بدون أكواد أولا نقلت كل البيانات اللي في الورقة الأولي للثانية ثم بإستخدام عمود مساعد به فلتر يتكون فيه أوتومايتك حالة الطباعة الحالة OK تعني أن هذا البيان قد غيره العميل غيره وبالتالي يتم طباعته والحالة Hide تعني أنه لم يتغير يعني صفر يعني لاداعي لطباعته كل ماعليك قبل الطباعة أن تضغط علي السهم في العمود المساعد وتختار حالة OK وكذلك في الورقة الأولي راجع المرفق وأخبرني النتيجة III-05-2.rar