الفدائي قام بنشر مايو 11, 2013 مشاركة قام بنشر مايو 11, 2013 (معدل) الإخوة الأعزاء , لقد استفدت ايما فائدة من هذا المنتدى , جزى الله عنا اخواننا خير الجزاء الفكرة : جمع الاكواد التي غالبا ما اتعامل بها في برامجي ووضعها في ملف وربطها بصورة ظريفة وجذابة بحيث يمكن الرجوع لهذه الاكواد في اي وقت المشروع مفتوح ويمكن لاي شخص ان يضيف له ما شاء من الافكار والاكواد المفيدة وكتابة وصفها في مشاركته لتسهيل عملية البحث ويظل مثل حقيبة المجوهرات . فعندما يبحث احدنا عن الاتي : - كود لإخفاء الريبون Ribbon أو إخفاء شريط الحالة Statusbar والشيت Sheet tabs - كود لإغلاق الخلايا Lock area ( وليس حمايتها ) من التعديل ما عدا التي تحددها انت . - كود لإخفاء اشرطة التمرير Scroll bars وتعطيل عجلة الماوس Mouse wheel - كود لمربع النص بان لا يقبل اي حرف او رمز الا الأرقام فقط Numeric - كود بان لا يغلق الاكسل الا بعد التحقق من شيء معين - اكواد مقارنة القيم واظهار الرسائل المختلفة . ...... الخ كلها سيجدها هنا مفصلة اتمنى ان تنال الفكرة اعجابكم خاصة المبتدئين امثالي اسألكم الدعاء وشكرا , أخوكم : الفدائي __________________________________________ Electronic-Beggar.zip تم تعديل مايو 11, 2013 بواسطه احمد فضيله رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر مايو 11, 2013 مشاركة قام بنشر مايو 11, 2013 السلام عليكم الاخ الكريم / الفدائي بارك الله فيك مجهود جميل فعلا ... تشكر عليه وملف دمه خفيف ولاثراء الموضوع اضع روابط موضوع ( محفظة الاكواد المتنوعة ) http://www.officena.net/ib/index.php?showtopic=37647&hl=%2B%D9%85%D8%AD%D9%81%D8%B8%D8%A9+%2B%D8%A7%D9%84%D8%A7%D9%83%D9%88%D8%A7%D8%AF#entry202299 http://www.officena.net/ib/index.php?showtopic=37670&hl=%2B%D9%85%D8%AD%D9%81%D8%B8%D8%A9+%2B%D8%A7%D9%84%D8%A7%D9%83%D9%88%D8%A7%D8%AF http://www.officena.net/ib/index.php?showtopic=39791&hl=%2B%D9%85%D8%AD%D9%81%D8%B8%D8%A9+%2B%D8%A7%D9%84%D8%A7%D9%83%D9%88%D8%A7%D8%AF#entry222361 جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
أبو محمد عباس قام بنشر مايو 11, 2013 مشاركة قام بنشر مايو 11, 2013 السلام عليكم ورحمة الله وبركاته الاخ العزيز الفدائي جزاك الله خيرا عمل رائع جعله الله في ميزان حسناتكم دمتم برعاية الله وحفظه رابط هذا التعليق شارك More sharing options...
احمد فضيله قام بنشر مايو 11, 2013 مشاركة قام بنشر مايو 11, 2013 جزاكم الله خيرا رابط هذا التعليق شارك More sharing options...
الفدائي قام بنشر مايو 11, 2013 الكاتب مشاركة قام بنشر مايو 11, 2013 (معدل) بارك الله فيكم إخواني الكرام على مروركم وإشادتكم الأخ حمادة مشكور علي الروابط تم تعديل مايو 11, 2013 بواسطه الفدائي رابط هذا التعليق شارك More sharing options...
خالد الشاعر قام بنشر مايو 11, 2013 مشاركة قام بنشر مايو 11, 2013 استاذ الفدائي عمل رائع به فكرة جميلة لى سؤال لو سمحت هل ممكن بدل اخفاء كل شريط الاوادت نوقف عمل بعض الايقونات فقط جزاك الله كل خير رابط هذا التعليق شارك More sharing options...
الفدائي قام بنشر مايو 11, 2013 الكاتب مشاركة قام بنشر مايو 11, 2013 الاخ خالد تقصد مثلا تعطيل عملية القص او النسخ مثل الاتي : Application.CutCopyMode = False لكن مع ايقونات الريبون الكثيرة هذه نحتاج لاكواد كثيرة وبحث هنا وهناك لتعطيل ما نريد انظر الملفات المرفقة التي كنت قد حصلت عليها من احدى المنتديات الاجنبية احدهم به اوامر لتعطيل بعض المجموعات المخصصة من الريبون ( انظر المجموعات الجديدة اقصى يمين الريبون عند الضغط على الازرار ) - والاخر للاخفاء Enable-Disable custom Ribbon buttons in Excel .zip Hide-Display-Built-in Tab-Group.zip رابط هذا التعليق شارك More sharing options...
خالد الشاعر قام بنشر مايو 11, 2013 مشاركة قام بنشر مايو 11, 2013 استاذ فدائي الف الف شكر تسلم ايدك جزاك الله كل خير و جعلة فى ميزان حسناتك رابط هذا التعليق شارك More sharing options...
قنديل الصياد قام بنشر يناير 9, 2014 مشاركة قام بنشر يناير 9, 2014 بارك الله فيك اخى العزيز وجزاك الله خيرا رابط هذا التعليق شارك More sharing options...
جمال الفار قام بنشر يناير 9, 2014 مشاركة قام بنشر يناير 9, 2014 السلام عليكم ورحمة الله وبركاته الفاضل الفدائي/ جزاك الله خيرا عمل اكثر من رائع جزيت عنه خيرا وفقكم الله تقبلوا احترامى وتقديرى رابط هذا التعليق شارك More sharing options...
؛ أحمد النجار ؛ قام بنشر يناير 9, 2014 مشاركة قام بنشر يناير 9, 2014 جزاك الله خيرا على ما قدمت ملف رائع جدا جعله الله في ميزان حسناتك رابط هذا التعليق شارك More sharing options...
محمود_الشريف قام بنشر يناير 10, 2014 مشاركة قام بنشر يناير 10, 2014 أخى الكريم الفدائي/ جزاك الله خيرا عمل اكثر من رائع جزيت عنه خيرا وفقكم الله تقبلوا احترامى وتقديرى رابط هذا التعليق شارك More sharing options...
أم عبد الله قام بنشر يناير 10, 2014 مشاركة قام بنشر يناير 10, 2014 الأستاذ / الفدائي السلام عليكم ورحمة الله وبركاته فكرة جميلة جداً ومتعة وامكانيات الأكواد في الاكسيل لا تنتهي.جزاك الله خيراً. رابط هذا التعليق شارك More sharing options...
عادل ابوزيد قام بنشر يناير 11, 2014 مشاركة قام بنشر يناير 11, 2014 عمل رائع جزاك الله كل خير وجعله فى ميزان حسناتك ونفعك به فى الدنيا والاخرة رابط هذا التعليق شارك More sharing options...
ريان أحمد قام بنشر يناير 11, 2014 مشاركة قام بنشر يناير 11, 2014 السلام علليكم فكرة جميلة لو قمنا بتطبيقها أين الأكواد ظهرت رسالة الخطأ التالي 'Hide Status bar Application.DisplayStatusBar = False 'Hide ribbonIf Application.ExecuteExcel4Macro("Get.ToolBar(7,""Ribbon"")") Then Application.ExecuteExcel4Macro "Show.ToolBar(""Ribbon"", False)" Else Application.ExecuteExcel4Macro "Show.ToolBar(""Ribbon"", True)" End If في السطر الأحمر رابط هذا التعليق شارك More sharing options...
ريان أحمد قام بنشر يناير 11, 2014 مشاركة قام بنشر يناير 11, 2014 up رابط هذا التعليق شارك More sharing options...
ابو راكان العودة قام بنشر نوفمبر 24, 2015 مشاركة قام بنشر نوفمبر 24, 2015 السلام عليكم لو تكرمت كود تعطيل عجلة الماوس Mouse wheel غير موجود هل ممكن تزويدنا به وجزاكم الله خير رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.