اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

  1. حمادة عمر

    حمادة عمر

    المشرفين السابقين


    • نقاط

      50

    • Posts

      6205


  2. جمال عبد السميع

    جمال عبد السميع

    المشرفين السابقين


    • نقاط

      22

    • Posts

      3724


  3. قنديل الصياد

    قنديل الصياد

    06 عضو ماسي


    • نقاط

      2

    • Posts

      2661


  4. محمد طاهر عرفه

    محمد طاهر عرفه

    إدارة الموقع


    • نقاط

      2

    • Posts

      8741


Popular Content

Showing content with the highest reputation on 12/29/13 in all areas

  1. من هنا 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 تم ترقية هذه المشاركة الى مقالة
    2 points
  2. أليك أخى ماطلبت فصل أسم على عدد من الأعمدة.rar
    2 points
  3. السلام عليكم الاخ الكريم / 838383mohamed بارك الله فيك هل جربت الكود علي المرفق المرفق مني ام قمت بنسخ الكود وتنفيذه علي ملف آخر تقبل خالص تحياتي
    2 points
  4. السلام عليكم الاستاذ القدير / احمدزمان بارك الله فيك يزيدني شرفا ان الكود قد اعجبك تقبل خالص تحياتي
    2 points
  5. السلام عليكم الاخ الكريم / 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
    2 points
  6. إستخدم دالة ( int ) أخى =INT(5.4) ستعطيك ماتريد لأنها تعطى الرقم الصحيح
    2 points
  7. السلام عليكم الاستاذ القدير العلامة الخبير / عبدالله باقشير لك مني اغلي وافضل تحية وشكر وعرفان بالجميل فأنت استاذ الجميع بلا استثناء انت كبير جدا عندي ... وفقك الله لما تحبه وترضاه ... والله اني احبك في الله كنت انتظر ردك بفارغ الصبر لعلمي بأنك اطلعت علي الموضوع امس !!! وظننت انه لم يعجبك ولكن الآن سعادتي كبيرة بشهاتكم لي ويارب ان اكون عند حسن ظن حضرتك .... فلك افضال كثيرة علي وعلي سائر اعضاء المنتدي جعله الله في ميزان حسناتك استاذنا جزاك الله خيرا
    2 points
  8. السلام عليكم الاستاذ الكبير / دغيدى ها هو عقد الخبراء يتوالي حول موضوعي البسيط بالنسبة للكبار امثالكم واعلم استاذي الكبير انها مشاركة وموضوع يعلم الله انه الغرض الاساسي منه شكركم انتم الخبراء علي ما تقدمونه لي وللمنتدي ولاعضاءه لوجه الله فكم انت كبير استاذ / دغيدي وشرف لنا ان تكون من بلدنا الحبيبة ( مصر ) فأنت فخر لاي شخص ومروركم في الموضوع شهادة مهمة لي ... واشكرك علي كل ما تعلمته منكم وما سأتعلمه باذن الله جزاك الله خيرا
    2 points
  9. السلام عليكم الاستاذ القدير الحبيب / أبو حنين الاستاذ الحبيب التميز الموجود بالعمل لم يأتي الا بك وبخبراتك فأنت أحد الخبراء الذي شكل هذا العمل علي وجه التحديد ومعظم ملفاتي عامة وانت واحد من الخبراء الذي كنت انتظر رؤيته ورأيه في هذا العمل حيث انه يهمني جداً فلقد تعلمت منك استاذي الحبيب كثيرا وانت لا تبخل علي اي شخص بعلمك زادك الله من علمه ... ووفقك الله لما تحبه وترضاه ومرور حضرتك استاذي شرف لي جزاك الله خيرا
    2 points
  10. السلام عليكم الاستاذ القدير الكبير / عباد ( أبو نصار ) اتمني من الله ان يصلك احساسي بعد مشاركتك فوالله ملكتني سعادة لا تتخيلها فشهادة استاذ عبقري مثلك ... لدي شئ كبير جدا جدا واعلم استاذي القدير ان لك عندي دين ولا اعرف كيف ارده وذلك بالتعلم كل يوم منكم شيئاً جديداً فكم انت رائع وعبقري استاذي ومرورك في موضوع لي شرف لي جزاك الله خيرا ... وجعل كل اعمالك في ميزان حسناتك يوم القيامة جعل الله كلامي بعيداً عن النفاق والرياء
    2 points
  11. السلام عليكم الاستاذ الكبير العبقري / عبدالله المجرب شهادة كبيرة جدا علي من استاذ قدير مثلك وبارك الله فيك استاذي القدير وما كان ذلك الا بكم انتم وبخبراتكم وعلمكم الذي لا تبخلون به علينا استاذي القدير جزاك الله خيرا ... وجعلكم منارة لنا دائما وملجأ في اي وقت
    2 points
  12. السلام عليكم الاستاذ الفاضل القدير / رجب جاويش اجمل ما في الفكرة ان استاذ مثلك اعجب بها شكرا لك استاذي علي تشجعيك لي جزاك الله خيرا
    2 points
  13. السلام عليكم الاستاذ / مجدى يونس الف الف شكر لمرورك وشكرا للتعديل فهذه عادتكم لافادة الآخرين دائما واعطاك الله ثواب مجهوداتك استاذي جزاك الله خيرا
    2 points
  14. السلام عليكم الاخ الحبيب / مودى محمد جزاك الله خيرا ...وهل ظهر لك السؤال بعد التعديل الذي تم م قبل الاستاذ الحبيب / مجدي يونس ام لا وعسي الله ان ينفع بها جزاك الله خيرا
    2 points
  15. الشكل النهائي ( لبرنامج قوائم الفصول) قوائم الفصول.rar
    2 points
  16. هدية العام الهجري الجديد ******************************************* كود اضافة ازرار باسماء الشيتات في الصفحة الرئيسية وزر للرئيسية في كل شيت **************************************************************************** السلام عليكم هذا الموضوع مقدم هدية لاساتذة وقادة هذا الصرح العملاق وهو هدية خاصة ( بسيطة جدا جدا ) بمناسبة العام الهجري الجديد للاستاذ القدير العلامة الخبير عبد الله باقشير لأقدم له عرفانا بالجميل لبعض ما تعلمناه منه ونتعلمه دائما بارك الله فيه ... وجزاه الله عنا خيرا وارجو ان ينال الملف اعجابكم تقبلوا خالص تحياتي وكل عام وانتم بخير وسلام وعلي طاعة الله دائما اضافة ازرار باسماء الشيتات وزر للرئيسية في كل شيت.rar
    1 point
  17. عند تصفحي اليوم في منتدانا الرائع أوفيسنا لفت نظرى رغبة العديد من الزملاء في عمل ( قوائم الفصول ) فقررت أن أحاول المساعدة رغم روائع زملائي في هذا الصرح بهذه النوعية من البرامج إلا أننى حاولت ولي جزاء المحاولة فإن أخطأت فدون قصد وإن أصبت فالفضل لله ثم لأساتذه هذا الصرح لذلك جعلته هدية منى لزملائى وأساتذتي لعل يكون فيه الفائدة المرفق الثاني: تعديل لفصل( المنقول) عن ( المستجد ) في الأحصاءات للفرق بينهم المرفق الثالث عمل بعض التنسيقات الشرطية لتوضيح ( المسيحي ) والمسيحية) قوائم الفصول.rar قوائم الفصول.rar قوائم الفصول.rar
    1 point
  18. استمارة (1) سري لمدارس التعليم الابتدائي استمارة 1 سرى.rar
    1 point
  19. قائمة منسدلة متعددة الألوان - اختار لون الخلفية و الحروف لكل عنصر في القائمة هو موضوع وجدته في منتدي صديق ( منتدي القدير / يحيي حسين ) للعلامة القدير / Jaafar Tribak المغربي واردت ان اضعه بين ايديكم كما هو وكما هو وضعه بالضبط وبالطبع استئذنه في ذلك ولعلمي انه شديد الحرص علي اعطاء كل معلومه لديه للآخرين فلم اتردد لحظة في نقل الموضوع الي منتدانا العملاق ليستفيد منه الجميع وسأضع الموضوع كما وضعه هو حرفيا جعله الله في ميزان حسناته ==================================================== المــــــــــــــــــوضـــــــــــــــوع ( كما هو ) ==================================================== طلب نجده كثيرا عند مستخدمي الاكسل لكن لا يوجد حل - الحمد لله هذا ما توصلت اليه مؤخرا فأرجو أن يكون مفيدا. من أراد استفسارا لكيفية عمل الكود أو وجد أي مشكلة في تشغيله فأنا ان شاء الله أكون رهن الاشارة Multicolor_Combobox.rar
    1 point
  20. ( لعبة مسابقات اوفيسنا ) علي الاكسيل - لعبة بسيطة من تصميمي .. تصلح لالعاب المسابقات هذا العمل عمل بسيط جدا جدا ولكني وجدتها فرصة كبيرة لاتقدم بشكري وعرفاني للاساتذة الكبار بالجميل فعذرا علي الاطالة عليكم بداية او ان اشكر كل خبراء واساتذة واعضاء ورواد هذا الصرح الكبير لما قدمه لي من علم ومساعدة ولجميع اعضاء هذا الصرح الكبير شكر خاص للاستاذ الحبيب / ابو حنين --- له فضل كبير في هذا العمل المتواضع شكر خاص للاستاذ القدير / طارق محمود --- له فضل ايضا هنا والشكر موصول لكل الخبراء امثال ( العلامة / عبد الله باقشير - الاستاذ / عباد - الاستاذ الغالي / احمد فضيله الاستاذ / عبد الله المجرب - الاستاذ / رجب جاويش - الاستاذ / محمود لي - الاستاذ / يحيي حسين - الاستاذ / عماد الحسامي - الاستاذ / دغيدي والاستاذ الكبير / محمد طاهر ...... وكل الاعضاء واساتذة هذا الصرح الحاضر والغائب لكم مني اجمل تحيه وتقدير .... وارفع القبعة لكم ارجو من كل خبراء واساتذة هذا الصرح ابداء الرأي في هذا العمل ... واخباري بجوانب القصور فيه فهي لعبة تصلح لالعاب المسابقات ( عسي الله ان ينفع بها احداً ) وجزاكم الله خيرا لعبة مسابقات اوفيسنا.rar
    1 point
  21. جرب هذا الكود 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
    1 point
  22. الأبنة العزيزة / كفاح السلام عليكم ورحمة الله وبركاته أولاً أهلاً بك في منتدانا الرائع وإن شاء الله تستفادي وتفيدي غيرك . أتمنى لك كل توفيق .إليك الملف به المطلوب. Book10.rar
    1 point
  23. بارك الله فيك تقبل خالص تحياتي
    1 point
  24. السلام عليكم و رحمة الله وبركاته بعد اذن اخي الكريم حمادة عمر جزاه الله خيرا على الكود الجميل الذي ارفقه ========================= اخي محمد لاحظ : - ان الكود يأخذ التاريخ من قيمة الخلية الحالية اذا يجب عند تنفيذ الكود ان يكون المؤشر على خلية بها تاريخ يعني خلية من العمود B - و كما ذكر الأستاذ حمادة {** ولكن يجب ملاحظة ان يكون تنسيق التاريخ في كل اعمدة التواريخ في كل الشيتات بتنسيق واحد للجميع} تحياتي وتقديري
    1 point
  25. السلام عليكم الاخ الحبيب / ضاحي الغريب بارك الله فيك والله انت الاجمل والاحلي بأخلاقك العالية وبحبك الدائم لمساعدة الغير وافادة الجميع لك مني ارق وافضل تحيه جزاك الله خيرا
    1 point
  26. السلام عليكم الاستاذ القدير / عباد بارك الله فيك سعدت جدا بمرورك ... وكلماتك اسعدتني كثيرا ومن الاكيد انه منكم دائما نتعلم تقبل خالص تحياتي جزاك الله خيرا
    1 point
  27. فعلا فعلا هو الحق بعينه كلمة عظيمة جد في موضوع جميل بالفعل وانشرح صدري عندما قرأت الجمله جزاكم الله خيرا
    1 point
  28. السلام عليكم الاستاذ القدير /ياسر الحافظ بارك الله فيك ولكن استاذنا الشكر في البداية والنهاية للقدير / جعفر ترباق .... جزاه الله خيرا حيث ليس لي في العمل الا انني احببت ان يستفيد منه الجيميع حيث انه كود جديد من نوعه وحبي لاسرة هذا الصرح جعلتني اسارع في تقديمه اليكم مع علمي بأن الاستاذ / جعفر لا يبخل علي احد بأي معلومة لديه ملحوظة : مثلك لا يستأذن ابدا .... ولكن يأمر ونحن ننفذ .... سلامي للمهند ابا الحارث جزاك الله خيرا
    1 point
  29. السلام عليكم الاستاذ الفاضل العميد / دغيدى النظام لدي 32Bit ويعمل بشكل جيد جدا وسوف اقوم بتجربته علي جهاز 64 او يخبرنا احد الاعضاء ممن لديه نظام 64 جزاك الله خيرا
    1 point
  30. السلام عليكم الاخت الفاضلة / أم عبد الله بارك الله فيكي وتقبلي تحياتي ردك عندي بهذا الكلام الذي لا اجد ما ارد به عليه هو اجمل من الموضوع نفسه وهذا ما تعلمناه في هذا الصرح العملاق من اساتذتنا ( ان لا ينسب الحق الا لأصحابه ) جزاك الله خيرا
    1 point
  31. السلام عليكم الاخ العزيز / سعد عابد بارك الله فيك دائما مرورك عطر علي المواضيع جزاك الله خيرا
    1 point
  32. الاستاذ / جعفر ترباق الشكر دائما موصول لك جعل الله هذا العمل في ميزان حسناتك جزاك الله خيرا
    1 point
  33. السلام عليكم الاخ الكريم / alsawy_hassan بارك الله فيك جزاك الله خيرا
    1 point
  34. السلام عليكم الاخ الكريم / عمرو_ بارك الله فيك مرورك ورأيك اسعدني وشرفني وبالطبع الاستاذ / الحسامي ... استاذ الافكار والابتكار جزاك الله خيرا
    1 point
  35. السلام عليكم الاستاذ القدير / عباد بارك الله فيك ولك مني اجمل تحيه واضم صوتي لصوتك ... في طلب العودة للاستاذ / جفعر كما كان في السبق معنا بتواجده الدائم جزاه الله خيرا الاستاذ الكبير / رجب جاويش بارك الله فيك ليس لي في الموضوع شئ الا انني احببت ان افيد اعضاء اسرتي هنا في هذا الصرح لعملاق حيث رووعه الملف والاتقان والجديد جدا فجزيل شكرنا للكبير / جعفر تربياق ... جعله الله في ميزان حسناته جزاكم الله خيرا
    1 point
  36. السلام عليكم الاخ العزيز / عباس السماوي بارك الله فيك ودائما انت سباق للخير ... جعله الله في ميزان حسناتك الاستاذ الحبيب / أبو حنين بالفعل معك حق ... لم يكن احد يتوقع عمل ذلك ولكن بمراجعة ملفات الاستاذ / جفعر التي صادفتني ومواضيعه وجدت انه لا مستحيل معه ... مثلكم دائما في كل الردود علي الاخوة الاعضاء فالشكر الاكيد للكبير الاستاذ / جعفر ... جزاه الله خيرا وجعله الله في ميزان حسناته جزاكم الله خيرا
    1 point
  37. السلام عليكم الاساتذة والاخوة الكرام الاستاذ / خالد القدس الاخ الكريم / عمر أبو صهيب الاخ العزيز / احمد عبد الناصر شكرا جزيلا لمروركم واتمني من الله ان يكون قد افادكم الموضوع .... عن حق ... الموضوع كله افادة بارك الله فيكم وبالتأكيد ندعو جميعا للكبير / جعفر ترباق ... جزاه الله خيرا بأن يجعل هذا العمل في ميزان حسناته جزاكم الله خيرا
    1 point
  38. السلام عليكم اخواني الكرام ابدأ بنفسي في تقديم الشكر للكبير / Jaafar Tribak وجعله الله في ميزان حسناته فالموضوع له والفضل بعد الله له والشكر واجب له جزاك الله خيرا
    1 point
  39. أخى ( إبراهيم ) فعلا كما قلت أنت وأخى ( أحمد ) ناتج المعادلة يعطى صفر وقد جربتها بمعادلة الصفيف التالية ( =SUM(IF($L$8:$L$3697=$D$6;IF($D$35:$D$3697=$G$35:$G$3697;$G$3701))) وفعلا أعطت صفر حاول تراجع القيم والشروط وربنا الموفق
    1 point
  40. تم تعديل فى برنامج عمل الشهادات لإى مرحلة ليقوم بعمل نوعين من الشهادات 1 - الأولى تشمل درجات الشيت مكتمل وهذه تصلح للأخوة اللذين يتعاملوون مع عدد من المواد كبير نسبيا 2- الثانية وهى شهادات تقترب من شهادات المرحلة الإعدادي والإبتدائية وتشمل عدد أقل من المواد 3- تم إضافة معادلة المجموع الموجود فى برنامج ( ظهور النتيجة ) لجمع المجموع فى الشهادة وذلك بكتابة كلمة ( مجموع ) فقط على حسب ترتيبة فى مواد كل مرحلة فى ( عمود كتابة المواد ) فى صفحة التعبئة وستلاحظ عند كتابتها فى هذه الصفحة على حسب ترتيبة لديك فى المواد أن عمود المجموع فى شيت الدرجاتقد تم تغيير لونة إلى اللون الرصاصى حتى لاتكتب به شئ 4- كل مجموعة من الشهادات مزوذة بكود للطباعة جاهز لطباعة ( 3 ) شهادات فى كل مرة وفى النهاية أسألكم الدعاء عمل الشهادات لأى مرحلة.rar
    1 point
  41. السلام عليكم الاخ الفاضل / جلال محمد مرور اسعدني وشرفني شكرا لك علي كلماتك الرقيقة جزاك الله خيرا
    1 point
  42. أخي ( office 2003 ) إليك ماطلبت تم تعديل الرابط بسبب شرط المعادلة =AND(COUNTIF($B$2:$B28;$B3)=1;LEN(B3)<=7;ISNUMBER(B3)) حيث تم تغيير شرط (LEN(B3)<=7 )بدل (LEN(B3)=7 ) حيث يقوم بقبول القيم الأقل من عدد الأحرف الأقل من ال7 أحرف أما عن شرح المعادلة: تشمل المعادلة ( 3 ) شروط هي : 1- (COUNTIF($B$2:$B28;$B3)=1 ) وبالطبع هذه المعادلة قتلت بحثا وسبق وزملائي الأعزاء بشرحها وهي خاصة بعدم تكرار الرقم 2- ( LEN(B3)<=7 ) وهي دالة تقوم بالموافقة علي القيم التي لايزيد عدد أحرفها عن سبع أرقام 3- ( ISNUMBER(B3 ) وهي الأهم حيث تحدد هذه الدالة أن القيم الموجودة في الخلية والغير مكررة وعددها لايزيد عن ( 7 ) أرقام لابد وأن تكون رقم وليست نص أي أن الخلية لاتقبل ( إلا الأعداد وليس النصوص ولاتكرر وليزيد عدد أرقامها عن ( 7 ) أرقام . وبالطبع نستطيع تغيير شرط الرقم لتقبل أعداد عدد حروفها أكبر ، ونجعلها تقبل النصوص أيضا وهكذا منع تكرار رقم في العمود4.rar
    1 point
  43. هل هذا التنسيق للخلية يكفي للتنبية إنظر عزيزي إلي المرفق فرق بين تاريخيين 2.rar
    1 point
  44. أستاذي ( يوسف ) لقد وضعت هذه المشاركة لحضرتك في مشاركة سابقة ولكن يبدو إن حضرتك لم تقرئها رغم أنها من وجهة نظري هي المطلوبة لحضرتك فأثرت أن أنقلها في هذه المشاركة للتعقيب وإبداء الرأي فيما إذا كانت هي المطلوبة أم لا مقارنة بين عموديين وتلوين المكرر بينهما.rar
    1 point
  45. هل هذه المعادلة ماتقصدها أستاذي التأكد من تواجد الأسماء_2.rar
    1 point
  46. بالنسبة لطلب الاخ الكريم هذا البرنامج ان مجربو ونقريبا يعمل 95% من هنا
    1 point
  47. السلام عليكم شكرا اخى برقش على المتابعة :) ----- وقد ارفقت لك برنامج Pdf Factory وهو برنامج بسيط جدا .. تقوم بتثبيته .. ثم تجده فى قائمة الطابعات المعرفة أى انك تقوم بفتح أمر "طباعة" وتختار البرنامج وتقوم بالحفظ PDF pdf_print.rar السيريال 2ZZY-EU38-PHBR
    1 point
  48. أنصحك ببرنامج PDFCreator المجاني: http://sourceforge.net/project/showfiles.php?group_id=57796
    1 point
×
×
  • اضف...

Important Information