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

حسام مصطفي

03 عضو مميز
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    169

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

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

 نوع المحتوي 

مشاركات المكتوبه بواسطه حسام مصطفي

    احتاج تعديل في الكود الخاص باخفاء اعمدة حسب الشهور

    في منتدى الاكسيل Excel

    قام بنشر

    استاذي الجليل / طارق محمود

    بالفعل رووعة الرووعة ويعمل بشكل ممتاز علي الملف المرفق

    وسأقوم بتجربته علي ملفي واخبرك بالنتيجة

     

    ولكن لي طلب بسيط بالنسبة لكم

    ارجو شرح المعادلة المستخدمة هذه حيث انها توفر الكثير والكثير بالفعل

    =IF(OR($B$1="يوليو";$B$1="الاجمالي السنوي");0;SUM(C6:INDIRECT(ADDRESS(6;MATCH($B$1;$A$5:$P$5;0)-1))))

    وهذه المعادلة ايضا

    =SUM(C6:INDIRECT(ADDRESS(6;MATCH($B$1;$A$5:$P$5;0))))

    واعتذر لكثرة طلباتي لكني اريد التعلم بحق

    وارجو منك استاذي ان تشاهد موضوعي الآخر والاجابة علي استفساراتي

    بعنوان  ((  هل للكود حد اقصي في الاسطر والاوامر .. وما هذه الرساله ؟؟  ))

     

    http://www.officena.net/ib/index.php?showtopic=47661

    جزاك الله خيرا

    سلسلة الفارس فى شرح دوال الإكسل ( فيديو ) متجدد

    في منتدى الاكسيل Excel

    قام بنشر

    بسم الله ماشاء الله

    هذا الموضوع كنت ابحث عنه في كل ارجاء الدنيا علي النت

    وها هو بين ايدينا ... وكمان بالعربي ... باروع طريقة لتوصيل المعلومة طريقة الفارس حقا

    فالفارس نبيل في خلقه ونسبه واصله وعلمه

    شكرا لك استاذي الجليل / رجب جاويش

    في انتظار باقي الدروس

    هل للكود حد اقصي في الاسطر والاوامر .. وما هذه الرساله ؟؟

    في منتدى الاكسيل Excel

    قام بنشر

    الاساتذة الافاضل

    كنت قد وضعت موضوع لتعديل كود طويل ويجيب علي الموضوع الاستاذ القدير / طارق محمود

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

    http://www.officena.net/ib/index.php?showtopic=47648

     

    ولكن هذا الموضوع مختلف ولكنه يرتبط بالكود في الموضوع علي الرابط المذكور

    حيث انني قمت بعمل الكود واكماله ليعمل علي عدد 20 صفحة

    ولكن عند حد معين من الاوامر او الاسطر

    ظهرت لي رسالة تفيد بان الماكرو كبير  ... ( هذا هو تفسيري لها )

    واليكم الرسالة  فهي كما يلي

    والسؤال  الآن هو :

    1- هل  للكود حد اقصي في عدد الاسطر والاوامر ؟؟ ام ان ذلك يتعلق باصدار الاوفيس ؟؟ ام ما هو معني هذه الرسالة ؟؟

     

    *** علما بانني قد قمت بتقسيم الكود الي جزئين ووضعت احد الاجزاء في ماكرو ثم قمت بعمل استدعاء

    للجزء الآخر في نهاية الكود الاساسي باستخدام عبارة  CALL Macro1

    وقد عمل الكود بالشكل المطلوب تماما دون اي مشكلات ... مما يوضح ان ليس بالكود اي خطأ يذكر الا طول الكود

     

     

    2- هل طول الكود يؤثر علي طريقة عمله فيما بعد ام انه مادام يعمل بكفاءة وكما هو مطلوب منه ؟ 

    فلا خوف منه اوقلق علي الملف ... ارجو الافادة

     

    وارجو المعذرة حيث ااني طالب علم واريد ان انهل من بحر علمكم ... اعتذر عن الاطاله

     

    adjPb.jpg

     

     

    احتاج تعديل في الكود الخاص باخفاء اعمدة حسب الشهور

    في منتدى الاكسيل Excel

    قام بنشر

    الاستاذ القدير جدا / طارق محمو

    اولا اشكر لسيادتكم سرعة استجابتكم لطلبي انا تلميذكم الصغير

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

    اعتقد انه قد حدث خطأ في ارفاق الملف

     

    ولكني عند تطبيق الكود علي ملفي المرفق ظهر لدي خطأ اليط صورته استاذي

    اعتذر عن كثرة الطلبات

    جزاك الله خيرا

     

    Qz40Y.jpg

    احتاج تعديل في الكود الخاص باخفاء اعمدة حسب الشهور

    في منتدى الاكسيل Excel

    قام بنشر

    الاساتذة الافاضل

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

    وقمت انا بعمل الكود لاخفاء الاعمدة ولكن كما سترون في الكود سيكون الكود طويلا جدا

    فانا اريد كود مختصر ليجعل التنفيذ اسهل ... والكود بالفعل يعمل بالطريقة التي اريدها تماما ... ولكن ما يتعبني فيه

    طول الكود حيث قمت بعمله لعدد 2 شيت وكان طويل جدا فما بالكم بعدد 20 شيت

    ===============

    شرح آليه الكود

    عند فتح الملف يظهر فورم اختار منه الشهر من شهور السنة

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

    ويتم ذلك في كل الصفحات والتي عددها 20  شيت

    ===============

    ارجو منكم وضع كود اسهل واقصر لتنفيذ المطلوب ام ان الكو يعمل بالشكل الطبيعي ولا يمكن تغييره

    اليكم الكود ثم الملف المرفق

    الرقم السري لحماية الاوراق : 1

    
