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

Ali Mohamed Ali

المشرفين السابقين
  • Posts

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

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

  • Days Won

    304

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

  1. تفضل -يمكنك استخدام هذه المعادلة فى التنسيقات الشرطية =TRIM(MID(B6,IFERROR(FIND("رخام",B6,1)+0,1),9^9))="رخام" تلوين1.xlsx
  2. وعليكم السلام-عليك بإستبدال معادلتك بهذه المعادلة =IFERROR(INDEX($A$2:$A$200,SMALL(IF($D$2:$D$200=$G$2,IF($E$2:$E$200=$H$2,ROW(A$2:A$200)-ROW(A$2)+1)),ROWS($H$5:H5))),"") 1قوائم.xlsx
  3. وعليكم السلام-تفضل شرح قائمة ديفولبر الرائعه Developer Form Controls In Excel Excel Form Control vs. ActiveX Control (7 Differences) Form controls VS Active X controls (Microsoft Excel Video Tutorial)
  4. وعليكم السلام حيرتنى معاك لأن المعادلة الموجودة بالملف تعمل بكل كفاءة ....واذا أردت تغيير قيمة التقسيم يمكنك تغيير الأرقام الموجودة بداية من الخلية AB10 الى ما تشاء وتريد وشكرا
  5. تفضل Sub Test() ActiveSheet.UsedRange.EntireColumn.AutoFit ActiveSheet.UsedRange.EntireRow.AutoFit End Sub أو يمكنك استخدام هذا الكود أيضاً Option Explicit Sub Auto_Fit() Dim sh As Worksheet For Each sh In ThisWorkbook.Worksheets sh.Columns.AutoFit sh.Rows.AutoFit Next sh End Sub مثال.xlsm
  6. تفضل لك ما تريد ... هذا فيديو تعليمى لطلبك مقدم من الأستاذة ساجدة العزاوى لها منا كل المحبة والإحترام ج89 زر امر على اليوزرفورم لفتح ملف اكسل ملف ورد ملف pdf ساجدة العزاوي open word excel userform vba
  7. كان عليك تنفيذ نصيحة استاذنا الكبير سليم .. ولكن بعد اذن استاذ سليم طبعاً يمكنك استخدام هذه الدالة المعرفة لذلك لعد الأرقام داخل الخلية الواحدة Function Mylen(Z As Range) Dim C As Long, Y As Long, A As Long, B As Variant A = 0 For C = 1 To Len(Z) B = Mid(Z, C, 1) For Y = 0 To 9 If Y = B Then A = A + 1 End If Next Next Mylen = A End Function ووضع هذه المعادلة بداية من الخلية D4 سحباً للأسفل =Mylen(F4) أو يمكنك بهذه المعادلة العادية .. وتلك الطريقتين موجودة بالملف =SUM(LEN(F4)-LEN(SUBSTITUTE(F4,{1,2,3,4,5,6,7,8,9,0},))) تسويات - 1.xlsm
  8. بما انك لم تقم برفع ملف فكان عليك لزاماً استخدام خاصية البحث بالمنتدى فبه طلبك - تفضل معادلة جمع مبالغ (10+20+30)=60
  9. أحسنت استاذ فتح وزادك الله من فضله
  10. بارك الله فيك وزادك الله من فضله ورحم الله والديك
  11. الأمر بسيط ولكن كان عليك رفع ملف بالمشاركة مع توضيح للمطلوب بكل دقة ... فليس هناك نجاح لأى مشاركة الا بإحتوائها على ملف اجعل تنسيقات الخلايا كما بالصورة .... وتم عمل ملف لك بالمطلوب 1550.xlsm
  12. وعليكم السلام- يمكنك استخدام هذه المعادلة =IF(S3="","",IF(OR($S3="وليد",$S3="سعيد"),10%,14%)) Test1.xlsx
  13. وعليكم السلام - تفضل اخى الكريم يمكنك عمل ذلك بهذه المعادلة ( معادلة مصفوفة) Ctrl+Shift+Enter =IF(COUNTIF($A$3:$A3,$A3)>1,"",MODE(IF($A$3:$A$900=$A3,$F$3:$F$900))) mode fun1.xlsx
  14. تفضل Office 365 Excel in 15 Mints - شرح الإكسل فى 15 دقيقة للمبتدئين Office365 دورة شرح اوفيس 365 بطريقة سهلة office 365
  15. عمل رائع بارك الله فيك استاذ فتح وجزاك الله خير الثواب
  16. وعليكم السلام-اجعل تنسيق الخلية هكذا ##"0."000"Kg" format cell1.xlsx
  17. تفضل تم تعديل تنسيق التاريخ ويمكنك عمل ذلك بنفسك من خلال تتبع هذه الصورة TEST1.xlsx
  18. تفضل لك ما طلبت final1.xlsx
  19. وعليكم السلام-اهلا بك بالمنتدى ... تفضل لك ما طلبت AA-1-Modified101.xlsm
  20. وعليكم السلام -تفضل هذا من أفضل البرامج للأستاذ محمد الريفى له منا كل المحبة والإحترام برنامج المصروفات - الاصدار الثالث
  21. وعليكم السلام بكل بساطة اجعل نظام الحساب كما بالصورة وليس Manuel
  22. تفضل تم ضبط تنسيق التواريخ بتكست بوكس 9 وتكست بوكس12 داخل فورم3 وفورم4 ... وذلك بإضافة هذان السطران بكلا الفورمين داخل حدث هذا الكود Private Sub TextBox1_Change() TextBox9.Text = Format(TextBox9.Text, "dd/mm/yyyy") TextBox12.Text = Format(TextBox12.Text, "dd/mm/yyyy") AHMAD.xlsm
  23. تفضل اخى الكريم هذه معادلة حساب الأيام =MOD(E4+E6,30) وهذه لحساب الشهور =MOD(F4+F6,12)+QUOTIENT(E4+E6,30) وأخرى لحساب اجمالى السنوات =G4+G6+QUOTIENT(F4+F6,12) وهذا هو ملفك ... بارك الله فيك حساب الترقيات1.xlsx
×
×
  • اضف...

Important Information