رجب جاويش قام بنشر مايو 21, 2013 مشاركة قام بنشر مايو 21, 2013 إخوانى الأعزاء السلام عليكم ورحمة الله وبركاته هذا الكود يحسب عدد الخلايا الملونة بلون معين يتم تحديد اللون عن طريق تحديد الخلية التى تحتوى على اللون المطلوب ثم يتم تحديد المدى المراد حساب عدد الخلايا الملونة فيه Sub ragab_counter() Dim rng As Range Dim rng2 As Range On Error Resume Next 1: Set rng = Application.InputBox("اختر بالماوس الخلية التى تحتوى على اللون المطلوب", "اختيار اللون", , , , , , 8) If rng Is Nothing Then MsgBox ("من فضلك اختر خلية واحدة"): GoTo 1 If rng.Cells.Count > 1 Then MsgBox ("من فضلك اختر خلية واحدة"): GoTo 1 End If color_index = rng.Interior.ColorIndex If color_index = -4142 Then MsgBox ("هذه الخلية غير ملونة من فضلك اختر خلية أخرى"): GoTo 1 2: Set rng2 = Application.InputBox("حدد بالماوس المدى المطلوب", "تحديد المدى", , , , , , 8) If rng2 Is Nothing Then MsgBox ("من فضلك حدد المدى المطلوب"): GoTo 2 For Each cl In rng2 If cl.Interior.ColorIndex = color_index Then color_count = color_count + 1 End If Next MsgBox "عدد الخلايا الملونة بهذا اللون يساوى " & " " & color_count, , "عدد الخلايا الملونة" End Sub عد الخلايا الملونة.rar 1 رابط هذا التعليق شارك More sharing options...
إبراهيم ابوليله قام بنشر مايو 21, 2013 مشاركة قام بنشر مايو 21, 2013 اخى الحبيب رجب جاويش تغيبب تغييب ثم تاتى بكل ما هو جديد-جميل-رائع والاكثر انه مفيد بارك الله فيك ودائما نسمع عنك كل ما هو خير وفققك الله لما يحبه ويرضاه رابط هذا التعليق شارك More sharing options...
الجزيرة قام بنشر مايو 21, 2013 مشاركة قام بنشر مايو 21, 2013 ما شاء الله تبارك الله أحسنت أخي الحبيب / رجب رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر مايو 21, 2013 مشاركة قام بنشر مايو 21, 2013 السلام عليكم جزاك الله خيرا وبارك فيك تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
محمود رواس قام بنشر مايو 21, 2013 مشاركة قام بنشر مايو 21, 2013 مبدع كالعاده استاذنا الكبير رجب بارك الله فيك وزادك من علمه وفضله . رابط هذا التعليق شارك More sharing options...
أبو محمد عباس قام بنشر مايو 21, 2013 مشاركة قام بنشر مايو 21, 2013 الاستاذ والاخ الحبيب رجب جاويش حفظكم الباري عز وجل عمل رائع وابداع منقطع النظير زادك الله علما ونفع بعلمك كود رائع جعله الله سبحانه وتعالى في ميزان حسناتك وفقك الله واعانك لعمل الخير واعطاك الصحة والعافية تقبل فائق احترامي وتقديري رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر مايو 21, 2013 الكاتب مشاركة قام بنشر مايو 21, 2013 أخى الحبيب / ابراهيم أبو ليله جزاك الله كل خير أخى الحبيب على هذه الكلمات الطيبة وشكرا جزيلا على سؤالك الطيب عنى رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر مايو 21, 2013 الكاتب مشاركة قام بنشر مايو 21, 2013 أخى الحبيب / الجزيرة جزاك الله كل خير أخى الحبيب على هذه الكلمات الطيبة رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر مايو 21, 2013 الكاتب مشاركة قام بنشر مايو 21, 2013 أستاذى الحبيب / عبد الله باقشير شرف كبير مرور أستاذى الحبيب / عبد الله باقشير جزاك الله كل خير أستاذى الحبيب على هذه لمرور العطر رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر مايو 21, 2013 الكاتب مشاركة قام بنشر مايو 21, 2013 أخى الحبيب / محمود رواس جزاك الله كل خير أخى الحبيب على هذه الكلمات الطيبة رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر مايو 21, 2013 الكاتب مشاركة قام بنشر مايو 21, 2013 أخى الحبيب / عباس السماوي مرور أخى الحبيب عباس السماوى شرف لأى عمل ودعاءه الطيب يتمناه كل انسان لأنه يبنبع من قلب صادق فجزاك الله كل خير أخى الحبيب رابط هذا التعليق شارك More sharing options...
محمد يوسف محمد1 قام بنشر مايو 21, 2013 مشاركة قام بنشر مايو 21, 2013 زادك الله من علمه كان لى طلب فى عملك الرائع كنترول شيت الثانوى فى المشاركة رقم 46 ياريت يا أخى تبص علية وشكرا رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر مايو 22, 2013 مشاركة قام بنشر مايو 22, 2013 السلام عليكم جزاك الله خيرا وبارك فيك تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر مايو 22, 2013 الكاتب مشاركة قام بنشر مايو 22, 2013 أخى الفاضل / محمد جزاك الله كل خير وان شاء الله يتم عمل المطلوب رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر مايو 22, 2013 الكاتب مشاركة قام بنشر مايو 22, 2013 الأستاذ الكبير والأخ الفاضل / عبد الله المجرب شرفنى جدا مرورك العطر وكلماتك الطيبة وجزاك الله كل خير رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر مايو 22, 2013 مشاركة قام بنشر مايو 22, 2013 السلام عليكم الاستاذ العملاق / رجب جاويش بارك الله فيك كود اكثر من رااائع ... رائعة من روائعك التي لا تنتهي ويارب الامتحانات ما تجيش تاني خالص ... ههه علشان نشاهد هذه الرواائع الممتازة واعتذر عن التأخر في الرد .. جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر مايو 22, 2013 الكاتب مشاركة قام بنشر مايو 22, 2013 أخى الحبيب / حمادة عمر شكرا جزيلا أخى الحبيب على هذه الكلمات الطيبة وان شاء الله نكون فى تواصل دائم فى بيتنا الثانى ( منتدى أوفيسنا الحبيب ) وجزاك الله كل خير رابط هذا التعليق شارك More sharing options...
karam_a قام بنشر مايو 23, 2013 مشاركة قام بنشر مايو 23, 2013 السلام عليكم اخي شكرا على المجهود الرائع لكن عندي مشكلة عند اجراء الفرز على عامود معين لا يقوم بحساب العناصر المفروزة فقط بل يقوم بحساب كافة العامود ( المفروزة و غير المفروزة ) ارجو المساعدة ليقوم بحساب اللون بعامود فية خلايا مفروزة مع الشكر و التقدير رابط هذا التعليق شارك More sharing options...
تامر سمير قام بنشر مايو 25, 2013 مشاركة قام بنشر مايو 25, 2013 هل يمكن عمل هذا(جمع الخلايا الملونة فقط بنفس اللون او جميعها بمعنى اذا كان لدى عدد من الخلايا مختلفة الالوان واريد جمعها او عدد من الخلايا كل مجموعة منها ذات لون واحد) عن طريق المعادلات ارجو الرد وماهى المعادلة المستخدمة فى اكسيل لجمع الخلايا الملونة فقط ارجو الرد وجزاكم الله عنى خير الجزاء رابط هذا التعليق شارك More sharing options...
أبو أنس80 قام بنشر مايو 29, 2013 مشاركة قام بنشر مايو 29, 2013 شي جميل جدا تسلم يدك رابط هذا التعليق شارك More sharing options...
جلال محمد قام بنشر مايو 29, 2013 مشاركة قام بنشر مايو 29, 2013 أخي الحبيب : رجب جاويش بارك الله فيك ..... عمل رائع ومفيد جدا جعلة الله في موازين اعمالك رابط هذا التعليق شارك More sharing options...
خالد القدس قام بنشر مايو 29, 2013 مشاركة قام بنشر مايو 29, 2013 السلام عليكم كود احترافي رائع أستاذنا المبدع رجب بارك الله فيك وجزاك الله خيرا رابط هذا التعليق شارك 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.