بارك الله فيك استاذ سليم والله عندك حق وبعد اذنك -تفضل اخى ابو اياد ... هذا البرنامج الممتاز ولكن عليك بتوليفه لطلباتك فلا أحد يمتلك الوقت لتلبية كل طلباتك كما أوضح لك استاذنا الكبير سليم حاصبيا سلفاً
كلمة المرور لدخول البرنامج : لا اله الا الله
برنامج مبيعات ومشتريات مجاني كلمة السر لا اله الا الله.xlsm
وعليكم السلام-كان عليك استخدام خاصية البحث بالمنتدى-تفضل
برنامج مجاني علي الاكسيل لاقرار ضريبة القيمة المضافة
وهذا نموذج أخر
نموذج_ضريبة_القيمة_المضافة_في_السعودية.xlsx
مبروك الأستاذ محي الدين ابو البشر إنضمامك لعائلة الخبراء ,أسأل الله لك التوفيق والنجاح دائما ..وأعانك الله على هذه المسئولية الجديدة وسدد الله خطاك
عن حق وجدارة بارك الله فيك وزادك الله من فضله
وعليكم السلام-تقريباً نفس الطلب استاذ أحمد ولذلك ليس هناك داعى لرفع مشاركة جديدة ومنفصلة .تم دمج واضافة المشاركة الجديدة هنا أيضاً ... أعتقد ان الموضوع ليس بالصعب , كان عليك تعلم وعمل ذلك بنفسك -تفضل
=IFERROR(EDATE($E2,$D2*12-$F2),"")
وتم أيضاً ضبط معادلة العمود D على ان تكون هكذا
=IF(C2="","",IF(C2<=5,5,4))
test3.xlsx
وعليكم السلام-أهلاً بك فى المنتدى -يمكنك استخدام هذه المعادلة لحساب التأخير
=IF($D10<$M$12,"",(D10-$M$12))
وهذه لحساب الإضافى
=IF(F10=0,"",IF($E10<$M$13,0,$E10-$M$13))
وتم وضع المعادلات بالجدول الأول , فعليك بتعميم هذه المعادلات بباقى الجداول
رواتب واجور2021 - يناير.xlsx
أحسنت استاذ سليم عمل ممتاز بارك الله فيك وجعله الله فى ميزان حسناتك
الأمر بسيط yasse.w.2010
عليك بتغيير هذا الصف من كود الحذف
ws.Cells(FR.Row, 1).Resize(, 7).Delete
واستبداله بهذا
ws.Cells(FR.Row, 1).Resize(, 7).ClearContents
بعد اذن الأستاذ حسين ولإثراء الموضوع يمكنك هذا بهذه المعادلة
=IFERROR(IF(B2="عام",VLOOKUP($E2&"/"&$D2,الحالة!$N$2:$Q$80,2,0),VLOOKUP($E2&"/"&$D2,الحالة!$H$2:$K$80,2,0)),"")
المنتوج+المحور+الاستحقاق1.xlsx