فلسطيني

_______________________.rarأخي الكريم الأخوة الكرام أولا أهنيء الجميع بالحلة الجديدة للمنتديات و أتقدم بالشكر الجزيل للإدارة على جهودهم العظيمة للرقي الادئم بهذا الصرح العملاق بالنسبة للملف المرفق فقد تم عمل اللازم في الخليةc ضع الدالة = day(b2) ومن تنسيق اختر تنسيق الخلية بحيث يكون التنسيق =dddd فتظهر أسماء الأيام

أخي أبا أحمد السلام عليكم ورحمة الله وبركاته الملف المطلوب في المرفقات دعواتكم counter2.rar

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

الأخوة الكرام البرنامج المستخدم هو برنامج installer creator و هناك العديد من البرامج التي تقوم بنفس المهام مثل installer2go ; setupfactory و غيرها بالنسبة لبرنامج install creator الذي استخدم في هذه المشاركة فيهو برنامج رائع و لكنه تريل فيرجن ، فأرجو من لديه سيريال نمبر له إضافته إلى هذه المشاركة

تحيةعطرة لك أخي عمر الحسيني على جهودك المميزة ،حقا تعجز الكلمات عن شكرك و الشكر موصول أيضا للدينمو الأستاذ خالد نور

أخي الكريم أهلا و سهلا بك بين إخوانك أما بالنسبة لإستفسارك فاذهب غب العمود a اكتب الأرقام من 1- 12 في A1 ; a2 .......a12 ثم من قائمة data بيانات اختر validation التحقق من الصحة ثم اختر قامة list كما هو موضح في الصورة المرفقة و حدد المجال من A1:a12

الأخ halawim جرب الملف المرفق sum4.rar

أخي الكريم آسف جدا فقد كان الخطأ مني في الصيغة السابقة إليك الصيغة الصحيحة =IF(D2="";"";(B2*(D2-C2))) أو =IF(D2<>"";(B2*(D2-C2));"") و الصيغتان تعطيان نفس النتيجة

= if ( d2="";"";(e2=b2*(d2-c2)))

أخي الكريم ما تقول به حسب رأيي لا يمكن أن يتحقق منطقيا لأنه لو أردت أن تنفذ ذلك من خلال الكود فسوف يقوم خلال ثواني بتغير قيم الخلية بشكل مستمر للوصول لأعلى قيمة ثم يتوقف عمله ( حلقة مستمرة ) و إذا أردت تنفيذه من خلال الدالة فعند إدخالك قيمة في a1 فسوف تقوم بمسح الدالة الموجودة في الخلية ! لذا يجب أن يتم العمل من خلال خليتين على الأقل خلية لإدخال القيم المتغيرة وخلية أخرى تضيف القيمة الجديدة للقيم القديمة و المثال الذي أشار إليه الأخ تامر أو عمر يفي بالغرض و إذا أردت أي تعديل عليه يمكن ذلك

الأخ الكريم في المرفق المثال باستخدام sumproduct و ذلك للتخلص من أي أعمدة إضافية sum2.rar

شكرا للأستاذ عمر على هذه المشاركة المفيدة للجميع و ننتظر منه المزيد دوما

أخي الكريم بالنسبة للملف المرفق sum1 فقد تم إزالة فصل التاريخ لأعمدة و تم الاعتماد على عمود واحد فقط كما تريد بالنسبة لتحديد شهر معين فالدالة= (خلية التاريخ ) month أما لليوم فالدالة = (خلية التاريخ ) dayو للسنة year اما بالنسبة لسؤالك حول رؤوس الأعمدة و ظهورها بالأرقام بدل الحروف فهو نظام R1C1 فيمكن التبديل من خلال قائمة أدوات ثم خيارات ثم عام و من هناك ستجد خيار R1C1فقم بوضع الإشارة أمام هذا الخيار فتتحول رؤوس الأعمدة لأرقام و عند إزالة الإشارة تعود لحروف بالتوفيق إن شاء الله sum1.rar

الأخوة الكرام الشكر الجزيل لجميع الأخوة على تفاعلهم و ردودهم المتنوعة التي تغني موضوعات المنتدى الأخ halwim في الملف المرفق جميع استلامات كل يوم 15 من كل شهر 5 ،بدون أستخدام vba sum.rar

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

أشكرك أخي الكريم على هذه المشاركة الرائعة و أتمنى ان يستقيد الجميع منها جعلها الله في ميزان حسناتك

أخي الكريم السلام عليكم ورحمة الله وبركاته جرب الملف المرفق و ضع الرقم الذي تريد في الخلية A2 ثم اضغط الزر فسيتم الترحيل حسب الكود التالي :- Sub khaled() Dim val As Integer val = Sheets("sheet1").Range("a2").Value Sheets("sheet1").Select Range("d2").Select ActiveCell.Value = ActiveCell.Value + val End Sub khaled.rar

الأخ الكريم تم الرد في موضوع سابق لأنك أرفقت نفس الملف في أكثر من مشاركة

الأخوة الكرام آسف جدا لتأخيري عن الرد عن ما أستطيع الرد عليه من استفساراتكم وذلك لإنشغالي و أشكرك الأخوة الذين قاموا بالردود و خاصة الأخ القدير خالد نور و جميع الأخوة أتمنى أن يكون الحل في الملف المرفق halwim.rar

أخي الكريم شكرا جدا على هذه الروائع التي تذكرنا بروائع أخينا عمر الحسيني الذي اشتقنا لروائعه .

شكرا أخي على هذا الجهد الطيب و أتمنى ان نستفيد جميعا بما جمعته لنا و نوظفه في تطبيقات جديدة مفيدة .

إليك الملف بالتعديل الأول البسيط وسوف أضيف لك ميزة الصوت و الفلاشنج و هي تحتاج لمساعد الأوفيس للصوت mabrook.rar

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

يمكنك تحميل الملف بعد ضغطه بأحد برامج الضغط و من ثم تحميله في المرفقات فهي متاحة لجميع الأعضاء

أخي الكريم السلام عليكم ورحمة الله وبركاته أولا أرجو أن تقبل إعتذاري عن التأخير و ذلك لظروف العمل ثانيا أتمنى أن أكون قد وفقت في الوصول إلى ما تريد جرب المرفق وفي انتظار تقييمك ___.rar