amoudi

السلام عليكم اخي الكريم بعد اذن الأخوة وضعت بالمرفق معادلتين لعمل vlookup من عدة اوراق (اختار التي تناسبك) تحياتي Vlookup_1.rar

يمكن ان تكون المعادلة كما هي ويكون ناتج المعادلة كما هو يعني تستثنى من التقريب

عزيزي لا اعتقد ان يمكن ان تظهر المعادلة sum(D966:O966)= ويظهر الناتج مختلف عن نتيجة المعادلة هذا يحصل فقط في الفورمات

معليش النت عندنا الله يعلم به المهم هل تقصد اضافة معادل ceiling للمعادلة الموجودة في الخلية

يحولها الى رقم عادي بعد التقريب .

اعتقد الكود يعمل كما طلبت

السلام عليكم الكود اصلا في كل مره يمسح الدوائر قبل وضعها من جديد هذا الجزء من الكود هو يعمل مسح Dim o As Shape For Each o In ActiveSheet.Shapes If o.Name Like "InvalidData_*" Then o.Delete Next ضعه في ماكرو وحيمسح اذا تريد تحياتي

السلام عليكم معليش مش واضح ,, ماهو المطلوب الغاء التقريب اذا وجد معادلات او يعمل تقريب لنتيجة المعادلة ؟؟؟

السلام عليكم ياريت توضيح للسؤال .

تفضل المرفق على حسب التحقق من الصحة يضع الدائرة (عينة من موقع مايكروسوفت) تحياتي _______.rar

بعد ما تختار الخلايا روح على بيانات --> التحقق من الصحة تحياتي

اجعل تنسيق الخلية على نص اوضع العلامة ' قبل الرقم تحياتي

جرب المرفق 11111.rar

ياخي هذه الميزات موجودة في 2007 بدون كود فقط في 2007 غير كده لازم كود تحياتي

هذه طريقة اختصار للوصول للشي مثلا لوعندك الكود التالي Range("D953:D968").FormatConditions.Delete Range("D953:D968").FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, Formula1:=[D952] Range("D953:D968").FormatConditions(1).Interior.ColorIndex = 34 فتلاحظ تكرار object الى هو range("d953:D968")1 فيمكن كتابة بالشكل التالي With Range("D953:D968") .FormatConditions.Delete .FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, Formula1:=[D952] .FormatConditions(1).Interior.ColorIndex = 34 End With وهذا عزيزي يجعل قراء الكود اسهل والكود اصغر والأهم من ذلك كله انه يوفر الأستهلاك في الوصول لأي object (يعني شي في البرمجمة ما يهمك الآن) تحياتي

السلام عليكم انا اريد انك تفهم الكود قبل لا تطبق ,, . حاول تتعرف على المشكلة وكيف خطوات حلها . على العموم مرفق ملف معدل . انا في الخدمة لأي استفسار . _________.rar

اكتب [Formula1:=[D952

ياريت التوضيح لوترفق الملف يكون الفضل

السلام عليكم اضافة للفائدة اذا القيمة كمثال في A1 فتكون المعادلة (CHOOSE((A1>=0)+(A1>=2)+(A1>=4),0,5,10= تحياتي

السلام عليكم سؤال اخي ليش هذه الخلايا فقط ملونة , يعني ايش يميزها عن غيرها . تحياتي

السلام عليكم سجل ماكرو بالتنسيق وضيف الكود جق الماكرو مع الكود السبق تحياتي

السلام عليكم ما اعتقد بدون اكواد تحياتي

اخي الكريم في طريقة بسيطة بمعادلة وحدة ((SUMPRODUCT((E4:E18>=30)*(D4:D18>=4.5= تحياتي

السلام عليكم جرب الملف بالنسبة للتقريب ما التنسيق الشرطي لازم كمان تحوله على الماكرو علشان تتجاوز هذه المشكلة تحياتي _________.rar

اخي الكريم الأسد الجريح لا يأخي سويتها بمعادلة شكرا لأهتمامك , بس انا بصراحة ما عملتها يدوي ما وضعته لأنه حيكون خاص بهذا الملف وبشكل البيانات هذه ومار ح ينفع لكل حالة وتسبقة كم خطوة يدوية مثل تضلل العمود وتضغط Ctrl+H وتستبدل " " ب حرف معين وبعدين تعمل النص الى اعمدة وحتنقسم البيانات الى 3 نتائج وبعدين نجمعل الثلاثة النتائج واضافة الفراغات بمعادلة تحياتي