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

من هنا Microsoft Virtual Academy دورات مجانية What is MVA? Successful technologists never stop learning and great technology never stops evolving. Microsoft Virtual Academy (MVA) offers online Microsoft training delivered by experts to help technologists continually learn, with hundreds of courses, in 11 different languages. Our mission is to help developers, knowledgeable IT professionals and advanced students learn the latest technology, build their skills, and advance their careers. MVA is free of charge, and the entire service is hosted on Windows Azure. Microsoft Virtual Academy تم ترقية هذه المشاركة الى مقالة

أليك أخى ماطلبت فصل أسم على عدد من الأعمدة.rar

السلام عليكم الاخ الكريم / 838383mohamed بارك الله فيك هل جربت الكود علي المرفق المرفق مني ام قمت بنسخ الكود وتنفيذه علي ملف آخر تقبل خالص تحياتي

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

السلام عليكم الاخ الكريم / 838383mohamed بارك الله فيك بعد اذن استاذي القدير / احمد زمان ... جزاه الله خيرا جرب الكود التالي لتنفيذ المطلوب ( ان شاء الله ) ** ولكن يجب ملاحظة ان يكون تنسيق التاريخ في كل اعمدة التواريخ في كل الشيتات بتنسيق واحد للجميع Sub sama() Dim LastR, LastR1, LastR2, LastR3 As Long Dim StDate, xx As Date Application.ScreenUpdating = False '**************************************************** LastR = Sheet1.Cells(Rows.Count, 2).End(xlUp).Select xx = ActiveCell.Value [c1].Value = xx SText = Sheet1.Range("c1") '==== شيت توصيلات LastR1 = Sheet2.Cells(Rows.Count, 2).End(xlUp).Row Sheet2.Range("b3:q" & LastR1).AutoFilter Field:=2, Criteria1:=SText '==== شيت خطوط LastR2 = Sheet4.Cells(Rows.Count, 2).End(xlUp).Row Sheet4.Range("b3:q" & LastR2).AutoFilter Field:=2, Criteria1:=SText '==== شيت خطوط مياه LastR3 = Sheet10.Cells(Rows.Count, 2).End(xlUp).Row Sheet10.Range("b3:q" & LastR3).AutoFilter Field:=2, Criteria1:=SText '**************************************************** Application.ScreenUpdating = True End Sub تقبلوا خالص تحياتي اوفسنا.rar

ألي أخى ماطلبت Book10.rar

إستخدم دالة ( int ) أخى =INT(5.4) ستعطيك ماتريد لأنها تعطى الرقم الصحيح

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

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

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

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

السلام عليكم الاستاذ الكبير العبقري / عبدالله المجرب شهادة كبيرة جدا علي من استاذ قدير مثلك وبارك الله فيك استاذي القدير وما كان ذلك الا بكم انتم وبخبراتكم وعلمكم الذي لا تبخلون به علينا استاذي القدير جزاك الله خيرا ... وجعلكم منارة لنا دائما وملجأ في اي وقت

السلام عليكم الاستاذ الفاضل القدير / رجب جاويش اجمل ما في الفكرة ان استاذ مثلك اعجب بها شكرا لك استاذي علي تشجعيك لي جزاك الله خيرا

السلام عليكم الاستاذ / مجدى يونس الف الف شكر لمرورك وشكرا للتعديل فهذه عادتكم لافادة الآخرين دائما واعطاك الله ثواب مجهوداتك استاذي جزاك الله خيرا

السلام عليكم الاخ الحبيب / مودى محمد جزاك الله خيرا ...وهل ظهر لك السؤال بعد التعديل الذي تم م قبل الاستاذ الحبيب / مجدي يونس ام لا وعسي الله ان ينفع بها جزاك الله خيرا

الشكل النهائي ( لبرنامج قوائم الفصول) قوائم الفصول.rar

فى هذا الأصدار تستطيع من خلالة عمل الأتى: 1- قوائم الفصول عن طريق رقم الفصل 2 - كشوف المناداة عن طريق تحديد عدد كل لجنة مع إظهار كافة الأحصاءات المطلوبة للجنة 3- كشف بمواد رسوب كل طالب فى كل مادة وتستطيع طباعتة مع كل لجنة الموجود بها الطلبة الراسبيين والعديد من المزايا التى تستطيع إكتشافها مع إستخدامك للبرنامج 4- لتحديد الراسب فى كشف الراسب يكفى أن تفعل الخلية التى بها المادة التى رسب فيها ( الطالب أو الطالبة ) والموجودة أمام إسمة أو إسمها وتضغط على الزراز المكتوب عليه ( NO ) ليقوم بكتابة كلمة ( NO ) أمام أسمة أو إسمها 5- ولحذف مادة الرسوب من أمام الطالب فعل الخلية المكتوب فيها كلمة ( NO ) ثم قم بالضغط غلى الزر المكتوب عليه مسح ( NO ) ليتم خذفها وهكذا .......الخ قوائم الفصول وكشوف المناداة + كشوف الدور الثانى.rar

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

