amoudi

السلام عليكم ضلل المنطقة الأولى وخليك ضاغط على زر Ctrl وبعدين ضلل المنطقة الثانية او اضغظ على زر fx او حط فاصلة بين range مثل =(AVERAGE(B5:B9;C5:C9;F7:F15 ان في جهازي الفاصل ; بس ممكن في جهازك ,

تفضل =(SUMIF(B1:B11;"<"&TODAY();A1:A11

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

السلام عليكم الكود مش مره صعب ياريت تحاول تفهمه .. انا عملت hard code يعني اذا غ او غـ مؤقتا اعتقد المفروض يكون التشييك على اي قيمة غير رقمية حيكون بدائرة حمراء جرب تعمله بنفسك عل العموم تم التعديل في المرفق ___________________.rar

اخي الكريم لم افعل غير الواجب وشكرا على كرمك فيكفيني دعواتك لي جزاك الله خير

السلام عليكم اخي ببساطة اشر على العمود A اذهب الى القائمة بيانات النص الى اعمدة (اختار محدد من الخيارات) التالي اختار فاصلة انهاء تحياتي

Rows.Count يعني عدد الصفوف وما دام هي ما هي مرتبطة باي object فحيكون الورقة الحالية يعني ثابث 65536 اما اذا ارتبطت مع object مثل Range فحتكون عدد الصفوف في ال Range والمعادلة يعني الخلايا في العمود الأول الى الصف الأخير اذهب لأخر مكان به بيانات واعطيني رقم الصف اتمنى تكون وصلت المعلومة تحياتي

السلام عليكم ورحمة الله حساب عدد الأرقام بدون كود عن طريق Array Formulas __________________________20____2.rar

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

نعم يمكن عملك ذلك عند بداية ظهور المعالج اختار الخيار الثالث Multiple consolidation ranges. الأكسيل مش عربي عندي المهم هو الخيار الثالث شكرا

معلش بس معادلة الأسم غير صحيحية في حالة شخصين كان لهم نفس القيمة يكرر اسم الشخص الأول فقط شكرا

Sub Macro4() ' ' Macro4 Macro ' Application.Run "Book1!Macro1" Application.Run "Book1!Macro2" Application.Run "Book1!Macro3" End Sub يعني سجل ماكرو جديد واعمل تشغيل للماكروات الموجودة وبعد ذلك اربط الزر يشغل هذا الماكرو او اعمل كود مثل السابق