جلال الجمال_ابو أدهم

57 _ برنامج شئون الموظفين بتاريخين هجري وميلادى + تقارير + بحث متعدد _ الاستاذ / احمد بكر 58 _ دفتر الحضور بالاكسيل _ الاستاذ / محمد الريفى 59 _ دفتر الحضور والانصراف _ الاستاذ / محمد الريفى 60 _ برنامج عمل قائمة التدفقات النقديه _ الاستاذ / محمد الريفى 61 _ برنامج حسابات عامه للمقاولات _ الاستاذ / محمد الريفى

44 _ تكويد / ادخال صنف بناء على اسم المجموعة _ الاستاذ / حسام عيسى _ الصقر 45 _ فورم رصد درجات مع امكانية البحث والتعديل والحذف والترحيل للطباعة _ الاستاذ / ابن مصر 46 _ البحث أي كلمه في الاسم _ الاستاذ / ابن مصر

74 _ سلسلة علمنى كيف اصطاد - الترحيل _ الاستاذ / حسام عيسى _ الصقر 75 _ سلسلة علمنى كيف اصطاد - الحلقة التكرارية For next _ الاستاذ / حسام عيسى _ الصقر 76 _ سلسة علمنى كيف اصطاد - ( الداله MAX / الداله Min ) _ الاستاذ / حسام عيسى _ الصقر 77 _ سلسة علمنى كيف اصطاد _ الاستاذ / حسام عيسى _ الصقر 78 _ داله DateDif رائعه لايجاد الفرق بين تاريخين او طرح تاريخين _ الاستاذ / حسام عيسى _ الصقر 79 _ دعوة للتصفح داخل هذا الكنز _ الاستاذ / حسام عيسى _ الصقر و من روابط المنتدى 80 _ نظرة عامة حول النماذج وعناصر تحكم النماذج وعناصر تحكم ActiveX في ورقة عمل _ الاستاذ / حسام عيسى _ الصقر 81 _ اقدم لكم شرح مبسط لداله VLOOKUP للمبتدئين _ الاستاذ / حسام عيسى _ الصقر 82 _ شرح VLOOKUP وMATCH وINDEX وكيفية الربط بينهما _ الاستاذ / حسام عيسى _ الصقر 83_ البحث عن جزء من النص باستخدام الدالة VLOOKUP (موضوع خفيف) _ الاستاذ / ياسر خليل 84 _ المشروع الكبير (مكتبة الصرح .. زاخرة بالشرح) وهي عبارة عن تجميع لمكتبة الأكواد _ الاستاذ / ياسر خليل 85 _ ألغاز إكسيلية (موضوع ترفيهي) _ الاستاذ / ياسر خليل

اخى / حسام عيسى بارك الله فيك

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

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

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

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

اخى بارك الله فيك

اخى بارك الله فيك و بالتوفيق دائما و ارجو عمل فى المرحلة التالية : اذن توريد و صرف متعدد ( مثلا ان يكون اذن التوريد يشمل على استلام على اقساط مثلا 10 شيكات دفعه واحدة من عميل مع وجود بياناتهم مثل رقم الشيك و الحق و ليس بيانات شيك واحد فقط ) و كذلك اذن الصرف كأن يشمل على كذا دفعه

اخى بارك الله فيك

اخى / حسام عيسى بارك الله و بالتوفيق دائما و كل عام و انتم بخير

1 _ كود تلوين عمود و سطر الخلية النشطة المختارة تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=85909 2 _ كود لتغيير خلفية ورقة العمل بلون المفضل للمستخدم و استخدامات اخرى تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=85969 3 _ كود لتغيير خلفية ورقة العمل بلون المفضل للمستخدم بالرجوع لقيمة الخلية_A1 تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=86128 4 _ كود تظليل سطر الخلية النشطة بلون معين فى نطاق معين للخلايا تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=86130 5 _ كود يقوم بعمل خلفية الوان و الخط لورقة العمل بطريقة عشوائية تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=86201 6 _ كود يساعد المستخدم على تحديد لون الخلفية المطلوبه لورقة العمل عند استخدامه لاكواد اخرى تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=86205

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

1 _ كود ادخال ترحيل بيانات بطريقة رأسية تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=84643 2 _ كود ادخال ترحيل بيانات بطريقة رأسية مع اضافة كود ترتيب الصفوف تصاعدى تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=84701 3 _ كود ادخال ترحيل بيانات بطريقة رأسية مع ترتيب الصفوف تصاعدى و بشرط عدم مسح خلية بها معادلة تكويد تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=84770 4 _ كود ادخال ترحيل بيانات بطريقة رأسية _ برنامج التكويد و دليل الحسابات تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=84955 5_ كود ادخال ترحيل بيانات بطريقة رأسية مع يومية و ميزان مراجعه دبل كليك تحميل الملف http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=85890

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

11 _ كود يساعد المستخدم على تحديد لون الخلفية المطلوبه لورقة العمل عند استخدامه لاكواد اخرى فمثلا فى المشاركات السابقة اذا كنت تريد اختيار خلفية بلون معين و لكل لون له رقم بالكود _ من رقم 1 : 56 فيمكن من هنا _ قم بتحديد اللون المفضل لك و احفظ رقمه قم بكتابة رقم الخلفية المفضلة بمكانها بالمشاركات السابقة Sub sbPrintColorIndexColors() Dim iCntr For iCntr = 1 To 56 Cells(iCntr, 1).Interior.ColorIndex = iCntr Cells(iCntr, 1) = iCntr Next iCntr End Sub _ورقة تنفيذ الكود sheet1 _فمثلا درجة الخلفية الرمادى الفاتح _ يكتب بالكود رقم 15 و اللون الازرق 41 و هكذا مرفق التطبيق العملى تحياتى و لا تنسونى من صالح الدعاء كود لدرجات الوان الخلفية_ Gadham.rar

