Ali Mohamed Ali

تفضل دالة if.xlsx

أخى الكريم لو ممكن رفع الملف بارك الله فيك

تفضل استاذى الكريم الحل بمعادلتين داخل الملف,اختر منهما ما تشاء اكبر قيمة بناء على عدة شروط1.xlsx

بارك الله فيك وجزاك الله كل خير

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

وهذه أيضا دالة معرفة أخرى تكاد تكون متشابهة مع الدالة الأولى strReverse -2مشكلة الكتابه المعكوسه.xlsm

بارك الله فيك استاذنا الكريم وجعله الله فى ميزان حسناتك

تفضل اخى الكريم وهذا سوف يتم بالدالة المعرفة Reversestr وهى من أعمال استاذنا الكبير وخبيرا ومحللنا المالى الأستاذ محمد الريفى له منا كل المحبة والإحترام جزاه الله كل خير وجعل الله جميع اعماله فى ميزان حسناته مشكلة الكتابه المعكوسه.xlsm

أحسنت استاذ أحمد كود ممتاز-كل عام وانتم بخير حمد على سلامة حضرتك لعله خير نورت منتداك من جديد

تفضل اخى الكريم -طبعا بعد اذن استاذى سليم salim.xlsx

أختى الكريمة انا قمت بتجربة الكود قبل رفعه لكى لا يحذف الورقة الأولى المحمية نهائيا-ممكن تلاحظى الصور :

تفضلى هذا ملف به حماية الورقة من الحذف حماية ورقة من الحذف.xlsm

اخى الكريم بالنسبة للخلية M1 -هى مقياس التغير فى scroll Bar وجعلتها تمثل رقم التلاميذ فهى عامل ثابت فى المعادلة بحيث لو تغير الرقم فى هذه الخلية سواء بالزيادة او النقصان يتم جلب البيانات المطابقة لهذا الرقم من صفحة اشعار 1 اما بالنسبة لباقى معادلة Vlookup فهى عادية اعتقد انها مفهومة وواضحة لك بارك الله فيك

أخى الكريم بالفعل ارسلتها لك فى المشاركة الأخرى على هذا المرفق https://www.officena.net/ib/topic/85346-دالة-vlookupمع-زر-تحكم/

تفضل اخى الكريم هذا بمعادلة Vlookup مع Scroll Bar scroll bar with Vlookup.xlsx

تفضل 1.xlsx

بعد اذن استاذى سليم هذا الكود من أجل أستاذى ابو قاسم يوضع فى حدث الصفحة وذلك لتوسيع حجم العمود كلما كثرت البيانات به Private Sub Worksheet_SelectionChange(ByVal Target As Range) Columns(Target.Column).AutoFit End Sub والكود الأخر فى حدث الصفحة لتعريض الخلية بما يوازى البيانات بها حتى يمكن الكتابة فى الخلية الواحدة على أكثر من سطر Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveCell.WrapText = True End Sub بارك الله فيكم جميعا تغيير حجم العمود والخلية بما يناسب الكتابة بهما.xlsm

أهلا بك اخ كريم فى المنتدى تفضل هذا الملف STORE.xlsx

تفضل اخى الكريم لك ما طلبت اشعار1.xlsx

من فضلك اخى لو مزيد من التوضيح, ففى اى خلية بالضبط تريد نقل الأسماء فى الصفحة الأخرى ؟ بارك الله فيك

=,SUMPRODUCT(($I$8:I8-$C$8:C8),--($A$8:A8=$A8)))) وذلك بهذه الجزئية من المعادلة

=IF(A8="","",IF(SUMPRODUCT(($I$8:I8-$C$8:C8),--($A$8:A8=$A8))<0,"لقد نفذ رصيد هذا المنتج من المخزن",SUMPRODUCT(($I$8:I8-$C$8:C8),--($A$8:A8=$A8)))) تفضل اخى الكريم هذه هى المعادلة وتعنى : أن لو اجمالى كمية المخزون لمنتج معين مطروح منها الكمية المطلوب تحرير فاتورة لها لنفس المنتج أقل من صفر يجب ان تخرجلى المعادلة هذه الرسالة وهى-"لقد نفذ رصيد هذا المنتج من المخزن" أما اذا كان الناتج غير ذلك فتقوم المعادلة بحسابه ووضع الباقى فى عمود المتبقى فى المخزن جزاك الله كل خير

بارك الله فيك استاذى الكريم وجزاك الله كل خير وأكثر الله من أمثالك-ورحم الله والدك وغفر له وأدخله الله فى رحمته وكل عام وانتم بخير عيد أضحى مبارك

تفضل اخى الكريم -لك ما طلبت وكل عام وانتم بخير 111-1.xlsx

جرب هذا موادالرسوب.xlsx