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

لدالة البحث VLOOKUP إمكانيات مذهلة لا يعلمها الكثير بالتاكيد تم استعراض الكثير من هذه الامكانيات على منتدى اوفيسنا إن لم يكن كلها ولكن كانت فى الاغلب رداً على اسئلة زملاء فلم ينتبة اليها الكثير لهذا سنستعرض معاً إمكانيات هذه الدالة على شكل - امثلة مع الشرح فكرة 1 / فكرة 2 / فكرة 3 / وبما اننا استخدمنا الدالة MATCH فلنتذكرها معاً فى المرفق ستجدوا التطبيقات وستتوالى باقى امكانيات هذه الدالة تباعاً ان شاء الله VLOOKUP _ 1.rar

أخي الكريم أبو يوسف النجار حسب ما فهمت من طلبك يمكنك ببساطة استخدام المعادلة التالية في الخلية A6 =SUBTOTAL(103, $B$6:B6) قمت بتغيير تنسيق الخلية من نص إلى عام General كما قمت بتفعيل العمليات الحسابية لتكون Automatic يمكنك الآن القيام بالفلترة وسيتم التعامل مع البيانات المفلترة بالتسلسل الصحيح .. أي أن الغرض من المعادلة الحفاظ على عملية التسلسل حتى مع وجود تصفية أرجو أن يكون المطلوب تصفية.rar

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

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

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

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

جزاكم الله خيرا

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

أخي الغالي الحل بدائي , و لكنه حل المشكلة سأرفقه ربما يفيدك

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

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

معذرة أستاذنا تم الحل والخطأ من عندي أنا أجعله يدوي حتى لا ( يهنج ) الملف ولا يستجيب لأنه كبير بعض الشىء كل عام وأنتم بخير

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

أخي الترتيب في التسلسل في الملف المرفق من قبلك صحيح بالنسبة لي قم بالدخول على التبويب Formulas ثم Calcualtion Options واختر Automatic ستجد الترتيب في التسلسل صحيح إن شاء الله

أ / جمال عودا حميدا بأعمالك الرائعة وكل سنة وحضرتك طيب

أخي الحبيب خالد الرشيدي إبداع بلا حدود .. بارك الله فيك وجزيت خيراً على الشرح الوافي والرائع والمتميز

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

جزانا الله واياكم خير يااستاذ علاء كل عام وانتم بخير رمضان كريم

وكل عام وانتم بخير اخي حلبي وجميع اخواننا المسلمين تفضل TreeView0.Font.Italic = True TreeView0.Font.Bold = True ويمكن تغيير الكود السابق ولنوع الخط الى TreeView0.Font.Name = "Calibri" حيث ان اسم الخط هي الخاصية الافتراضية فتم اختصارها سابقا بالتوفيق

شرح اكثر من رائع جزاك الله خيرا

جزاك الله كل خير -شرح رائع من عضو واعد ورائع أثابك الله خير الجزاء

الاخوه الكرام / أ .ياسر فتحى / أ. علاءرسلان كل عام وانتم بخير - شكراً على هذه الكلمات الرائعة جزاكم الله خيراً

أخى وأستاذى العزيز ياسر خليل شكرا لك ونحن نتعلم منك وسنظل بإذن الله أخى العزيز ياسر فتحى شكرا لك توقيعك روعة روعة

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

أخى الحبيب الغالى / ياسر خليل أخى الفاضل / مختار جزاكم الله خيرا ورمضان كريم

تم التعديل حسب الرغبة عرض العامود From net.rar

بسم الله ما شاء الله الصيام عامل معاك أحلى شغل .. تسلم وتعيش يا مستر مختار

السلام عليكم ورحمة الله وبركاته كل سنة وحضراتكم بخير بمناسبة الشهر الفضيل أستأذن أستاذى الفاضل العزيز ياسر خليل فى هذه الاضافة اثراء للموضوع يمكن عمل كود واحد وزر واحد يعمل على اخقاء واظهار الصورة : Sub showhidepic() With ActiveSheet.Shapes("Rounded Rectangle 2").TextFrame2.TextRange.Characters If .Text = "Hide" Then .Text = "Show" ActiveSheet.Shapes("صورة 1").Visible = False Else .Text = "Hide" ActiveSheet.Shapes("صورة 1").Visible = True End If End With End Sub أخى وأستاذنا الفاضل ياسر خليل أقول لك نورت المنتدى تقبلوا جميعا تحياتى Hide Show Picture 2 .rar

