هل يمكن وضع شرح فقرات الكود بالعربي

[سالم شباني]

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

سؤالي هل يمكن وضع شروحات بين سطور الكود خطوة خطوة حتى نتعلم مستقبلا كتابة الأكواد

الملف المرفق وضعت فيه مثالا بسيطا ( على قد حالي ) يوضح الفكرة

_______________.rar

[m_127899]

[سالم شباني]

للرفع

[حسين بلال]

السلام عليكم

أخي سالم أصلاً الأفضل واللي ينصح فيه كل مبرمج, هو إنو يضمن كود برنامج هيك شروحات ليتم صيانة الكود في المستقبل والتعديل عليه.

أضم صوتي لصوتك في هذا الخصوص

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

تم تعديل يوليو 13, 2009 بواسطه hbsqn

[أبو عادل]

الفكرة ممتازة جزاك الله كل خير

[ياسر خليل أبو البراء]

أخي سالم

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

عاشق الإكسيل

[Ahmed Emannan]

نامل ذلك اخوتي من الاخوة الافاضل

تحياتي

[سالم شباني]

السلام عليكم

بارك الله فيكم أحبائي على هذا التفاعل

نأمل من الأساتذة الأفاضل تلبية هذا المطلب إذا سمح الوقت

فلهم مني كل التقدير

[يوسف عطا]

جزيت خيراً سالم بك

تفق معك وأؤيدك فى طلبك

[سالم شباني]

السلام عليكم

لتكن البداية كود فرز الناجح والراسب

Sub tarheel()
    Sheets("ناجح").Range("A7:CA1000").ClearContents
    Sheets("راسب").Range("A7:CA1000").ClearContents
    Application.ScreenUpdating = False
    For i = 1 To 1000
        For r = 1 To 40
            If Cells(i, 33) = ("ناجح") Then
                m = Cells(i, r).Column
                With Sheets("ناجح").Columns(m).Rows(1000).End(xlUp)
                    .Offset(1, 0) = Cells(i, r)
                End With
            Else
                If Cells(i, 33) = ("راسب") Then
                    N = Cells(i, r).Column
                    With Sheets("راسب").Columns(N).Rows(1000).End(xlUp)
                        .Offset(1, 0) = Cells(i, r)
                    End With
                End If
            End If
        Next
    Next
    MsgBox ("الحمد لله تـــم ترحيل الناجحين و الراسبين إلى أوراق عمل جديدة ")
    Application.ScreenUpdating = True
End Sub

[ا بو سليمان]

يا سلام على الافكار الحلوه 

 

طيب لماذا لا يكون فيه برنامج  مصمم بالاكسل ويترجم العربي الى عبارات تكون صحيحة 100%  كأكواد  يتم نسخها ولصقها مباشرة في  المكان المخصص لها 

 

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

[على حسن]

عمل جميل ورائع

ونحتاج فعلا من الاداره ان يتم شرح اى كود بهذه الصوره

لتعم الفائده على جميع الاعظاء

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