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

الردود الموصى بها

قام بنشر

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

لو تكرمت زدني علما او اكتبها لاني مبتدئ

=Kh_Mustowa((G6/$G$4)*100;E6;$E$4)

هل تقصد ازاله الاقواس في هذا لجزء

ام في هذا الجزء

Function Kh_Mustowa(MyVal As Variant, Optional خلية_ربع_الدرجة, Optional ربع_الدرجة) As String
    If IsError(خلية_ربع_الدرجة) Or IsError(ربع_الدرجة) Then GoTo 1
    
    If (IsNumeric(خلية_ربع_الدرجة) And IsNumeric(ربع_الدرجة) And خلية_ربع_الدرجة < ربع_الدرجة) Or _
         خلية_ربع_الدرجة = "غ" Or خلية_ربع_الدرجة = "غـ" Then
         Kh_Mustowa = "دون المستوى": Exit Function
    End If
1:
    If MyVal < 0 Then Kh_Mustowa = "أقل من 0 مرفوض"
    If MyVal >= 0 Then Kh_Mustowa = "دون المستوى"
    If MyVal >= 50 Then Kh_Mustowa = "مقبول"
    If MyVal >= 65 Then Kh_Mustowa = "جيد"
    If MyVal >= 75 Then Kh_Mustowa = "جيد جدا"
    If MyVal >= 85 Then Kh_Mustowa = "ممتاز"
    If MyVal > 100 Then Kh_Mustowa = "اكبر من 100 مرفوض"
End Function

الله يجزيك الخير انا ربنا رازقني بيك

قام بنشر

ربنا يجزيك الخير .. يارب تمام 

للاستاذ المحترم عبد السلام والاستاذ الكبير ياسر

لي رجاء تقول  لي ايه كانت المشكله ؟ ليه ما إشتغلتش معايا

 

  • Like 1
قام بنشر

أخي العزيز عبد السلام

يبدو أن كلامك صحيح بدليل أنه عندما قمنا بحذف العلامة _ تم حل المشكلة ، ولكن أعتقد ليست هذه المشكلة لأنه لدي الكثير من الدوال المعرفة وبها هذه العلامة وتعمل بشكل جيد

قد يكون السبب وجود متغيرات باللغة العربية بها نفس العلامة - يبقى مجرد احتمال ...

لم أطيل في التجربة نظراً لضيق الوقت ، ولكن على الأرجح هناك سبب خفي لا أعلمه سبب لهذه المشكلة

تقبل وافر تقديري واحترامي

  • Like 1
قام بنشر

وأحرز أخونا عبد السلام هدفاً رائعاً ..يا له من هدف ممتع ..لقد أمتعني بشكل كبير جداً

حقاً إنك لرائع ، وملحوظة قوية جداً .. لم أنتبه على الإطلاق لاسم الموديول فلم أعتاد أن يسمي الناس الموديولات الخاصة بهم ، ولهذا لم أفكر بالأمر

رغم أنني في تصميم البرامج لا أترك الاسم الافتراضي للموديول بل أقوم بتسميته باسم معبر عن الهدف منه وعادةً أبدأ التسمية بكلمة mod اختصار كلمة module

ومن ثم رجوعاً إلى الملف الأصلي في المشاركة في الموضوع على الأخ ناصر أن يقوم بالتالي

الذهاب لمحرر الأكواد Alt+ F11

الذهاب لنافذة المشروع والنقر على اسم الموديول Kh_Mustowa ثم الذهاب إلى نافذة الخصائص وتغيير اسم الموديول إلى مثلاً Mod_Kh_Mustowa

Untitled.png

  • Like 1
قام بنشر

ربنا يبارك فيك الاستاذ المحترم عبد السلام العوافي

ربنا يبارك فيك الاستاذ الكبير ياسر خليل

ملحوظه قويه لم اكن اتوقعها لاني انا الذي غيرت اسم الكود وقلت في نفسي عشان اعرف من اسم الكود مابداخل الكود

قام بنشر

تمام وفكرة جميلة أخي ناصر أن تقوم بتغيير الاسم الافتراضي للموديول لأنني أميل إلى ذلك ، ولكن عود نفسك أن يبدأ الاسم بحروف mod للدلالة على أنه موديول ، فهذا أفضل في التذكر خصوصاً مع كبر البرنامج ووجود موديولات كثيرة بداخله

وهذه صورة توضيحية لأحد البرامج التي قمت بعملها توضح مقصدي

Untitled.png

  • Like 2

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information