تفضل أخي الكريم هذا نفس جدول الأخ علاء رسلان ولكن بطريقة أخرى (معادلة عادية ليست معادلة صفيف) وأعتقد أنها بالمرونة لعمل ما طلبته في جدول الضرب2.rar

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

اخى الحبيب بمنتهى البساطه الخلايا كانت مخفيه قم بالوقوف راس العمود سيظهر لك شكل اسهم يمين ويسار اسحب يمين ثم اضغط كليك يمين ثم اظهار تحياتى

التطبيق بالمرفقات Excel - INDIRECT.rar

نستكمل ما قد بدأناه فكرة 4 / التطبيق بالمرفقات VLLOKUP&INDIRECT.rar

السلام عليكم أستاذى إبراهيم ابو ليله شرف لى مرور حضرتك على الموضوع كل عام وانت بخير - جزاك الله خيراً

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

السلام عليكم / أ. محمد الريفى / أ.سليم حاصبيا تقبلوا خالص تحياتى اما عن شرح المعادلة فى البداية ها هو تفنيط المعادلة وسأبدا بشرح Value_if_False Logic_Test, Value_if_True والان اليك المرفق ستجد فية تطبيق لفكرة ان يكون جدول البحث فى ورقة عمل اخرى vllokup.rar

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

الأخ الكريم ابو حنين مشكور على التوضيح التام للمطلوب .. هكذا يكون التوضيح إليك الملف التالي (تم الاستعانة بعمود مساعد لجمع الشروط) العمود المساعد هو العمود H إليك الكود مع شرح الأسطر لتتمكن من التعديل عليه Sub MultipleCriteriaFilter() 'يقوم الكود بفلترة البيانات طبقاً لعدة شروط '[H5] لتسهيل العمل تم عمل معادلة في العمود الثامن '=IF(AND(E5>$D$1-1,E5<$D$2+1),C5&F5,"") 'المعادلة تتحقق من وقوع التاريخ بين تاريخي الشرط ، فإذا تحقق 'ليشمل الشروط الأخرى [F5] و [C5] يتم ربط النصوص في الخلايا '------------------------------------------------------------ 'تعيين المتغيرات Dim WS As Worksheet Set WS = Sheets("General") 'إلغاء خاصية اهتزاز الشاشة Application.ScreenUpdating = False 'بدء التعامل مع ورقة العمل With WS 'إزالة الفلترة إذا ما كانت موجودة مسبقاً .AutoFilterMode = False 'الفلترة بناءً على العمود الثامن أي العمود المساعد .Range("A4:H4").AutoFilter field:=8, Criteria1:=Range("H3").Value End With 'إعادة تفعيل خاصية اهتزاز الشاشة Application.ScreenUpdating = True End Sub ** لا تنسى أن تحدد أفضل إجابة من خلال الضغط على كلمة "تحديد كأفضل إجابة " ؛ ليظهر الموضوع مجاب ومنتهي. ** لا تنسى أن تضغط كلمة "أعجبني" (الأمر لن يستغرق منك ثواني) ---> (أمضيت من وقتي وقتاً ليس بالقليل .. فاضغط ولا تكن بخيل) تقبل تحياتي Filter Data By Multiple Criteria YK.rar

رفعت الراية البيضاء ألا تقرأ المشاركات أخي ياسر ؟؟؟؟؟!!

اخى الفاضل .... المشاركة رقم 6 ... تم تعديل اللجان الى 15 كما طلبت .... برجاء تحميله ومراجعته مره اخرى تحياتى

أستاذ أزهر ما رأيك في التعديل التالي ( تم تعديل الجز الخاص بعرض السجلات التي تبدأ بحرف بواسطة : علي المصري ) في المرفقات فرز التقرير.rar

وجدتهما في مكتبتي PSchool.rar School.rar

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

اخي جمال لو اني افضل استخدام الدالة في هذه المسالة بالذات حسب طلبك ارفق لك الملف فيه حساب السن بالكود ملاحظة لن يعمل الكود حتى يتم كتابة السنة اذا تم تغير تاريخ 01/10/2011 فستكون مضطر الى المرور على جميع خلايا (السنة) لتحديث التاريخ لان الكود يعمل لكل خليه وليس لجميع الخلايا (لان الاكسل يعلق اذا ترك لكل الخلايا) ولذا انا انصحك باستخدام الدوال في افضل كود السن.rar