الـمـاتادور قام بنشر مارس 10, 2019 مشاركة قام بنشر مارس 10, 2019 السلام عليكم اريد كود تلوين ضمن النطاق AE9:AJ59 بحيث يلون اي قيمة بين 15000 و 50000 باللون الاصفر الفاتح وبين 50000 و 75000 باللون الاصفر الغامق وبين 75000 و 100000 باللون البرتقالي وفوق ال 100000 باللون الاحمر والشكر مرفوع سلفا رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر مارس 10, 2019 مشاركة قام بنشر مارس 10, 2019 دائماً يلزم بيانات لتجربة الكود فليس من المعقول ان يقوم احد بتعبئة عدة أعمدة(6) في 50 صف اي اكثر من 300 رقم لاجراء اختبار كود عنك على كل حال جرب هذا الكود Option Explicit Sub talween() Dim my_rg As Range, CEl As Range Set my_rg = Range("AE9:AJ59") my_rg.Interior.ColorIndex = 0 Dim my_colore As Byte For Each CEl In my_rg If IsNumeric(CEl) Then Select Case CEl.Value Case Is < 15000: my_colore = 0 Case Is <= 50000: my_colore = 19 Case Is <= 75000: my_colore = 6 Case Is <= 100000: my_colore = 44 Case Else: my_colore = 3 End Select CEl.Interior.ColorIndex = my_colore End If Next End Sub 1 رابط هذا التعليق شارك More sharing options...
الـمـاتادور قام بنشر مارس 10, 2019 الكاتب مشاركة قام بنشر مارس 10, 2019 هذا الملف استاذي الكريم آذار.rar رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر مارس 10, 2019 مشاركة قام بنشر مارس 10, 2019 1 دقيقه مضت, الـمـاتادور said: هذا الملف استاذي الكريم آذار.rar 51.21 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 0 downloads ضع الكود في الملف و قم بتنفيذه و اعلمني بالنتيحة رابط هذا التعليق شارك More sharing options...
الـمـاتادور قام بنشر مارس 10, 2019 الكاتب مشاركة قام بنشر مارس 10, 2019 والله مالون يا استاذ او انا ماعرفت طبق الكود رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر مارس 10, 2019 مشاركة قام بنشر مارس 10, 2019 19 دقائق مضت, الـمـاتادور said: والله مالون يا استاذ او انا ماعرفت طبق الكود الملف مع الكود أضغط فقط على الزر Click_Me Mars.xlsm رابط هذا التعليق شارك More sharing options...
الـمـاتادور قام بنشر مارس 10, 2019 الكاتب مشاركة قام بنشر مارس 10, 2019 والله عالراس والعين يا استاذ بس في مجال يتطبق الكود تلقائيا بدون زر لأن الملف احيانا بيصير فيه اكتر من صفحة علما انو هادا الجدول مكانو ثابت بكل الصفحات رابط هذا التعليق شارك 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.