رجب جاويش

أخى ابراهيم جرب الكود التالى فى حدث الصفحة Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("D:D")) Is Nothing Then For Each cl In Intersect(Target, Range("D:D")).Cells If cl = "" Then Target.Borders.LineStyle = xlNone Else Target.Borders.ColorIndex = 1 End If Next End If End Sub وهو يمعل عند وضع بيانات فى العمود D ويمكنك تغيرة كما تريد

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

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

أخى ابراهيم جرب هذا الكود Sub ragab_Merge() For i = 4 To 19 Step 2 Range(Cells(5, i), Cells(5, i + 1)).MergeCells = True Next End Sub

أختى الفاضلة / أم عبد الله جزاك الله كل خير على هذا المرور العطر والكلمات الطيبة

أخى الفاضل / باسم جزاك الله كل خير أخى الفاضل على كلماتك الطيبة

أخى الفاضل / عمر جرب المرفق تم الاستعانة بابداعات أستاذى الحبيب / عبد الله باقشير omar.rar

شكرا جزيلا أخى الفاضل / أبو محمد أشرف على هذا المرور العطر

السلام عليكم بعد اذن مبدع المعادلات الأستاذ / بن عليه تفضل أخى عباس السماوي جدول الفصول والمعلمين الاستاذ بن علية حاجي.rar

تفضل أخى =IF(OFFSET(C5;(COUNTA(C6:C100));0)>50;1;OFFSET(C5;(COUNTA(C6:C100));0)+1) New Microsoft Office Excel Worksheet.rar

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

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

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

تفضل أخى ابراهيم استخراج الاسماء الجديده6.rar

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

السلام عليكم الاخ الكريم / new4a الاخ الكريم / مجدى يونس بارك الله فيكم وجزاكم الله كل خير

تفضل أخى ابراهيم كود فى حدث الصفحة يعمل بمجرد وضع الرقم فى الخلية B2 استخراج الاسماء الجديده6.rar

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

أخى الفاضل / عمر جزاك الله كل خير وإن شاء تجدنا معك فى كل ما تريد

نفس المشكلة عندى منذ فترة

أخى الفاضل / عمر قمت بعمل المعادلة كما طلبت جرب وأخبرنى بالنتيجة وأى تعديل آخر تريده أخبرنى omar.rar

أخى الفاضل / عمر قمت بعمل المعادلة المطلوبة كما طلبت جرب وأخبرنى بالنتيجة وأى تعديل آخر تريده أخبرنى

أخى الفاضل / عمر لا يوجد مرفق

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

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