أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
أحمد يوسف ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil تجميع العديد من الملفات في ملف واحد اكسيل اسئله واجابات


اعلان هنا
صقور الاكسيل
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا


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





تصفيه على اساس محتوى خليه

السلام عليكم الاخوه الكرام ارجو المساعده فى عمل كود تصفيه على اساس محتوى الخليه S2 والتى بها اسماء الادارات التصفيه الم ..



02-01-2018 04:39 مساء
ahmed moh
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-09-2017
رقم العضوية : 330
المشاركات : 234
الجنس : ذكر
قوة السمعة : 309
الاعجاب : 1
 offline 
السلام عليكم
الاخوه الكرام
ارجو المساعده فى عمل كود تصفيه على اساس  محتوى الخليه S2
والتى بها اسماء الادارات
التصفيه المقصود بها تصفيه المحتوى على اساس اسم الاداراه  وهو النطاق C4 : C454
 واذا كان محتوى الخليه S2  للا يحتوى على شئ  يتم الغاء التصفيه
جزاكم الله خيرا

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
 
  Book2.rar   تحميل rar مرات التحميل :(12)
الحجم :(26.878) KB





02-01-2018 06:15 مساء
مشاهدة مشاركة منفردة [1]
ahmed moh
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-09-2017
رقم العضوية : 330
المشاركات : 234
الجنس : ذكر
قوة السمعة : 309
الاعجاب : 1
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
السلام عليكم
الاخوه الكرام
بتتبع اعمل المبدع ياسر ابو البراء
تم التوصل لحل
مرفق للإفاده
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Application.ScreenUpdating = False
   'ActiveSheet.Unprotect "2191612"
   If [S2] = "" Then Range("$A$3:$T$3").AutoFilter: Exit Sub
   ActiveSheet.Range("$A$3:$T$3").AutoFilter
   If [S2] <> "" Then ActiveSheet.Range("$A$3:$T$453").AutoFilter Field:=3, Criteria1:=[S2]
   'ActiveSheet.Protect "2191612"
Application.ScreenUpdating = True
End Sub

MTQ2OTI0MQ8989Untitledوهل يمكن جعل التصفيه بدون اسهم التصفيه كما بالشكل المرفق
 
 
 



تم تحرير المشاركة بواسطة :ahmed moh
بتاريخ:02-01-2018 06:49 مساء





02-01-2018 09:13 مساء
مشاهدة مشاركة منفردة [2]
محمود ابو الدهب
menu_open
مشرف على لغات برمجة والاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1288
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 59
قوة السمعة : 4314
الاعجاب : 2
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
الحمد لله على توصلك للحل وتلك اول خطوات النجاح 
البحث والتدقيق
 



توقيع :محمود ابو الدهب
لى عظيم الشرف بالانضمام لهذا الصرح العظيم
وكم أتمنى من الله
ان يعيننى ويعلمنى من علمة الواسع فهو ولي ذالك وهو على كل شي قدير

تحياتى وتقدير للجميع  محمود ابوالدهب

03-01-2018 03:55 مساء
مشاهدة مشاركة منفردة [3]
ahmed moh
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-09-2017
رقم العضوية : 330
المشاركات : 234
الجنس : ذكر
قوة السمعة : 309
الاعجاب : 1
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
NzcyNTQxUntitledالسلام عليكم
الاخوه الكرام
وهل يمكن جعل التصفيه بدون اسهم التصفيه كما بالشكل المرفق

 
 
 





04-01-2018 12:10 صباحا
مشاهدة مشاركة منفردة [4]
حسن علي
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-09-2017
رقم العضوية : 568
المشاركات : 21
الجنس : ذكر
تاريخ الميلاد : 22-6-1956
قوة السمعة : 52
الاعجاب : 0
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
احسنت استاذ ياسر




06-01-2018 07:33 صباحا
مشاهدة مشاركة منفردة [5]
ahmed moh
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-09-2017
رقم العضوية : 330
المشاركات : 234
الجنس : ذكر
قوة السمعة : 309
الاعجاب : 1
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
السلام عليكم
الاخوه الكرام
وهل يمكن جعل التصفيه بدون اسهم التصفيه كما بالشكل المرفق




