اذهب الي المحتوي
أوفيسنا

Ali Mohamed Ali

المشرفين السابقين
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    11,634

  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    289

 نوع المحتوي 

كل منشورات العضو Ali Mohamed Ali

  1. Ali Mohamed Ali
    السلام عليكم وذلك من خلال هذه المعادلة بداية من الخلية P2 =IFERROR(INDEX($A$2:$A$550,AGGREGATE(15,6,ROW($A$1:$A$302)/(MATCH($A$2:$A$550&$B$2:$B$550&$C$2:$C$550,$A$2:$A$550&$B$2:$B$550&$C$2:$C$550,0)=ROW($A$1:$A$302)),ROWS($2:2))),"") Book2.xlsx
  2. Ali Mohamed Ali
    تفضل يمكنك استخدام هذا الكود Sub AddBlankRows() Dim iRow As Integer, iCol As Integer Dim oRng As Range Set oRng = Range("b1") iRow = oRng.Row iCol = oRng.Column Do If Cells(iRow + 1, iCol) <> Cells(iRow, iCol) Then Cells(iRow + 1, iCol).EntireRow.Insert shift:=xlDown iRow = iRow + 2 Else iRow = iRow + 1 End If Loop While Not Cells(iRow, iCol).Text = "" End Sub MM.xlsm
  3. Ali Mohamed Ali
    وعليكم السلام-لابد وان تكون المعادلة هكذا ="@"&INDEX(SheetNames,ROW()-1) ومن ثم فعليك إضافة هذه العلامة @ لكل أسماء صفحات الملف حتى تعمل معادلة Indirect بكفاءة
  4. Ali Mohamed Ali
    وعليكم السلام-تفضل لك ما طلبت ـ تــم ترجمة ملفك الأرباح والخسائر.xls
  5. Ali Mohamed Ali
    تفضل لك ما طلبت استفسار1.xlsx
  6. Ali Mohamed Ali
    وعليكم السلام- اخى الكريم من فضلك فقد نبهنا على هذا الأمر كثيراً ان لا تقوم برفع اى مشاركة الا بعد استخدام خاصية البحث بالمنتدى ولم تجد المطلوب ... ولكن طلبك تكرر كثيراً بالمنتدى -تفضل مشكلة في اللغة العربية
  7. Ali Mohamed Ali
    وعليكم السلام-يمكنك استخدام هذا الكود لطلبك Sub Hide() Dim ws As Worksheet For Each ws In ActiveWorkbook.Worksheets If ws.Name <> "Sheet4" And ws.Name <> "Sheet5" Then ws.Rows("10:15").EntireRow.Hidden = Not ws.Rows("10:15").EntireRow.Hidden End If Next End Sub كود لإخفاء الصفوف واظهارها.xlsm
  8. Ali Mohamed Ali
    بارك الله فيك استاذ جعفر وزادك الله من فضله
  9. Ali Mohamed Ali
    تفضل كان عليك التركيز فهذا الموضوع تكرر معك كثيراً -يمكنك استخدام هذه المعادلة =SUMIFS($C:$C,$B:$B,$G8,$D:$D,$J$7) حساب سيارة مشتركة بين موقعين1.xls
  10. Ali Mohamed Ali
    وعليكم السلام-لك ما طلبت مثال1.xlsx
  11. Ali Mohamed Ali
    تفضل Lease IFRS 50.xlsx
  12. Ali Mohamed Ali
    بارك الله فيك استاذ سليم والله عندك حق وبعد اذنك -تفضل اخى ابو اياد ... هذا البرنامج الممتاز ولكن عليك بتوليفه لطلباتك فلا أحد يمتلك الوقت لتلبية كل طلباتك كما أوضح لك استاذنا الكبير سليم حاصبيا سلفاً كلمة المرور لدخول البرنامج : لا اله الا الله برنامج مبيعات ومشتريات مجاني كلمة السر لا اله الا الله.xlsm
  13. Ali Mohamed Ali
    ان تفضلت بمشاهدة الفيديو الموجود بالرابط أو قمت بتحميل الملف لوجدت ان البرنامج يخص جمهورية مصر العربية .... وشكراً لك
  14. Ali Mohamed Ali
    وعليكم السلام-كان عليك استخدام خاصية البحث بالمنتدى-تفضل برنامج مجاني علي الاكسيل لاقرار ضريبة القيمة المضافة وهذا نموذج أخر نموذج_ضريبة_القيمة_المضافة_في_السعودية.xlsx
  15. Ali Mohamed Ali
    وعليكم السلام-بسيطة اجعل المعادلة بالخلية F42 بالجدول الأول هكذا , ويجب عليك تعميم هذه المعادلة على باقى الجداول -تفضل =IF(SUM(F9:F39)>26,26,SUM(F9:F39)) 1رواتب واجور2021 - يناير.xlsx
  16. Ali Mohamed Ali
    مبروك الأستاذ محي الدين ابو البشر إنضمامك لعائلة الخبراء ,أسأل الله لك التوفيق والنجاح دائما ..وأعانك الله على هذه المسئولية الجديدة وسدد الله خطاك عن حق وجدارة بارك الله فيك وزادك الله من فضله
  17. Ali Mohamed Ali
    وعليكم السلام-تقريباً نفس الطلب استاذ أحمد ولذلك ليس هناك داعى لرفع مشاركة جديدة ومنفصلة .تم دمج واضافة المشاركة الجديدة هنا أيضاً ... أعتقد ان الموضوع ليس بالصعب , كان عليك تعلم وعمل ذلك بنفسك -تفضل =IFERROR(EDATE($E2,$D2*12-$F2),"") وتم أيضاً ضبط معادلة العمود D على ان تكون هكذا =IF(C2="","",IF(C2<=5,5,4)) test3.xlsx
  18. Ali Mohamed Ali
    وعليكم السلام-بسيطة - تفضل =EDATE($C5,12-$D5) test2.xlsx
  19. Ali Mohamed Ali
    وعليكم السلام-يمكنك استخدام هذه المعادلة لطلبك =EDATE($C5,$D5*12-$E5) test1.xlsx
  20. Ali Mohamed Ali
    وعليكم السلام-استخدم هذه المعادلة ( معادلة مصفوفة) =IFERROR(INDEX(التسعير!$G$4:$J$1100,MATCH(1,IF(التسعير!$D$4:$D$1100=$E2, IF($F2>=التسعير!$E$4:$E$1100,IF($F2<=التسعير!$F$4:$F$1100,1))),0),MATCH($G2,التسعير!$G$3:$J$3,0)),"") 1المبيعات.xlsm
  21. Ali Mohamed Ali
    وعليكم السلام-يمكنك استخدام هذه المعادلة =SUMIFS($B:$B,$A:$A,"<="&EOMONTH($D2,0),$A:$A,">="&$D2) 1SUM.xlsm
  22. Ali Mohamed Ali
    وعليكم السلام-أهلاً بك فى المنتدى -يمكنك استخدام هذه المعادلة لحساب التأخير =IF($D10<$M$12,"",(D10-$M$12)) وهذه لحساب الإضافى =IF(F10=0,"",IF($E10<$M$13,0,$E10-$M$13)) وتم وضع المعادلات بالجدول الأول , فعليك بتعميم هذه المعادلات بباقى الجداول رواتب واجور2021 - يناير.xlsx
  23. Ali Mohamed Ali
    بارك الله فيك وزادك الله من فضله
  24. Ali Mohamed Ali
    وعليكم السلام - يمكنك ذلك بهذه المعادلة =IF(RIGHT($A2,2)=C$1,TRIM(MID(SUBSTITUTE(C$1&$A2,C$1,REPT(" ",50)),COLUMN(A1)*50,50)),"") Book1.xlsx
  25. Ali Mohamed Ali
    تفضل بعد اذن جميع الأساتذة الملف1.xlsx
×
×
  • اضف...

Important Information

  I accept