10 _ كود يقوم بعمل خلفية الوان و الخط لورقة العمل بطريقة عشوائية Sub D() Randomize Timer Dim i, j, k As Integer i = Int(255 * Rnd) + 1 j = Int(255 * Rnd) + 1 k = Int(255 * Rnd) + 1 Range("A4 : L690").Font.Color = RGB(i, j, k) Range("A4 : L690").Interior.Color = RGB(j, k, i) End Sub _ورقة تنفيذ الكود sheet1 _نطاق الخلايا من a4:L690 و يمكن تغيير نطاق الخلايا حسب ما يريده المستخدم مرفق التطبيق العملى تحياتى و لا تنسونى من صالح الدعاء خلفية ملونة بطريقة عشوائية_Gadham.rar

9 _ كود تظليل سطر الخلية النشطة بلون معين فى نطاق معين للخلايا Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Target, Range("a7:T10000")) Is Nothing Then If Target.Cells.Count > 1 Then Exit Sub If Application.CountA(Range(Cells(Target.Row, 2), Cells(Target.Row, 20))) = 2 Then Range("a7:T10000").Interior.ColorIndex = 2 Range("a7:T10000").Font.ColorIndex = 49 Exit Sub End If If Target.Cells.Count > 1 Then Exit Sub Range("a7:T10000").Interior.ColorIndex = 2 Range("a7:T10000").Font.ColorIndex = 49 Range(Cells(Target.Row, 1), Cells(Target.Row, 20)).Interior.ColorIndex = 41 Range(Cells(Target.Row, 1), Cells(Target.Row, 20)).Font.ColorIndex = 2 End If End Sub _ورقة تنفيذ الكود sheet1 _نطاق الخلايا من a7:T10000 و حتى عمود 20 و يمكن تعديل النطاق حسب ما يريد المستخدم _يمكن تغيير لون تظليل سطر الخلية النشطة بتعديل درجة اللون بالكود _41 _يمكن تغيير لون خلفية نطاق الخلايا من خلال تغيير درجة لونها _Range("a7:T10000").Interior.ColorIndex = 2 تلوين سطر الخلية النشطة فى نطاق خلايا محددة_Gadham.rar

8 _ كود لتغيير خلفية ورقة العمل بلون المفضل للمستخدم بالرجوع لقيمة الخلية_A1 (Private Sub Worksheet_SelectionChange(ByVal Target As Range Cells.Interior.ColorIndex = xlNone ("Cells.Interior.ColorIndex = Range("A1 Target.Interior.ColorIndex = 37 End Sub _ورقة تنفيذ الكود sheet1 _يمكن تغيير لون الخلية النشطة بتعديل درجة اللون بالكود _37 كود تلوين ورقة العمل بناء على رقم خليةA1_ Gadham.rar

استاذنا / ياسر خليل استاذ / احمد غانم _ يرجى مراجعة المشاركة استاذ / ياسر خليل 35 بارك الله فيكم و كل عام و انتم بخير

استاذ / ياسر خليل بارك الله فيك

استاذ / ياسر خليل و اساتذتى الذين تفاعلوا مع الموضوع بارك الله فيكم اسجل اعجابى بتنوع الافكار و الابداعات لأنه يجعل هناك روح فريق و تنافس ابداعى بين اعضاء المنتدى تحياتى و كل عام و انتم بخير

7 _ كود لتغيير خلفية ورقة العمل بلون المفضل للمستخدم و استخدامات اخرى _ورقة تنفيذ الكود sheet1 و يمكن اضافة الكود بباقى اوراق العمل بنسخ زر الكود 7/1 _ كود يجعل خلفية ورقة العمل بالون الابيض النمطى Sub CommandButton2() Range("A4 : L690").Interior.ColorIndex = 0 End Sub _يمكن تغيير نطاق الخلايا بتعديل النطاق بالكود ("A4 : L690") 7/2_كود يجعل خلفية ورقة العمل او نطاق الخلايا بلون معين Sub CommandButton1() Range("A4 : L690").Interior.ColorIndex = 37 End Sub _يمكن تغيير نطاق الخلايا بتعديل النطاق بالكود ("A4 : L690") _يمكن تغيير لون نطاق الخلايا بتعديل درجةاللون بالكود _37 7/3 _ كود متعدد الالوان يجعل خلفية ورقة العمل او نطاق الخلايا بلون متغيير Sub CommandButton6() Range("A4 : A690").Interior.ColorIndex = 36 Range("C4 : C690").Interior.ColorIndex = 8 Range("E4 : E690").Interior.ColorIndex = 37 Range("G4 : G690").Interior.ColorIndex = 12 Range("I4 : I690").Interior.ColorIndex = 14 Range("K4 : K690").Interior.ColorIndex = 15 End Sub _يمكن تغيير نطاق الخلايا بتعديل النطاق بالكود ("A4 : L690") و تعديل عنوان العمود H_E_L الى اخره _يمكن تغيير لون نطاق الخلايا بتعديل درجة اللون بالكود _37_36_8_15_14 و يمكن ادماجه مع درجات الوان اخرى مرفق التطبيق العملى تحياتى و لا تنسونى من صالح الدعاء كود لتغيير خلفية ورقة العمل بلون المفضل للمستخدم_G_adham.rar

اخى / مختار حسين محمود اخى / ياسر خليل اخى / احمد غانم شاكر مروركم الكريم _بارك الله فيكم تحياتى لشخصكم الكريم