Private Sub CommandButton1_Click()
On Error Resume Next
    For i = 3 To Sheets.Count
        Sheets(i).Select
        ActiveSheet.Unprotect ("1")
    Next i

Sheets("Sheet1").Range("B1").Value = ComboBox1.Value
Application.ScreenUpdating = False
'=========
'اكواد لاظهار كافة الاعمدة اولا قبل اخفاء المطلوب
'ويجب وضعها باسم كل صفحة كما يلي
'=========
Sheets("ta3lem").Select
    Columns("B:U").Select
    Selection.EntireColumn.Hidden = False

Sheets("Amnn").Select
Columns("B:U").Select
    Selection.EntireColumn.Hidden = False

'************************
'اكواد لاخفاء الاعمدة حسب الشهر المطلوب
'ويتم وضعها لكل شهر في كل حساب او ورقة
'=========
If Sheets("Sheet1").Range("B1").Value = "يوليو" Then
    Sheets("ta3lem").Select
    Columns("D:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:O").Select
    Selection.EntireColumn.Hidden = True
    Columns("P:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:R").Select
    Selection.EntireColumn.Hidden = True
    Columns("S:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "اغسطس" Then
    Sheets("ta3lem").Select
    Columns("E:N").Select
    Selection.EntireColumn.Hidden = True
     Columns("C:C").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:O").Select
    Selection.EntireColumn.Hidden = True
    Columns("P:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:R").Select
    Selection.EntireColumn.Hidden = True
    Columns("S:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "سبتمبر" Then
    Sheets("ta3lem").Select
    Columns("C:D").Select
    Selection.EntireColumn.Hidden = True
     Columns("F:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "اكتوبر" Then
    Sheets("ta3lem").Select
    Columns("C:E").Select
    Selection.EntireColumn.Hidden = True
     Columns("G:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "نوفمبر" Then
    Sheets("ta3lem").Select
    Columns("C:F").Select
    Selection.EntireColumn.Hidden = True
     Columns("H:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "ديسمبر" Then
    Sheets("ta3lem").Select
    Columns("C:G").Select
    Selection.EntireColumn.Hidden = True
     Columns("I:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "يناير" Then
    Sheets("ta3lem").Select
    Columns("C:H").Select
    Selection.EntireColumn.Hidden = True
     Columns("J:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "فبراير" Then
    Sheets("ta3lem").Select
    Columns("C:I").Select
    Selection.EntireColumn.Hidden = True
     Columns("K:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "مارس" Then
    Sheets("ta3lem").Select
    Columns("C:J").Select
    Selection.EntireColumn.Hidden = True
     Columns("L:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "ابريل" Then
    Sheets("ta3lem").Select
    Columns("C:K").Select
    Selection.EntireColumn.Hidden = True
     Columns("M:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "مايو" Then
    Sheets("ta3lem").Select
    Columns("C:L").Select
    Selection.EntireColumn.Hidden = True
     Columns("N:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "يونيو" Then
    Sheets("ta3lem").Select
    Columns("C:M").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
If Sheets("Sheet1").Range("B1").Value = "الاجمالي السنوي" Then
    Sheets("ta3lem").Select
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If

'***********************************************
'***********************************************
If Sheets("Sheet1").Range("B1").Value = "يوليو" Then
    Sheets("Amnn").Select
    Columns("D:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:O").Select
    Selection.EntireColumn.Hidden = True
    Columns("P:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:R").Select
    Selection.EntireColumn.Hidden = True
    Columns("S:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "اغسطس" Then
    Sheets("Amnn").Select
    Columns("E:N").Select
    Selection.EntireColumn.Hidden = True
     Columns("C:C").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:O").Select
    Selection.EntireColumn.Hidden = True
    Columns("P:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:R").Select
    Selection.EntireColumn.Hidden = True
    Columns("S:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "سبتمبر" Then
    Sheets("Amnn").Select
    Columns("C:D").Select
    Selection.EntireColumn.Hidden = True
     Columns("F:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "اكتوبر" Then
    Sheets("Amnn").Select
    Columns("C:E").Select
    Selection.EntireColumn.Hidden = True
     Columns("G:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "نوفمبر" Then
    Sheets("Amnn").Select
    Columns("C:F").Select
    Selection.EntireColumn.Hidden = True
     Columns("H:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "ديسمبر" Then
    Sheets("Amnn").Select
    Columns("C:G").Select
    Selection.EntireColumn.Hidden = True
     Columns("I:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "يناير" Then
    Sheets("Amnn").Select
    Columns("C:H").Select
    Selection.EntireColumn.Hidden = True
     Columns("J:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "فبراير" Then
    Sheets("Amnn").Select
    Columns("C:I").Select
    Selection.EntireColumn.Hidden = True
     Columns("K:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "مارس" Then
    Sheets("Amnn").Select
    Columns("C:J").Select
    Selection.EntireColumn.Hidden = True
     Columns("L:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "ابريل" Then
    Sheets("Amnn").Select
    Columns("C:K").Select
    Selection.EntireColumn.Hidden = True
     Columns("M:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "مايو" Then
    Sheets("Amnn").Select
    Columns("C:L").Select
    Selection.EntireColumn.Hidden = True
     Columns("N:N").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'=============
If Sheets("Sheet1").Range("B1").Value = "يونيو" Then
    Sheets("Amnn").Select
    Columns("C:M").Select
    Selection.EntireColumn.Hidden = True
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
If Sheets("Sheet1").Range("B1").Value = "الاجمالي السنوي" Then
    Sheets("Amnn").Select
    Columns("O:P").Select
    Selection.EntireColumn.Hidden = True
    Columns("R:S").Select
    Selection.EntireColumn.Hidden = True
    Range("A5").Select
    Sheets("Sheet1").Select
    Range("A1").Select
End If
'****************************************
'****************************************
On Error Resume Next
    For i = 4 To Sheets.Count
        Sheets(i).Select
        [c6:n3285].Locked = False
        ActiveSheet.Protect "1", True, True
    Next i
 
'=============
Application.ScreenUpdating = True
Sheets("Sheet1").Select
End
End Sub

    اعتذر عن الاطاله ولكني احببت توضيح الصورة لكم كما اراها واريدها انا تلميذكم الصغير جدا

     

     

     

    Copy of sssssss.rar

    • Like 1

    كيف يمكنني عمل زر حفظ كالموجود بالقوائم ؟؟

    في منتدى الاكسيل Excel

    قام بنشر

    الف مليون شكر للاساتذة الكبار

    فهو شرف كبير لي ان يجتمع استاذين كبيرين في موضوع لي

    الاستاذ القدير / حمادة عمر

    الاستاذ القدير / رجب جاويش

    والموجود معنا دائما بروائعة القدير / خبور خير

    جزاكم الله خيرا

    كيف يمكنني عمل زر حفظ كالموجود بالقوائم ؟؟

    في منتدى الاكسيل Excel

    قام بنشر

    كيف يمكنني عمل زر حفظ ليقوم بنفس وظيفة الزر الموجود بالقوائم  في الاكسيل

    وهل يمكن عمل هذا الزر في صفحة الاكسيل وان كان ذلك ممكنا

    فاطمع في معرفة ان كان ذلك ممكنا ايضا من خلال زر في فورم

     

    ام ان هذه الاوامر خاصة بالاكسيل نفسه ولايتم التخل فيها

     

    جزاكم الله خيرا

    • Like 1

    تحديث الية الترقيات

    في المنتدى المفتوح

    قام بنشر

    اتفق مع الاستاذ / ضاحي

    في رأيه ولكن اري ان يتم ذلك بعد الوصول الي اول درجه في الترقيات

    اي بعد عدد 100 مشاركه ليعطي ذلك ايضا حافزا اكثر  ( عضو * )

    لزيادة المشاركه ... حيث هناك الكثيرين ومنهم انا  عندما دخلت للمنتدي

    كنت اظن انني اعرف معظم برنامج الاكسيل ولكن بدخولي للمنتدي ومعرفتي بموضوع الاكواد وطريقتها

    اصبحت مبتدئ جدا في الاكسيل

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

    وبعد ذلك يمكنني ان احصل علي بعض النقاط التي يقصدها اخي / ضاحي ... ليتم ترقيتي مثلا

    وكل هذا برغم عدد مشاركاتي القليله ولكني دائم التواجد والتعلم من المنتدي واعمال اساتذته

    جزاكم الله خيرا

    طريقة عمل فورم فاتورة ووضع اكوادها وترحيلها واستدعائها وطباعتها !! خطوة خطوة

    في منتدى الاكسيل Excel

    قام بنشر · تم تعديل بواسطه حسام مصطفي

    الاستاذ المبدع الخلوق / حمادة عمر

     

    يا لروووعة مواضيعك واعمالك

    تقدم لنا دائما كل ما نحتاجه عن جد دون ان نطلبه

    فهذا المواضيع سيكون من افضل المواضيع في المنتدي علي الاطلاق

    اعانك الله علي اكماله

    شرح راائع وطريقتك اروع

    وسأكون من اول المتابعين للموضوع مشاركة مشاركة ودرس درس

    والشكر موصول للاستاذ القدير / عبد الله باقشير

    جزاكم الله خيرا

    طلب مساعدة في الغاء الارتباطات المزعجة في الملف لدي

    في منتدى الاكسيل Excel

    قام بنشر

    لدي ملف قمت بنسخ صفحات فيه من ملف آخر وكلما قمت بفتحه يطلب مني تحرير الارتباطات

    وانا لا اريد اي ارتباطات في الملف فقد كنت انسخ بعض الصفحات التي احتاجها في الملف الجديد بدلا من كتابتها مرة اخري

    هل من طريقة لانهاء هذه المشكلة ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

    ومعذرة لم يمكنني رفع الملف

     

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

    في منتدى الاكسيل Excel

    قام بنشر

    الف مليون مبرووك

    للقدير / احمد عبد الناصر

    الاستاذ / عمرو

    ترقية مستحقة

     

     

    واضم صوتي لصوت الاخ / هاني

    بالنظر في ترقية

    الاستاذ القدير المبدع /  حمادة عمر ... شعلة المنتدي

    الاستاذ ملك المعادلات / جمال عبد السميع ... محمود لي

×
×
  • اضف...

Important Information

  I accept