اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

إنشاء معادلة لمعرفة موعد الزيادة المقبل


إذهب إلى أفضل إجابة Solved by حسين مامون,

الردود الموصى بها

السادة الأفاضل / السلام عليكم ورحمة الله وبركاته

أرجو منكم التكرم مساعدتي في حل التالي:

لدي قاعدة بيانات موظفين ، جميع العقود لمدة سنتين ، ويوجد منهم موظفين قدامى بالشركة

أرجو مساعدتي في وضع معادلة لتحديد موعد الزيادة القادم بالضبط

مثال :

من يتم تعيينه في سنة فردية تكون زيادته بعد عامين أي في سنة فردية ، والعكس صحيح

من تم تعيينه في 2010 فإن زيادته القادمة في 2012، 2014، 2016، 2018، 2020 وهكذا

ومن تم تعيينه في 2001 فإن زيادته القادمة في 2003، 2005، 2007، 2009 وصولا إلى 2021

أرجو الإفادة بارك الله فيكم ، ولكم مني جزيل الشكر والتقدير

( مرفق ملف توضيحي)

 

 

Increment.xlsx

رابط هذا التعليق
شارك

جرب هذا المرفق

الكود يعمل في حدث الشيت "change" 

 

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Dim rng, lr
lr = Cells(Rows.Count, "c").End(3).Row
Set rng = Range("c5:c" & lr)
If Not Intersect(Target, rng) Is Nothing Then
If Not IsDate(Target) = True Then
Target = ""
Else
Target = Format(Target, "dd-mm-yyyy")
Target.Offset(, 1) = Format(DateAdd("yyyy", 2, Target), "dd-mm-yyyy")
Exit Sub
End If
End If

End Sub

 

Increment (1).xlsm

  • Like 1
رابط هذا التعليق
شارك

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

إذا كان هناك موظف تاريخ تعيينه في 2010 فإن الكود يعطيني التاريخ 2012 مع العلم أن هذا التاريخ قد فات أنا أريد أن يحسب الكود سنتين بشكل مستمر حتى يصل إلى تاريخ حديث وهو 2020

أرجو قد أكون وضحت الفكرة

رابط هذا التعليق
شارك

تفضل ربما يكون ما تريد اخي الكريم

ادخل التاريخ في العمود "C"وانقر بالماوس الايسر دوبل كليك

مثلا تاريخ التعيين هو: 12/12/2014

النتيجة : 12/12/2016  12/12/2018  12/12/2020

اتمنى ان يكون ما تريد

تحياتي

Increment (1).xlsm

  • Like 1
رابط هذا التعليق
شارك

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

مثلا تاريخ التعيين هو: 12/12/2014

النتيجة : 12/12/2020

فأنا لا أرغب في التواريخ القديمة ، أنا أرغب في آخر تاريخ حديث

 

أنا آسف جدا لإزعاجك أخي الفاضل ، لك خالص الشكر والاحترام

  • Like 1
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information