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

أ / محمد صالح

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    4477

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

  • Days Won

    197

 نوع المحتوي 

كل منشورات العضو أ / محمد صالح

  1. أ / محمد صالح
    هذا كود الحط المائل الأحمر Sub diagonal_line() With Selection.Borders(xlDiagonalUp) .LineStyle = xlContinuous .Color = -16776961 .Weight = xlThick End With End Sub المقصود هو وجود خلية بها مثلا التحريري تحت كل مادة بحيث يتم مقارنتها بالدرجة ومقارنة الدرجة بالنهاية الصغرى لكل مادة وهذا موضوع يخص وضع دائر على الطالب الراسب في المادة لأنه أقل من النهاية الصغرى أو أكبر منها ولكنه رسب في تحريري الترم الثاني وموجود في الشهادة ما يدل على ذلك http://www.officena.net/ib/index.php?showtopic=61348
  2. أ / محمد صالح
    بالنسبة للمطلوب لقد دخل في المقارنة متغير غير موجود في صفحة الشهادات لذلك يمكنك: وضع ما يدل على درجة التحريري في الشهادة ويكون مخفيا فلا يمكن طباعته ولكن يستعمل في المقارنة ويوجد في المنتدى كود للدوائر الحمراء ومن السهل وضع كود خط مائل بعد تحقيق المطلوب الأول
  3. أ / محمد صالح
    الفيديو الذي انتظره الكثير والكثير من المبتدئين والمتوسطين والمحترفين في الإكسل ............... الحلقة الرابعة من دورة أساسيات إكسل 2013 من تحت الصفر إلى الاحتراف مشاركتك للموضوع والفيديو مع أصدقائك خير دليل على الرغبة في مواصلة السلسلة حيث أنه قد تسلسل إلى قلبي أن الزملاء لا يرغبون وفيها: التعرف على الخلية والعمود والصف وورقة العمل إضافة وحذف خلية إضافة وحذف وتعديل خيارات العمود إضافة وحذف وتعديل خيارات الصف إضافة وحذف وتعديل خيارات ورقة العمل بعض اختصارات لوحة المفاتيح مع تحياتي أ / محمد صالح فيس بوك http://adf.ly/1EbLvW جوجل بلس http://adf.ly/1DjBfI
  4. أ / محمد صالح
    السلام عليكم أحبتي في الله عذرا أخي ياسر كنت أظن أن تحويل الدالة لكود أمر سهل وخاصة بعد ما عرضت الفكرة وعلى العموم هذا الملف بعد تحويل الدالة لكود حتى تعم الفائدة Mas_Translator2.rar
  5. أ / محمد صالح
    شكرا لجميع الإخوة على المرور الكريم والكلمات العطرة
  6. أ / محمد صالح
    وإياك أخي الكريم توقيعك رائع مشكور من صممه
  7. أ / محمد صالح
    قي السطر الذي يحتوي على الشروط السطر رقم 15 عدل c.Value = "دون المستوى" إلى c.Offset(1, 0).Value = "دون المستوى" وهي لعمل دايرة على الدرجة إذا كان في الصف التالي لها دون المستوى
  8. أ / محمد صالح
    بارك الله فيك أخي عبد الله ولإثراء الموضوع ضع هذه المعادلة في الخلية G3 =IF($B3<>"",DATE(YEAR($C3)+COLUMN(A$1)*5,MONTH($C3),+DAY($C3)),"") وانسخ المعادلة أفقيا ورأسيا كما تريد
  9. أ / محمد صالح
    لا يوجد مشكلة نسخة الأوفيس لديك 2003 يمكنك الغاء تثبيتها وتثبيت اوفيس 2013
  10. أ / محمد صالح
    في توضيحك ذكرت حالة واحدة أين باقي الشروط؟ متى يتم اختيار دائري 1 و 1.5 ومربع 1.2 و 1.5 و 2 ؟؟!!
  11. أ / محمد صالح
    عدد الصفوف والأعمدة في إكسل مرتبط بالإصدار فنسخة إكسل 2003 وما قبلها: عدد الأعمدة 256 عمود وعدد الصفوف 65536 صف ونسخة إكسل 2007 وما بعدها: عدد الأعمدة 16384 عمود وعدد الصفوف 1048576 صف لذا أنصح باستعمال أحدث نسخة من الأوفيس حاليا 2013 ويوجد نسخة 2016 ولكن ما زالت تجريبية
  12. أ / محمد صالح
    تفضل أخي الكريم تم إضافة شرط جديد لمن يكتب له في العمود التالي دورثان30% الدوائر الحمراء2.rar
  13. أ / محمد صالح
    شكرا لمرورك أخي الصقر نفعنا الله وإياكم بما علمنا وعلمنا ما ينفعنا
  14. أ / محمد صالح
    أنت الأجمل أخي إبراهيم وفقنا الله وإياكم لكل ما يحب ويرضى
  15. أ / محمد صالح
    وفيك أخي الكريم الصورة في تعليقك رائعة
  16. أ / محمد صالح
    سعيد بمرورك أخي الفاضل بانتظار الرد بعد التجربة
  17. أ / محمد صالح
    شكرا لمرورك أخي الكريم
  18. أ / محمد صالح
    يمكنك نسخ أو نقل الكود الموجود في حدث form_activate إلى حدث form_open
  19. أ / محمد صالح
    وعليك يا غالي مرورك على موضوعي شرف لي يا أبا آلاء
  20. أ / محمد صالح
    فعلا مفيش مستحيل مع ياسر خليل سعيد بمرورك حبيبي أستاذ ياسر .............. بالنسبة لموضوع تلوين الكود موجود في فيديو سابق https://youtu.be/0yZ6w6p7Yts?t=14m44s
  21. أ / محمد صالح
    بعض ما عندكم بشمهندس ياسر تقبل هزاري؟!! ميزان بالزاي وليست بالذال حبيبي يا هندسة أنا كل ميولي كانت للهندسة بس مكنتش أعرف إن مفيش هندسة في (الأدبي)
  22. أ / محمد صالح
    وإياكم أخي الكريم سعيد بمرورك أستاذ طلعت
  23. أ / محمد صالح
    وإياكم أخي الكريم حمادة وهذا فيديو لشرح استخدام التطبيق وبانتظار رأي الأحباب ممن حملوه وجربوه وفقنا الله وإياكم لكل خير
  24. أ / محمد صالح
    أحبابي في الله زوار وأعضاء ومشرفي وإدارة أوفيسنا يسعدني أن أقدم لأحبابي فيديو جديد ومفيد بإذن الله لعمل نسخ احتياطي لبرنامجك ولكن الجديد أن الملف مضغوط بدون برامج ضغط باستعمال الويندوز ولا ينقصني سوى دعاؤكم لي بالخير ومشاركة أحبابكم هذا الفيديو فزكاة العلم نشره
  25. أ / محمد صالح
    شكرا استاذ محمد بكذا حتى لوفتح الشفت من الخارج كلما فتح البرنامج يرجع القفل ولكن انت نسيت ترفق الــ SetProperties : Function ؟ شكرا لمرورك أخي الكريم أبو خليل يبدو أنني نسيت فعلا تضمين كود دالة setproperties هذا هو Public Function SetProperties(strPropName As String, _ varPropType As Variant, varPropValue As Variant) As Integer On Error GoTo Err_SetProperties Dim DB As DAO.Database, prp As DAO.Property Set DB = CurrentDb DB.Properties(strPropName) = varPropValue SetProperties = True Set DB = Nothing Exit_SetProperties: Exit Function Err_SetProperties: If Err = 3270 Then 'Property not found Set prp = DB.CreateProperty(strPropName, varPropType, varPropValue) DB.Properties.Append prp Resume Next Else SetProperties = False MsgBox "SetProperties", Err.Number, Err.Description Resume Exit_SetProperties End If End Function
×
×
  • اضف...

Important Information

  I accept