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

Ali Mohamed Ali

أوفيسنا
  • Content Count

    4,467
  • تاريخ الانضمام

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

  • Days Won

    167

Ali Mohamed Ali last won the day on مايو 19

Ali Mohamed Ali had the most liked content!

السمعه بالموقع

5,645 Excellent

عن العضو Ali Mohamed Ali

  • الإسم الفعلي
    فريق الموقع

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    Accountant
  • البلد
    Egypt
  • الإهتمامات
    accounting

اخر الزوار

6,167 زياره للملف الشخصي
  1. وعليكم السلام-يمكنك فقط استخدام هذه المعادلة =IFERROR(VLOOKUP(G3,$A$3:$C$200,3),"") قائمة تسديد 1TEST.xlsx
  2. وعليكم السلام -اجعل المعادلة هكذا =IFERROR(E12-E13,"") معادلة1.xlsx
  3. اجعل الأرقام فى المعادلة داخل علامة التنصيص "" =IF(I1="1","القاهرة",IF(I1="2","الإسكندرية",IF(I1="3","بورسعيد",IF(I1="4","السويس",IF(I1="11","دمياط",IF(I1="12","الدقهلية",IF(I1="13","الشرقية",IF(I1="14","القليوبية",IF(I1="15","كفر الشيخ",IF(I1="16","الغربية",IF(I1="17","المنوفية",IF(I1="18","البحيرة",IF(I1="19","الاسماعيلية",IF(I1="21","الجيزة",IF(I1="22","بنى سويف",IF(I1="23","الفيوم",IF(I1="24","المنيا",IF(I1="25","اسيوط",IF(I1="26","سوهاج",IF(I1="27","قنا",IF(I1="28","أسوان",IF(I1="29","الأقصر",IF(I1="31","البحر الاحمر",IF(I1="32","الوادى الجديد",IF(I1="33","مطروح",IF(I1="34","شمال سيناء",IF(I1="35","جنوب سيناء",IF(I1="88","خارج الجمهورية","0")))))))))))))))))))))))))))) الرقم القومى.xlsx
  4. تفضل هذا بحث اخر بالإسم ولا يمكن ان يكون هناك اكثر من بند للبحث فى وقت واحد Search by Name.xlsx
  5. بعد اذن استاذ سليم -تفضل تم عمل قائمة منسدلة لعمود ID حتى لا يكون هناك امكانية للخطأ عند كتابة الرقم وبالتالى يتم جلب البيانات بصورة صحيحة , ويمكنك استخدام هذه المعادلة =IFERROR(VLOOKUP($A5,Sheet1!$A$2:$K$1700,MATCH(B$4,Sheet1!$A$1:$K$1,0),0),"") Vlookup.xlsx
  6. تفضل تم عمل المطلوب اضافة الى عمل كود لتكست بوكس1 ليتم كتابة السريال تلقائى دون تدخل منك rr1.xlsm
  7. وعليكم السلام-يمكنك استخدام المعادلة بهذه الطريقة =SUMIFS('1'!$C:$C,'1'!$A:$A,$A3,'1'!$B:$B,$B3) دالة sumifs 1مع الفلترة.xlsx
  8. اخى الكريم ما هو سبب غضبك ؟!!! اليس هذا ما تريد .... فقط اجعل التنسيق هكذا [$-2000000]#,##0
  9. وعليكم السلام-تفضل ............ وهذه الصورة توضح كيفية عمل قائمة منسدلة TEST-STORE1.xlsx
  10. بعد اذن استاذنا سليم ولإثراء الموضوع ,,فهذا حل ايضا بمعادلة المصفوفة =IFERROR(INDEX(ورقة1!$C:$C,SMALL(IF(ورقة1!$B:$B=A$2,ROW(A$2:A$5000)-ROW(A$2)+1),ROWS($A$5:A5))),"") المشاريع1.xlsx
  11. منا ومنكم سائر الأعمال ان شاء الله يمكنك هذا بمعادلة المصفوفة =IFERROR(INDEX(Data!$A:$A,SMALL(IF(Data!$C:$C=$C$1,ROW(A$2:A$5000)-ROW(A$2)+1),ROWS($A$3:A3))),"") Data_HR2.xls
  12. ولإثراء الموضوع فهذا كود من اعمال الأستاذ الكبير سليم حاصبيا له منا كل المحبة والإحترام Option Explicit Sub creat_shett() Dim i%, t, m% Dim x%: x = Application.CountA(Sheets("اسماء الصفحات").Range("A:A")) + 1 For i = 3 To x t = Sheets("اسماء الصفحات").Range("a" & i) On Error Resume Next m = Len(Sheets(t).Name) On Error GoTo 0 If m = 0 Then '===========================================================' Sheets("Home").Copy After:=Sheets(Sheets.Count) With ActiveSheet .Name = Sheets("اسماء الصفحات").Range("a" & i) .Range("a1") = .Name End With '===========================================================' End If m = 0 Next Sheets("اسماء الصفحات").Select End Sub Sheets List.xlsm
  13. يمكنك استخدام هذا الكود لذلك Sub SelectPrintArea() Dim PrintThis As Range ActiveSheet.PageSetup.PrintArea = "" Set PrintThis = Application.InputBox _ (Prompt:="Select the Print Range", Title:="Select", Type:=8) PrintThis.Select Selection.Name = "NewPrint" ActiveSheet.PageSetup.PrintArea = "NewPrint" ActiveSheet.PrintOut End Sub Print.xls
  14. شوفت ان الملف مهم ازاى هذه الخلايا كان تنسيقها نص وليس عام او رقم فتم تعديل تنسيق الخلايا الى عام-تفضل 55 (2).xlsx
×
×
  • اضف...