Ali Mohamed Ali

بعد اذن استاذنا الكبير سليم ولإثراء الموضوع يمكنك تجربة هذا اكثر من شخص1.xlsx

جرب الكود الموجود بهذا الرابط من أعمال أستاذنا الكبير ياسر خليل ابو البراء https://pastebin.com/DdEr76jc

اهلا بك فى المنتدى-تفضل 1التسويات.xlsx

بارك الله فيك واحسن الله اليك ووسع الله فى رزقك

جزاك الله كل خير وزادك الله من فضله

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

جرب كده نسخة_من_تطبيق_فرق_السعر_هيئة.xlsm

يمكنك استخدام هذا الكود فسوف يتم عمل ملف منفصل برقم الفاتورة عند الضغط على ترحيل فبذلك يمكنك طباعة اى فاتورة تريدها Sub Splitbook() Dim xPath As String ActiveSheet.Name = ActiveSheet.Range("AP2") & " NO" & Range("E6") xPath = Application.ActiveWorkbook.Path Application.ScreenUpdating = False Application.DisplayAlerts = False For Each xWs In ThisWorkbook.Sheets xWs.Copy Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".xlsx" Application.ActiveWorkbook.Close False Next Application.DisplayAlerts = True Application.ScreenUpdating = True Range("E6") = ([E6]) + 1 End Sub Invoice.xlsm

تفضل لأنك لم تطبق المعادلة بطريقة صحيحة تقاطع العمود مع السطر OK.xlsx

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

بارك الله فيك

وعليكم السلام-دائما وابداً باتأكيد لابد من رفع الملف لإستجابة الأعضاء والأساتذة فى مساعدتك تفضل يمكنك استخدام هذه المعادلة =IF(A13<20,25,IF(AND(A13>=20,A13<=30),25+(A13-20)*1.5,IF(AND(A13>30,A13<=40),25+(9*1.5)+(A13-31)*2,IF(A13>40,25+(9*1.5)+(9*2)+(A13-41)*2.5,"")))) مثال توضيحي1.xlsx

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

اهلا بك فى المنتدى-تفضل DG Inv Empty.xlsm

تفضل لك ما طلبت Split & Search.xlsx

استاذ ابو صلاح معادلة الأستاذ سليم تعمل بكل كفاءة ,فهى لا تحتاج اى تعديل -فاذا اعطت لك خطأ فمنك انت:-وذلك لأحد سببين, فهذه معادلة مصفوفة لابد من الضغط على Ctrl+Shift+Enter وليس Enter فقط كما اخبرك استاذنا سليم و الأخر اذا مازالت لا تعمل معك فعليك باستبدال الفاصلة العادية بفاصلة منقوطة ; فربما نظام الكمبيوتر لديك مختلف

وعليكم السلام -تفضل ~$زيادة او نقصان سنة في عدة صفوف عن طريق زر.xlsm

بعد اذن استاذنا بن علية حاجى وذلك لأن هذه معالات مصفوفة وليست معادلات عادية فلابد بعد نسخ المعادلة الضغط على Ctrl+Shift+Enter وليس Enter فقط كباقى المعادلات

غير التاريخ الموجود بالخلية A2 كما تريد ولا تقوم بالمساس للمعادلات

تفضل لك ما طلبت الهدف1.xlsx

وعليكم السلام-يمكنك استخدام هذه المعادلة لجمع السلف =SUMIFS($L$2:$L$2000,$H$2:$H$2000,$AQ2,$D$2:$D$2000,"<>"&$AC$2:$AC$2000) ومعادلة جمع استحقاق المحطة =SUMIFS($N$2:$N$2000,$H$2:$H$2000,$AQ2,$D$2:$D$2000,"<>"&$AC$2:$AC$2000) جمع مستحقات وسلف واستثناء بعض الارقام1.xlsx

جزاك الله كل خير استاذ مجدى ورحم الله والديك

الموضوع ليس بالسهل او الهين , يمكنك الإستعانة بهذا الرابط : https://github.com/balin77/ExcelDesignListBox

المشكلة لديك استاذ عبد الباسط اتمنى ان تقوم بترقية الأوفيس لديك الى حتى 2010 عفوا اخى الكريم ليس لدى 2007

تفضل خطأ في التفقيط1.xlsm