الكل يعتقد أن المعادلة يمكن أن تكون أقل من الكود فى الإمكانيات ولكن لى وجهة نظر محتلفة وهذا هو الدليل من عجائب المعادلات.rar

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

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

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

جرب هذا الكود Sub PDF_ALL() MyName = "D:\MR_" & Format(Date, "dd-mm-yyyy") & ".pdf" Range("C45").Select Sheets(Array("A", "B", "C", "D")).Select Sheets("A").Activate MyMsg = MsgBox("هل انت متاكد من اتمام عمليه الحفظ", 4, "تنبيه") If MyMsg = 6 Then ChDir "D:" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ MyName, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ True MsgBox "تم الحفظ" Else MsgBox "لم يتم الحفظ" End If End Sub

بارك الله فيك تقبل خالص تحياتي

السلام عليكم اذا كنت تريد تفعيل المسطرة فكل ماعليك هو ترك فراغ بين الحرف الأول المطة مثال If ChrW(KeyAscii) Like "[!A -Z]" Then KeyAscii = 0 مثال اخر هذا الكود لايقبل الا الحروف الانجليزة الكبيرة والمسافة وهته الاشارات =:;/. If ChrW(KeyAscii) Like "[!A .-Z]" Then KeyAscii = 0 ارجو ان تكون قد وصلت الفكرة تحياتي

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

السلام عليكم و رحمة الله وبركاته بعد اذن اخي الكريم حمادة عمر جزاه الله خيرا على الكود الجميل الذي ارفقه ========================= اخي محمد لاحظ : - ان الكود يأخذ التاريخ من قيمة الخلية الحالية اذا يجب عند تنفيذ الكود ان يكون المؤشر على خلية بها تاريخ يعني خلية من العمود B - و كما ذكر الأستاذ حمادة {** ولكن يجب ملاحظة ان يكون تنسيق التاريخ في كل اعمدة التواريخ في كل الشيتات بتنسيق واحد للجميع} تحياتي وتقديري

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

السلام عليكم الاستاذ القدير / عباد بارك الله فيك سعدت جدا بمرورك ... وكلماتك اسعدتني كثيرا ومن الاكيد انه منكم دائما نتعلم تقبل خالص تحياتي جزاك الله خيرا

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

السلام عليكم الاستاذ الفاضل العميد / دغيدى النظام لدي 32Bit ويعمل بشكل جيد جدا وسوف اقوم بتجربته علي جهاز 64 او يخبرنا احد الاعضاء ممن لديه نظام 64 جزاك الله خيرا

الاخت الفاضلة / سما محمد جزاكي الله خيرا

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

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

السلام عليكم الاخ الكريم / alsawy_hassan بارك الله فيك جزاك الله خيرا

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

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

السلام عليكم اخواني الكرام ابدأ بنفسي في تقديم الشكر للكبير / Jaafar Tribak وجعله الله في ميزان حسناته فالموضوع له والفضل بعد الله له والشكر واجب له جزاك الله خيرا

أخى ( إبراهيم ) فعلا كما قلت أنت وأخى ( أحمد ) ناتج المعادلة يعطى صفر وقد جربتها بمعادلة الصفيف التالية ( =SUM(IF($L$8:$L$3697=$D$6;IF($D$35:$D$3697=$G$35:$G$3697;$G$3701))) وفعلا أعطت صفر حاول تراجع القيم والشروط وربنا الموفق

بعد كود أستاذى ومعلمى ( رجب جاويش ) إليك الحل بالمعادلات ترحيل فى اماكن محدده.rar ترحيل فى اماكن محدده 2.rar

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

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

هل هذا التنسيق للخلية يكفي للتنبية إنظر عزيزي إلي المرفق فرق بين تاريخيين 2.rar

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

هل هذه المعادلة ماتقصدها أستاذي التأكد من تواجد الأسماء_2.rar

تفضل : وكما ذكر مشرفنا العزيز التقارير ليست كالنماذج في الخصائص 2.rar

كتاب جميل و شامل هذا رابط تحميل مباشر للكتاب هنـــــــــــــا

بالنسبة لطلب الاخ الكريم هذا البرنامج ان مجربو ونقريبا يعمل 95% من هنا

السلام عليكم شكرا اخى برقش على المتابعة :) ----- وقد ارفقت لك برنامج Pdf Factory وهو برنامج بسيط جدا .. تقوم بتثبيته .. ثم تجده فى قائمة الطابعات المعرفة أى انك تقوم بفتح أمر "طباعة" وتختار البرنامج وتقوم بالحفظ PDF pdf_print.rar السيريال 2ZZY-EU38-PHBR

أنصحك ببرنامج PDFCreator المجاني: http://sourceforge.net/project/showfiles.php?group_id=57796