إيهاب عبد الحميد

وعليكم السلام ورحمة الله وبركاته
نموذج 41_ office (1).xlsx

تفضل ما أردت ان شاء الله
ورقة عمل (1).xlsx

وعليكم السلام ورحمة الله وبركاته
ان شاء الله يكون هذا المطلوب
Book1 (4).xlsx

وعليكم السلام ورحمة الله وبركاته
 
=IF(AND(I2<>"",K2<>"تم التجديد",(I2-NOW())<100),IF(I2>NOW(),"باقي "&(ROUND((I2-NOW())+1,0))&"","منتهي قبل "&(-ROUND((I2-NOW())+1,0))&""),"")  

إنتهاء الرحصة222.xlsm

تفضل على حسب ما فهمت من السؤال
عينة.xlsm

وعليكم السلام ورحمة الله وبركاته 
اليك الحل ان شاء الله ولكن ياريت في المرات القادمة ارفاق النمطلوب في ملف الإكسل
تلوين خلية.xlsx

وعليكم السلام ورحمة الله وبركاته
تفضل أخي الغالي 
1. اضفت بعض الأعمده وبها صيغ لتحسن الشكل ولاستخراج بيانات إضافية.
2. تم عمل ما طلبت ولكني حسبت السنة على 360 يوم كالمعتاد في حسابات المؤسسات لحساب بدل الأجازات ونهايو الخدمة
 
رصيد الاجازات بالأيام.xlsx

=CONCATENATE(INDIRECT("'51'!c2"), " ، ", INDIRECT("'52'!c2"), " ، ", INDIRECT("'61'!c2"),.....) =CONCATENATE(INDIRECT("'51'!B2"), " ، ", INDIRECT("'52'!B2"), " ، ", INDIRECT("'61'!B2"),....)  

وعليكم السلام ورحمة الله وبركاته
تفضل أخي
اختصار معلومات لعميل.xlsx

ما شاء الله عليك انت صخ ولكن يبدو أنك أغفلت أن النطاقات لابد وأن تكون متساوية داخل الصيغة
=SUMIFS(E4:E87,D4:D87,"لارج",B4:B87,"="&(TODAY()))
حضرتك وضعت 
=SUMIFS(E4:E87,D4:D11,"لارج",B4:B87,"="&(TODAY()))
وان شاء الله هتشتغل معاك

وعليكم السلام ورحمة الله وبركاته
تفضل يا أخي
محتاج معادلة تغيير الارقام من افقى الى راسى.xlsx
ولو لديك اكسيل 365 استخدام هذه الدالة البسيطة
=tocol(B3:E17)  

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

السلام عليكم ورحمة الله وبركاته
أخي الكريم توضيح فقط وهو أن دالة subtotal تعمل فقط مع اخفاء الصفوف ولا تعمل مع الأعمدة
وهنا عليك استخدام هذه الصيغة
=(CELL("width",E6)>0)*E6+(CELL("width",G6)>0)*G6+(CELL("width",I6)>0)*I6+(CELL("width",K6)>0)*K6
ولكن مع ملاحضة أن هذه الصيغة كلما أخفيت عمود أو أظهرت عمود يجب تحديثها أي تقف على الصيفة مثلا وتضغط F2 ثم تضغط Enter
ويمكنك استخدام هذا الكود 
  Public Function SumVisible(Rg As Range) As Double     Dim xCell As Range     Dim xRg As Range     Dim xOutRg As Range     On Error Resume Next     Application.Volatile     Set xRg = Application.Intersect(Rg, Rg.Worksheet.UsedRange)     If Not (xRg Is Nothing) Then         For Each xCell In xRg             If (xCell.EntireRow.Hidden = False) And _                (xCell.EntireColumn.Hidden = False) Then                 If xOutRg Is Nothing Then                     Set xOutRg = xCell                 Else                     Set xOutRg = Application.Union(xCell, xOutRg)                 End If             End If         Next     End If     If Not xOutRg Is Nothing Then         SumVisible = Application.Evaluate("SUM(" & xOutRg.Address & ")")     Else         SumVisible = 0     End If End Function  
د يجمع سواء الصفوف أو الأعمده الظاهرة في النطاق المراد جمعه ولكن الكود يعمل تلقائي مع الصفوف وبخصوص الأعمدة يجب تحديث الخلية التي ستضع فيها الصيغة الناشئة من الكود وهي 
=sible(Range)

هذا والله أعلم

تفضل
الحل.xlsx

Sub Hide_Tabs()     ActiveWindow.DisplayWorkbookTabs = False End Sub  

مرفق لك المطلوب وبنفس الطريقة إذا أردت مطابقة جدول 2 من جدول 1 فعليك اتباع نفس المعادلات
استخراج البيانات من جدولين1.xlsx

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

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

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

وعليكم السلام ورحمة الله وبركاته
غير اعدادات الخلايا لتصبح بتنسيق رقم

 
وياريت كمان وسع الخلايا ليتناسب حجم الرقم

السلام عليكم ورحمة الله وبركاته
مرفق لحضرتك ما أردت ولكن عن طريق المعادلات وليس الكود
المجموع بين تاريخين والعدد أيضاً
عملاء استحقاق.xlsx

السلام عليكم ورحمة الله وبركاته
هذا الشيت به ما أردت كذلك ايضا اضفت اليه لو حضرتك أرتي ان تعملي فلترة بالمعادلات لتري النتيجة
الكشف عن قيمة.xlsx

وعليكم السلام ورحمة الله وبركاته
حاولت معرفة الخلايا التي تريد اختبارها لم استطع معرفتها تحديدا عموما هذه هي المعادلة
ما عليك ان تغير الخلايا التي وضعتها ان لم تكن هي بالخلايا المطلوبة
=IF(AND(ISBLANK(A2),ISBLANK(B2),ISBLANK(C2)),"N/A",FALSE)    اذا كانت كلها فارغة ستعطيك النتيجة التي طلنتها
A/N
واذا كانت بها خلية أو أكثر غي فارغة تعطيك 
False
 

وعليكم السلام ورحمو الله وبركاته
هذا الموضوع قتل حلا في المنتدى من الأفضل ان تبدأ بالبحث عن السؤال
ولكن أخي الكريم لك ما أردت

وأيضا رقم المسلسل يظهر تلقائيا يكفيك فقط ان تدخل رقم الموظف

 
New Microsoft Excel Worksheet.xlsx