ترتيب الشيت أبجديا

[كعبلاوى]

مطلوب من أساتذتى الافاضل مشرفى الموقع

ترتيب الطالبات أبجديا مع درجاتهم باستخدام الاكواد

 

ترتيب أبجدى.rar

[سليم حاصبيا]

جرب هذا الملف

 

ترتيب أبجدى 2003 salim.rar

[كعبلاوى]

تسلم ايديك استاذنا الكبير / سليم حاصبيا

فعلا هو المطلوب 

[سليم حاصبيا]

منذ ساعه, كعبلاوى said:

تسلم ايديك استاذنا الكبير / سليم حاصبيا

فعلا هو المطلوب 

اين الاعجاب بالكود

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

بارك الله فيك أخي الحبيب سليم وجزيت خيراً

إثراءً للموضوع جرب الكود التالي عله يفي بالغرض

رابط الكود من هنا

تقبل تحياتي

 

[سليم حاصبيا]

رائـــع!!!!!

[ابوسلماان]

المبدع ياسر خليل أبو البراء 

جزاك الله خيرا على هذا الكود البسيط ، كنت ابحث عنه ..

وعندي سؤال :
كيف استطيع تنفيذه على ورقة عمل محمية .. 

 

وشكرا الف شكر.

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

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

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

Activesheet.Unprotect 123

هذا السطرلفك الحماية بفرض أن كلمة السر 123 ....

لإرجاع الحماية ستستخدم نفس السطر بالضبط وتحذف منه فقط حرفين Un ...

أرجو أن يفي هذا بالغرض

[ابوسلماان]

يفي بالغرض  ونص  ههههههه   

فعلا انت ملك الابداع ،،   الله يكرمك ويجعل كل ما تقوم به في ميزان حسناتك ..


مشكور يا غالي.

[ابوسلماان]

14 ساعات مضت, ياسر خليل أبو البراء said:

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

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

Activesheet.Unprotect 123

هذا السطرلفك الحماية بفرض أن كلمة السر 123 ....

لإرجاع الحماية ستستخدم نفس السطر بالضبط وتحذف منه فقط حرفين Un ...

أرجو أن يفي هذا بالغرض

اخي الكريم ياسر خليل

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

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


ولك فائق الشكر والتقدير ،،

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

أخي الكريم أبو سلمان

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

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

ActiveSheet.Protect Password:="123", AllowFormattingColumns:=True, AllowFormattingRows:=True

 

[ابوسلماان]

انت رائع ،،  

 

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

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