السلام عليكم
فورم اختيار لون معين ومزجه واستخراج الاكواد الخاصة به
اذا اردنا لون معين نقوم
بالبحث العشوائي عن هذا اللون اوما يقاربه
ثم نقوم بالتغيير عليه من الارقام
الخاصة RGB
حتى نوصل الى ما نريده تماما
الناتج:
كود RGB
كود HEX
كود MSA
ويمكنك الاحتفاظ بهذه المعلومات في الشيت
من زر اضافة
معمول بالاكسل وبالفيجول بيسك
الاكسل 2003-2010
فورم تكوين الوان مع المعلومات.rar
بالفيجوال بيسك:
RGB TO HEX.rar
في امان الله
الاخوة المحترمين
اثناء تجوالي في الانترنت وجدت كتاب يشرح معظم دوال الاكسل وهو لاستاذ فاضل من مصر اسمه عاصم حمزه المهر جزاه الله كل خير ، حبيت اضيفه في المنتدى لعل احد يستفيد منه .
وشكراً ،،،،،
شرح دوال الاكسل.rar
بعد اذن أستاذى الحبيب / عبد الله باقشير
وبعد اذن أخى الحبيب / عباد
هذه مشاركة متواضعة
لعلها تلقى قبول اساتذتى الكرام
Private Sub TextBox1_Change()
For Each cl In [A1:A6]
arr = arr & cl & ","
Next
x = UBound(Filter(Split(arr, ","), TextBox1))
If x = -1 Then MsgBox "القيمة غير موجودة في القائمة": Exit Sub
End Sub
TEXTBOX1.rar
أنا شخصياً أفضل الإلتزام بالقواعد ، حيث أن القواعد وضعت نتيجة ضوابط وتجارب منهجية
الحاجات لها حلول ...
قد يكون تطبيق الحل (غير سليم) ، لذا نتراجع لنصل لخرق القواعد
أرى أن البحث عن الحل الصحيح أفضل و أسلم وأصح
مهما كان طريق الوصول للحل الصحيح الآمن ... صعباً أو متعباً
أؤيد أخي الحبيب في إحتساب القيم بدلاً من تخزينها
والله أعلم
.........
السلام عليكم ورحمته الله وبركاته
ارجو من الخبراء مساعدتي لدي كشف يوجد فيه قاعدة بيانات من 10 اعمدة وعدد الموظفين 200 الف ويوجد شيت اخر وعدد الموظفين فيه 9000
ارغب في مقارنة الشيت الاول بالشيت الثاني ليتم استخراج جميع الذين بالشيت الثاني من الشيت الاول وتعليمهم بلون اخر .
ولكم جزيل الشكر
بغرض تسريع الكود ككل
Tip # 003
ضع أمر في أول الكود بالأعلي لإطفاء عمل تحديث الشاشة (ScreenUpdating)
ولاتنسي أن تضع أمرا آخر في آخر الكود بالأسفل يعيد عمل تحديث الشاشة (ScreenUpdating)
كالتالي
Sub code001()
Application.ScreenUpdating = True
code
...
code
Application.ScreenUpdating = False
End Sub
السلام عليكم
أخي العزيز
ماتطلبه صعب جدا
لأن الكود من أعمال استاذنا الجليل / عبدالله باقشير ، حفظه الله
وكالعادة يتميز بدقة غير عادية ومراعاة لكافة الإحتمالات التي قد تنتج عند استخدام الكود
ولاأدري ، هل فهمت كل مايريده من الكود أم لا
ولكن وبعد إذنه طبعا
تفضل المرفق ، قد يكون شرحا متواضعا للكود
وأدعو الله ألا يقلل الشرح البسيط من قيمة الكود العالية
تفضل المرفق
شرح الكود3.rar
السلام عليكم
الاخ الكريم / Mesha
اعتقد ان رد الاستاذ والاخ الكريم / refaat yousry hammed ... جزاه الله خيرا
هو الاقرب للصواب جرب ذلك وابلغنا بالنتيجة
جزاك الله خيرا
تفضل مثالك بعد التعديل عليه
المشكله كانت انك تقوم بحفظ القيم المحسوبه وادخاله في السجل لذلك كل مره تغير السعر او تضيف كميه لابد ان تحسب القيمه الاجماليه وتخزنها يدويا وهذا عمل متعب و لا يقوم بتسهيل المهام و الاستفاده من الاكسس
دائما القيم التي تنتج عن عمليات حسابية لا نقوم بتخزينها وانما نجعل الاكسس يقوم بعمليه الحساب كل مره تقوم باستعراض السجل
db.rar
إخوتي الأعزاء
نظرا لأهمية تثبيت بعض المواضيع المتميزة لتعميم الفائدة وسهولة الرجوع اليها سيتم جمع روابط هذه المواضيع ضمن هذا الموضوع ، تعزيزا لأهميتها ، ومن باب اتاحة المجال لتثبيت مواضيع أخرى ضمن المواضيع المثبتة ، ولفترات محددة وبالتناوب .
وسيتم إدراج رابط أي موضوع متميز ضمن هذه القائمة لسهولة الوصول اليه.
مؤكدين أن هذا الموضوع ليس لطرح المشاركات وانما موضوع تجميعي للمواضيع المرجعية المتميزة ، لمساعدة الإخوة على التعرف على هذه المواضيع وتسهيل الوصول اليها و التعامل معها.
آملا من جميع الاخوة التعاون سعيا لتنظيم الأمر تحقيق للمصلحة العامة لرواد منتدانا
ودمتم