07-01-2018 09:33 مساء
مشاهدة مشاركة منفردة [6]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8656
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 21
قوة السمعة : 25497
الاعجاب : 182
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
وعليكم السلام
جرب الكود التالي عله يفي بالغرض (لم أجربه)
Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    
    Application.ScreenUpdating = False
        'ActiveSheet.Unprotect "2191612"
            If [S2] = "" Then Range("$A$3:$T$3").AutoFilter: Exit Sub
            ActiveSheet.Range("$A$3:$T$3").AutoFilter
            If [S2] <> "" Then ActiveSheet.Range("$A$3:$T$453").AutoFilter Field:=3, Criteria1:=[S2], Visibledropdown:=False
        'ActiveSheet.Protect "2191612"
    Application.ScreenUpdating = True
End Sub




08-01-2018 01:33 مساء
مشاهدة مشاركة منفردة [7]
ahmed moh
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-09-2017
رقم العضوية : 330
المشاركات : 234
الجنس : ذكر
قوة السمعة : 309
الاعجاب : 1
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
السلام عليكم
نحمد الله كونك بكل خير وعافيه
اخى الحبيب ياسر الكود يعمل بشكل جيد من ناحيه التصفيه 
الا ظهور اسهم التصفيه ماذالت موجوده  لم يتغير شي
كما بالشكل

NjkxMjMx%D8%AA%D8%B5%D9%81%D9%8A%D9%87
 
  تصفيه.png   تحميل png تصفيه.png مرات التحميل :(1)
الحجم :(45.226) KB
 





08-01-2018 05:06 مساء
مشاهدة مشاركة منفردة [8]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8656
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 21
قوة السمعة : 25497
الاعجاب : 182
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
ممكن ترفق ملف بالتعديل الأخير لمحاولة الإطلاع عليه .. لا أعلم سبب عمل الكود فمن المفترض أن الجزء الأخير في السطر يخفي هذه الأسهم




08-01-2018 05:40 مساء
مشاهدة مشاركة منفردة [9]
ahmed moh
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-09-2017
رقم العضوية : 330
المشاركات : 234
الجنس : ذكر
قوة السمعة : 309
الاعجاب : 1
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
السلام عليكم
اخى الحبيب ياسر ابو البراء
مرفق الملف
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  yaser.rar   تحميل rar مرات التحميل :(5)
الحجم :(41.67) KB





08-01-2018 06:05 مساء
مشاهدة مشاركة منفردة [10]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8656
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 21
قوة السمعة : 25497
الاعجاب : 182
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
جرب الكود بهذا الشكل
Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    
    Application.ScreenUpdating = False
        'ActiveSheet.Unprotect "2191612"
            If [S2] = "" Then ActiveSheet.Range("A3:T3").AutoFilter: Exit Sub
            ActiveSheet.Range("A3:T3").AutoFilter
            If [S2] <> "" Then ActiveSheet.Range("C3:C453").AutoFilter Field:=1, Criteria1:=[S2], Visibledropdown:=False
        'ActiveSheet.Protect "2191612"
    Application.ScreenUpdating = True
End Sub




08-01-2018 06:40 مساء
مشاهدة مشاركة منفردة [11]
ahmed moh
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-09-2017
رقم العضوية : 330
المشاركات : 234
الجنس : ذكر
قوة السمعة : 309
الاعجاب : 1
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
السلام عليكم
هذا هو المطلوب 
تم الاحمد ولله الحمد على ما قدمت اخى ياسر من حل
جزاك الله كل الخير والتقدير اخى الحبيب ياسر ابو البراء

 




08-01-2018 06:49 مساء
مشاهدة مشاركة منفردة [12]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8656
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 21
قوة السمعة : 25497
الاعجاب : 182
 offline 
look/images/icons/i1.gif تصفيه على اساس محتوى خليه
وجزيت خيراً بمثل ما دعوت لي أخي العزيز أبو حنين ، والحمد لله الذي بنعمته تتم الصالحات
تقبل تحياتي






المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
جلب بيانات على اساس رقم الفقرة و رقم الدار خالد ابوعوف
5 398 YasserKhalil
هل يمكن  ادراج صورة في ورقة 1  ومعادلة لها في كل الاوراق وتظهر وتتغير اذا تغيرت الاساس ابوعلي الحبيب
4 435 مالك ماريه
الدرس الثالث من موضوعات اساسيات ويندوز عبدالجيد
5 2242 karwan
كود يحفظ قيمة textbox بعد كل تغير كمرجع اساسي لليوزر والباسورد aljathmai
7 705 YasserKhalil
الدرس الثانى من موضوعات اساسيات الويندوز عبدالجيد
1 1923 عبدالجيد

الكلمات الدلالية
تصفيه ، اساس ، محتوى ، خليه ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 11:28 مساء

أعلن هنا
أعلن هنا
أعلن هنا