بحث مخصص من جوجل فى أوفيسنا
![]()
Custom Search
|

محمد سامر
02 الأعضاء-
Posts
59 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو محمد سامر
-
جزاك الله خيرا ......سلمت يداك
-
السلام عليكم ورحمة الله وبركاته هل يوجد كود يمنع استخدام CTRL+P في صفحة العمل
-
هل يمكن استبدال الدوائر الحمراء التي بهذا الملف بعلامه مائله على الرقم مثل هذه : / وهذا الملف به الدوائر الحمراء 070-Draw & Remove Red Circles Tutorial YasserKhalil.rar
-
بالفعل حاولت اطبق كود الدوائر عليه لكنه لم ينجح معي Sub DrawRedCircles() Dim myArray As Variant Dim Rng As Range Dim Cel As Range Dim Cell As Range Dim L As Long Dim T As Long Dim W As Long Dim H As Long Dim X As Long Dim rRow As Long Dim startRow As Long 'ãÕÝæÝÉ ÈÃÓãÇÁ ÇáÃÚãÏÉ ÇáãÑÇÏ æÖÚ ÏæÇÆÑ ÍãÑÇÁ ÈåÇ myArray = Array("H", "K", "N") 'ÑÞã ÇáÕÝ ÇáÐí íÍÊæí Úáì ÏÑÌÇÊ ÇáäåÇíÉ ÇáÕÛÑì rRow = 3 'ÕÝ ÇáÈÏÇíÉ Ãí Ãæá ÕÝ Èå ÏÑÌÇÊ ÇáØáÇÈ startRow = 4 Application.ScreenUpdating = False Call RemoveCircles With Sheets("Sheet1") For X = LBound(myArray) To UBound(myArray) Set Cel = .Range(myArray(X) & rRow) Set Rng = .Range(myArray(X) & startRow, .Range(myArray(X) & startRow).End(xlDown)) For Each Cell In Rng If Cell.Value < Cel Or Cell.Value = "Û" Then L = Cell.Left: T = Cell.Top W = Cell.Width: H = Cell.Height With .Shapes.AddShape(msoShapeOval, L, T, W, H) .Fill.Visible = msoFalse .Line.ForeColor.RGB = RGB(255, 0, 0) .Line.Transparency = 0 .Line.Weight = 1.5 End With End If Next Cell Next X End With Application.ScreenUpdating = True End Sub
-
السلام عليكم ورحمة الله وبركاته اريد وضع علامات مائله على ارقام معينه بالضغط على الزر هل من مساعده في ذلك!!! علامات.rar
-
-
جزاك الله خيرا لكني اريد التنفيذ بدون انشاء جدول جانبي!!! فهل يوجد حل عن طريق كود مثلا؟؟ لو الإجابه لا يوجد حل !!ابلغني بالله عليك!!
-
السلام عليكم ورحمة الله وبركاته بالله عليكم ضروري جدااااااااااااااا اريد تشغيل Scroll Bars في الملف المرفق ولكن بكود !! لأني لا اريد عمل جدول اخر جانبي لتشغيله؟؟؟ وجزاكم الله خيرا 1.xlsx
-
السلام عليكم ورحمة الله وبركاته،، هل يوجد كود لإلغاء استخدام زر ( ESC ) الموجود بلوحة المفاتيح،عند استخدام ملف اكسل وذلك في جميع الأوراق؟؟؟
-
جزاك الله خيرا استاذ محمد.....نفع الله بك في كل خير
-
سلمت يداك اخي.....حماك الله من كل سوء..... هذا هو المطلوب 100 % ممكن أخي شرح مبسط للكود اللي حضرتك استخدمته حتي يتسنى لي استخدامه بعد ذلك؟؟؟؟اكون شاكر لحضرتك؟؟
-
يوجد طلب اخير اخي الكريم .... عند وضع اي قيمه خارج الجدول أو داخله يتم حسابها مكرره....انا اريدها داخل الجدول فقط...هل يوجد حل لذلك؟؟؟؟؟
-
جزاك الله كل خير اخي الكريم هذا هو المطلوب....بارك الله فيك
-
السلام عليكم ورحمة الله وبركاته استخدمت كود لعدم التكرار ولكنه يعمل في عمود واحد فقط... وعندي ثلاث مجموعات.. واريد عدم التكرار في الثلاث مجموعات مرتبطين ببعضهم البعض. بمعنى((( عند ادخال قيمه في المجموعه رقم 2 ... وهي مكرره في المجموعه رقم 1..... يقوم بإعطائي رساله بأنها مكررة وهكذا في الثلاث مجموعات عدم التكرار في ثلاث اعمدة مختلفين.rar
-
جزاك الله خيرا!!!! ...تم عملها بفضل الله...ثم توجيهات ولمسات حضراتكم...
-
شاكر حضرتك على الرد؟؟؟؟ لكن المطلوب لم يصلك؟؟؟ الخليه ((I12)) ،،، والخلية ((J12))) حضرتك نسيتهم خاااالص؟؟؟ هما اللي فيهم الشغل كله؟؟؟في اول الملف بالموضوع
-
جزاك الله خيرا على المعادله الجميله ،،،،لكن لم تفلح معي ،،، ممكن الاطلاع على هذا الملف لبيان المطلوب اكثر،، المقارنه بين مجموعين.rar
-
وهذا الملف يوضح المطلوب اكثر؟؟؟؟؟ المقارنه بين مجموعين.rar
-
التقدير كالأتي أخي: اذا كانت الدرجة الكلية من (( 100))___: من (50) الى (64) مقبول ،،،ومن (65) إلى (74) جيد ،،،ومن ( 75) إلى (84) جيد جدا ،،، ومن (85) إلى (100) ممتاز.. ملحوظه :: لو حصل على درجة أكبر من (64) يتم نزوله تلقائي لأول درجة المقبول وهي (64)...بمعنى : لو حصل على( 90) مثلا ينزل ل(64)وهكذا،،،،لكن لو حصل على درجة أقل من (64) تبقى كما هي على حسب تقديرها...مقبول---- ضعيف---ضعيف جدا..هذه هي الحالة الأولى اذا كانت درجة الإختبار من (100). الحالة الثانية: اذا كانت الدرجة الكلية من (( 150))___: من (75) الى (97) مقبول ،،،ومن (98) إلى (112) جيد ،،،ومن ( 113) إلى (127) جيد جدا ،،، ومن (128) إلى (150) ممتاز. لو حصل على درجة أكبر من (97) يتم نزوله تلقائي لأول درجة المقبول وهي (97)...بمعنى : لو حصل على( 120) مثلا ينزل ل(97)وهكذا،،،،لكن لو حصل على درجة أقل من (97) تبقى كما هي على حسب تقديرها...مقبول---- ضعيف---ضعيف جدا..هذه هي الحالة الثانية اذا كانت درجة الإختبار من (150).
-
السلام عليكم ورحمة الله وبركاته،،، بدي المساعدة في هذا الملف المرفق.... - وذلك بتغيير الدرجة الكلية ل (( 100 ))) فيتم نزولها تلقائي ل ((64)) اذا كانت اكبر من ((( 64))،،......... - ووعند تغييرها ايضا ل ((150))) فيتم نزول الدرجة تلقائي ل (( 79)) اذا كانت اكبر من ((79)) وجزاكم الله خيرا درجة2.rar
-
معيار الرسوب هو ((( غ)) أو ((( ح ))) أو (((ض))) أو ( ض جـ))) ومعناهم (( غياب- محروم-ضعيف -- ضعيف جدااا)) كل مادة قي الجدول المرفق مكتوب اسفلها درجتها العظمى...يعني مثلا :: لو المادة من 100 درجة ((( أقل من 48 يبقى (ض).)) يعني راسب فيها. بمعنى اي طالب جايب 100/47 فما تحت راسب في هذه المادة... والمادة التي من 150 درجة((( أقل من 72 يبقى (ض).....بمعنى اي طالب جايب 150/71 فما تحت راسب في هذه المادة... والمادة التي من 400 درجة((( أقل من 192 يبقى (ض).....بمعنى اي طالب جايب 150/191 فما تحت راسب في هذه المادة... ----- حرف (غ) و ( ح ) له تأثير على النتيجة .. من عنده احدهم يعتبر راسب في هذه الماده..
-
السلام عليكم ورحمة الله وبركاته ،،، أرحو الإفادة : - اذا زادت عدد مواد الرسوب عن مادتين؟؟؟ يتم الكتابه في خانة الملاحظات راسب... - اذا كانت مادة او مادتين ؟؟ يكتب لي في خانة الملاحظات منقول بمادة او مادتين.... وجزاكم الله خيرا Rosob.rar
-
شرف لي ان اكون بينكم اخي الفاضل!!!! بارك الله فيك شرح وافي وكافي....جزيت كل خير
-
السلام عليكم ورحمة الله وبركاته،،، اخي الفاضل....صدقاً انا فضلت من امبارح حتى الأن احاول اعرف كيف سويت هذا الملف والتعديل عليه سواء بالألوان أو تغيير الحروف لكن ما عرفت؟؟؟دخلت على كل القوائم ... ومحرر الأكواد... لكن بدون نتيجة؟؟؟ لذا فضلا وليس امر .....اريد بعد اذن حضرتك معرفة كيف سويت هذا الملف؟؟؟