أحمد يوسف

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

أبسطهالك يا استاذى .... فلديك فى هذان التاريخين  6 أشهر بقيمة 31 يوم للشهر = 6*31 يصبح الناتج 186 يوماً

                                                                5 أشهر بقيمة 30 يوم للشهر =5*30 يصبح الناتج 150 يوماً

                                                                وشهر فبراير 28 يوم لسنة  2021 =1*28 يصبح الناتج 28 يوماً

اذن إجمالى المدة كلها كما وضحت لك سلفاً هو 186+150+28 يصبح الناتج 364 يوماً وليس سنة كاملة

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

بارك الله فيك

تفضل المعادلة موجودة فى العمود AL

وهذا أيضا برنامج جاهز لحساب الضريبة

الية الحل مطبقة يمكنك الإطلاع عليها طبقاً للمعطيات الموجودة بصفحة Data

وهذا أيضاً فيديو الشرح لذلك

معادلة ضريبة الرواتب 2020 لمصر

Salary Calculator Pro.rar

تجريبى1.xls

محمد ابراهيم 78

أين انت من  هذه الإجابة الممتازة؟!!!

أين الضغط على الإعــــجـــــاب  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!

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

أو يمكنك التعديل على كودك ليصبح هكذا

Private Sub Workbook_Open()
With Sheet1
If Date <= DateValue("3/10/2020") Or .Range("xfd1").Value <= DateValue("3/10/2020") Then Exit Sub
MsgBox "This workbook has expired.", 48, "Goodbye."
With ThisWorkbook
.Save
.ChangeFileAccess Mode:=xlReadOnly
Kill .FullName
.Close False
End With
End With
End Sub

هذه ليست مشكلة يمكنك الضغط على ok وخلاص أو ضبط اعدادات الماكرو للملف كما بالصورة

 PSYCHO

أين انت من  هذه الإجابة الممتازة؟!!!

أين الضغط على الإعــــجـــــاب  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!

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

       popop88

أين انت من كل هذه الإجابات الممتازة؟!!!

أين الضغط على الإعــــجـــــاب لهذه الإجابة  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!🖤 حتى وان لم تتحصل على الإجابة المرجوة فهذا واجب عليك فيكفى اضاعة الوقت وشرف المحاولة للتوصل لما تريد والعمل هنا لوجه الله بدون تقاضى اجر فحتى هذا تبخل بع على من يساعدك !!!!!!!!!!!!!!

        محسن33

أين انت من هذه الإجابة الممتازة للأستاذ ســــليم حاصبيا ؟!!!

أين الضغط على الإعــــجـــــاب لهذه الإجابة  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!🖤 حتى وان لم تتحصل على الإجابة المرجوة فهذا واجب عليك فيكفى اضاعة الوقت وشرف المحاولة للتوصل لما تريد والعمل هنا لوجه الله بدون تقاضى اجر فحتى هذا تبخل بع على من يساعدك !!!!!!!!!!!!!!

   الياسر سات

أين انت من  هذه الإجابة الممتازة للأستاذ ســليم حاصبيا ؟!!!

أين الضغط على الإعــــجـــــاب لهذه الإجابة الممتازة  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!

      Wael Hamed_1975

أين انت من  كل هذه الإجابات الممتازة ؟!!!

أين الضغط على الإعــــجـــــاب  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!🖤

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

     حامل المسك     

أين انت من هذه الإجابة الممتازة للأستاذ ســــليم حاصبيا ؟!!!

أين الضغط على الإعــــجـــــاب لهذه الإجابة  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!🖤 حتى وان لم تتحصل على الإجابة المرجوة فهذا واجب عليك فيكفى اضاعة الوقت وشرف المحاولة للتوصل لما تريد والعمل هنا لوجه الله بدون تقاضى اجر فحتى هذا تبخل بع على من يساعدك !!!!!!!!!!!!!!

   ahmed.hamdy0020000

أين انت من هذه الإجابة الممتازة  للأستاذ علي محمد؟!!!

أين الضغط على الإعــــجـــــاب  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!🖤

بلال اليامين

أين انت من هذه الإجابة الممتازة ؟!!!

أين الضغط على الإعــــجـــــاب  , وكما اتفقنا ان هذا أقل ما يقدم لمن له الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!🖤

Alien

فين انت من كل هذه الإجابات الممتازة ؟!!!

أين الضغط على الإعــــجــــــــــاب .. وكما اتفقنا ان هذا اقل ما يقدم لصاحب الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!

وعليكم السلام-كان عليك رفع الملف واما عليك تنفيذ الخطوات الموجودة بالصور

  samycalls2020

فين انت من هذه الإجابة الممتازة للأستاذ علي محمد ؟!!!

أين الضغط على الإعــــجــــــــــاب .. وكما اتفقنا ان هذا اقل ما يقدم لصاحب الفضل عليك بعد ربنا فى حل مشكلتك وتفريج كربتك ؟!!!

حسام ميلكانا

أين الضغط على الإعــــــــجــــــــــاب لكل هذه الإجابات الممتازة ؟!!!💙

 Alien

فين انت من هذه الإجابة الممتازة ؟!!!

أين الضغط على الإعــــــجــــــاب ؟!!!💙

   comphas1

فين انت من هذه الإجابة الممتازة ؟!!!

أين الضغط على الإعــــــجــــــاب ؟!!!💙

عفرا

فين انت من هذه الإجابة الممتازة ؟!!!

أين الضغط على الإعــــــجــــــاب ؟!!!💙

Alien

أين انت من كل هذه الإجابات الممتازة ؟!!!

أين الضغط على الإعـــــجــــاب ؟!!!💙

على الرغم انى لا ارى اى جدوى او فائدة من ذلك , فحجم الخط بالقائمة المنسدلة الموجودة بملفك طبيعى ويرى بالعين المجردة فلا داعى لكل ذلك .... الا انه يمكنك استخدام هذا الكود بحدث الورقة

واليك الملف مرة أخرى

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error GoTo xErr
    If Target.Validation.Type > -1 Then
        ActiveWindow.Zoom = 140
        Exit Sub
    End If
xErr:
        ActiveWindow.Zoom = 100
End Sub

data Validation.xlsm

faki2

فين انت من هذه الإجابة الممتازة ؟!!

أين الضغط على الإعـــــــجــــــــــاب ؟!!💙