hamdi.ahmed

مش عارف اشكر حضرتك ازاى بصراحة  ...الف شكر

متشكر جدا جدايا باش مهندس على

هل هناك معادلة مثل معادلة ماكس يا باش مهندس على لاظهار آخر نص فى العمود بدلا من المعادلة التى بالملف فى العمود السابق للتاريخ ؟

السلام عليكم ورحمة الله وبركاته

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

AGGING FILE.xlsm

انا استخدمت الكود التالى 

Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean)
Dim rCell As Range
Dim lCol As Long
Dim vResult
lCol = rColor.Interior.ColorIndex
If SUM = True Then
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = WorksheetFunction.SUM(rCell, vResult)
End If
Next rCell
Else
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = 1 + vResult
End If
Next rCell
End If
ColorFunction = vResult
End Function

لكن الكود يعمل بشكل جيد على الالوان اليدوية ..ولا يعمل على الوان التنسيق الشرطى ...ارجو المساعدة

السلام عليكم ورحمة الله وبركاته ..اخوانى الاعزاء ..الملف المرفق يوضح مدة مديونية عميل ما 

اتمنى من حضراتك عمل تجميع فى الصف # 1003 من العمود ( K )  ..كل خلية على حسب لونها مع التحديث وشرح كيفية عمل ذلك

ايضا اريد عمل ترتيب تلقائى بحيث انه اذا دفع العميل ومسحت انا بعض الفواتير تقوم باقى الفواتير للصعود الى اعلى بشكل تلقائى او يتم ترتيبها من الاقدم الى الاحدث بشكل تلقائى مع شرح الفكرة ايضا ..ولكم جزيل الشكر ،،،

انتبه من فضلك ..فقد تم اعادة رفع الملف بإمتداد Xlsm ,, وذلك لأن طلبك لا يمكن تنفيذه الا بالأكواد

AGGING FILE.xlsm