احمد بن ابراهيم

شكرا استاذ / مختار

ملاحظاتي

هى اني اتعبتك معي

ادام الله عليك بالصحة و العافية

الاستاذ / قلم الاكسل ( عبدالعزيز )

لك الشكر بعد الله على ردك لى و مشاركتك و توضيحك .

الاستاذ / مختار حسين

لقد تمت المهمة بفضل الله ثم بإبداعكم فلك جزيل الشكر

بارك الله فيكم و لجميع اعضاء المنتدى و كتب الله اجركم 

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

اسلام عليكم و رحمة الله و بركاته 

بارك الله لكم و في جميع اطروحاتكم المتميزة

سؤالي:

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

حيث ان الورقة تحتوي على جدول علية فلترة .

ولكم جزيل الشكر

مرفق ملف توضيحي   

حماية خلية محددة.rar

بارك الله فيكم اجمعين

رائع

تستاهلون 

الرابط لم يفتح معي

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

يعجز الوصف في ما يجول في نفسي احتراما لكم و للقائمين على المنتدى

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

كتب الله اجركم و نفع الله بعلمكم

ودمتم بالصحة و العافية  

الحمد الله 

تمت المهمة 

لكم جزيل الشكر ابو البراء  

مبروووك استاذ سليم

اهل الخير يستاهلون الخير

نفع الله بعلمك واعانك الله على كل من يحبونك   

بارك الله فيك ابو البراء

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

Sub protectclose()
Dim a As Worksheet
For Each a In Worksheets
If a.ProtectScenarios = False Then
a.protect "1111"
End If
Next a
 
End Sub

الغاء الحماية لبعض الاوراق.rar

اسعد الله مسائكم

لدي مشكلة في ربط الملف السابق مع ملف خاص بالعمل  

هل من الممكن التواصل معي على الايميل لارسال الملف  للاهمية

واعتذر اذا كان الامر يتدخل في خصوصيتكم

استاذ عمر 

ممكن التشرف بالتواصل معكم على الإيميل

abdhhh2009@gmail.com

لاخذ اقتراحاتك و ملاحظاتك للاهمية

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

مشاء الله عليك انت مبدع في حل الغاز الاكسل 

ادام الله عليك و على القائمين في المنتدى بالصحة و العافية  

استاذ عمر       

ممكن اضافة 

هل ممكن في الاكسل عمل ايقونة لإظهار الشرح ( كما شرحت على الملف ) و عند الضغط علية مرة ثانية تختفي الشروحات 

وشكرا

الف الف الف     شكر لك اخي العزيز عمر 

اتممت المهمة بحمد الله بشكل جميل (  اتعبتك في صياعة الاكواد  )

و تم اعتماد هذا العمل 

اسعدك الله في الدارين 

واشكرك على حسن متابعتك معي  

تسلم اخي سليم 

اضافة جميلة منك والناتج منها ممتاز ( احببت تعلمها منك )

بنسبة للعامود  D و E  هم كذالك بيانات مكررة  لم تتغير

اسعد الله ايامك 

استاذ سايم

المعذرة اخي سليم

على قل النظر فيني لم الحظ تغيير .  

فهو شبية الملف ahmed 2 غير ان الكود المستخدم مختلف ويعطي نفس النتيجة

و لك جزيل الشكر على جهودك المبذولة 

السلام عليكم

بنسبة لي فكنت ارغب 

بعملية فلترة على  نفس الجدول ( مثل الفلترة العادية )

يكون البحث بالاسم في خلية B9  اذا كنت ارغب بالبحث عن اسم معلم يتقلص فية الجدول الى اسم المعلم مع ثلاثة الصفوف الخاصة به لجميع الاعمدة

او يمكن البحث حسب المرحلة الدراسية في خلية E9  ب = ابتدائي م = متوسط ث = ثانوي فيخرج معي اسماء المعلمين لهاذة المرحلة

استاذ عمر 

لقد قمت بتعديل و ازالة الدمج 

شاهد المرفق

ahmed 2.rar

بارك الله فيك استاذ/ عمر  لقد اتممت المهمة بإبداع 

هذا هو الملف المطلوب الذي ارغب بتطبيق البحث الاسماء فيه لتسريع ادخال البيانات علية

كما طلبت في المرفق

و اتشرف بوضع لمساتك المتميزة علية و اتعلمها منك

ولك و للجميع الشكر لمشاركتهم

ahmed 1.rar

بارك الله فيك استاذي / سليم حاصبيا

و لا حرمنا الله من التعلم منكم و حسن تواصلكم

لك جزيل الشكر 

و كما قلت (  الخلايا المدمجة من الد اعداء الكود والمعادلة )

مشاء الله عليك استاذ عمر  ابداع في وضع لمساتك 

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

حيث ان الجدول لحقيقي لدي بحجم كبير يحتوي على اعمدة و صفوف كثيرة 

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

جدا جدا اعجبتني  و الف شكر لك يا استاذي العزيز

فهي أوحت لي بفكرة اضافية سوف اعمل بها انشاء الله

( ممكن اضافة السماح بالتعديل على البيانات بعد عملية البحث و اي تغير يحدث في الاسم يتم التغير على الجدول الرئيسي )

لك جزيل الشكر على تواصلك و مجهودك الظاهر للجميع

تسلم ابو أدهم

الله يريح بالك  . تجميعة متميزة 

بارك الله في جهودكم

لك جزيل الشكر ابوحنف

على حسن تواصلك و شرحك المتميز عى الكود

حيث ان الكود طويل و انا استخدم كود مختصر ( جزا الله خير من قام بعمله )

lr = Range("b" & Rows.Count).End(xlUp).Row

ActiveSheet.Range("$B$4:$C$" & lr).AutoFilter Field:=1, Criteria1:="=" & ActiveSheet.TextBox1.Text  & "*" 

وطريقة تكرار الاسماء معلومة لدي 

ولكن مع كثرة الاسماء تفوق 70 اسم يصبح الجدول غير منظم و مزعج .

و علمت ان التصفية لا يمكن عملها في وجود صفوف مدمجة

ولاكن احببت طرح الموضوع في هذا المنتدى لما يتمتع به من وجود اعضاء متميزين و رحابة الصدر في حواراتهم .

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

فبارك الله في جهود الجميع .

اسلام عليكم و رحمة الله و بركاته 

بارك الله لكم و في جميع اطروحاتكم المتميزة

سؤالي:

لدي ملف يحتوي على عدد كبير من المعلمين يتكون من اسم المعلم و اسم المادة و التاريخ

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

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

مرفق ملف توضيحي   

فلترة الاسماء بظهور ثلاثة صفوف(1).rar

اسلام عليكم و رحمة الله و بركاته 

بارك الله لكم و في جميع اطروحاتكم المتميزة

سؤالي:

لدي ملف يحتوي على عدد كبير من المعلمين يتكون من اسم المعلم و اسم المادة و التاريخ

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

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

مرفق ملف توضيحي   

فلترة الاسماء بظهور ثلاثة صفوف(1).rar

اعتذر على التكرار فقد ظهر لي خطاء اثناء رفع الموضوع

فحاولت اعادة اكثر من مرة .

اعتذر مجددا

ابدعت استاذ سليم

اصبح الكود مميز

فالشكر لله ثم لكم و للجميع 

ممكن نضيف السماح بالنسخ و اللصق اذا كان هناك جداول متشابة التصميم

اذا امكن