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

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


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



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





فورم بحث في نطاق تصفية

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



14-10-2019 03:09 مساء
الجموعي
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 18-09-2017
رقم العضوية : 530
المشاركات : 7
الجنس : ذكر
تاريخ الميلاد : 10-10-1985
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 147
الاعجاب : 8
 offline 

السلام عليكم ورحمة الله تعالى وبركاته
بعد العودة الميمونة للمنتدى أحببت أن أقدم لكم هذا الملف عسى أن يفيد الجميع
نبدأ على بركة الله
الكود
Sub TxtFind1_Change()
Dim ws As Worksheet: Set ws = Sheets(1)
Dim I As Integer, v As Integer
Dim C As Range
Dim Rng As Range

For I = 1 To Col
Me.Controls("Txt" & I).Value = ""
Next I

ws.Activate
Lst1.Clear

Set Rng = Range("B6:B" & Range("B" & Rows.Count).End(xlUp).Row)

Rng.AutoFilter Field:=1, Criteria1:="=" & TxtFind1 & "*"

On Error Resume Next

For Each C In Rng.SpecialCells(xlCellTypeVisible)
    If TxtFind1.Value = "" Then GoTo Finish:
        If C Like TxtFind1 & "*" Then
            Lst1.AddItem
                For I = 0 To Col
                    Lst1.List(v, I) = Cells(C.Row, I + 1)
                Next I
            v = v + 1
        End If
Next C
Finish:
ws.AutoFilterMode = False
End Sub

الجزئيات المهمة في الكود
أولا:
جزئية التصفية

Rng.AutoFilter Field:=1, Criteria1:="=" & TxtFind1 & "*"

ثانيا:
جزئية البحث في نطاق التصفية
Rng.SpecialCells(xlCellTypeVisible)

هنا عملية البحث تتم في الخلايا الظاهرة فقط
أرجو أن يكون الموضوع أعجبكم
وإلى موضوع جديد إن شاء الله
أستودكم الله الذي لا تضيع ودائعه
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  فورم بحث في نطاق تصفية.rar   تحميل rar مرات التحميل :(29)
الحجم :(27.159) KB


أثارت هذه المشاركة إعجاب: YasserKhalil، محمود ابو الدهب، ali mohamed ali،





14-10-2019 03:17 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8164
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23793
الاعجاب : 2466
 offline 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
بارك الله فيك أخي الحبيب الجموعي وجزيت خيراً
عوداً حميداً ومشكور على هديتك الرائعة والمميزة .. دمت لنا بخير وود وسعادة

أثارت هذه المشاركة إعجاب: الجموعي، محمود ابو الدهب،




14-10-2019 03:21 مساء
مشاهدة مشاركة منفردة [2]
الجموعي
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 18-09-2017
رقم العضوية : 530
المشاركات : 7
الجنس : ذكر
تاريخ الميلاد : 10-10-1985
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 147
الاعجاب : 8
 offline 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
المشاركة الأصلية كتبت بواسطة: YasserKhalil
بارك الله فيك أخي الحبيب الجموعي وجزيت خيراً
عوداً حميداً ومشكور على هديتك الرائعة والمميزة .. دمت لنا بخير وود وسعادة


وفيك بارك الله أستاذي وحبيبي أبو البراء
حفظك الله ورعاك

أثارت هذه المشاركة إعجاب: YasserKhalil،




14-10-2019 10:09 مساء
مشاهدة مشاركة منفردة [3]
محمود ابو الدهب
menu_open
مشرف على لغات برمجة والاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1287
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 59
يتابعهم : 6
يتابعونه : 221
قوة السمعة : 4273
الاعجاب : 557
موقعي : زيارة موقعي
 Online 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
جزاك الله خير الجزاء استاذ الجموعي
 

أثارت هذه المشاركة إعجاب: YasserKhalil،


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

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


14-10-2019 10:27 مساء
مشاهدة مشاركة منفردة [4]
الجموعي
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 18-09-2017
رقم العضوية : 530
المشاركات : 7
الجنس : ذكر
تاريخ الميلاد : 10-10-1985
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 147
الاعجاب : 8
 offline 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
المشاركة الأصلية كتبت بواسطة: محمود ابو الدهب
جزاك الله خير الجزاء استاذ الجموعي
 

جزاك الله بالمثل أخي أبو الدهب 
حفظك الله ورعاك

أثارت هذه المشاركة إعجاب: محمود ابو الدهب، YasserKhalil،




15-10-2019 12:54 صباحا
مشاهدة مشاركة منفردة [5]
ali mohamed ali
menu_open
مشرف على منتدى الاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1396
الدولة : مصر
الجنس : ذكر
الدعوات : 1
يتابعهم : 0
يتابعونه : 57
قوة السمعة : 6333
الاعجاب : 961
 offline 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
أحسنت استاذنا الكريم موفق ان شاء الله

أثارت هذه المشاركة إعجاب: YasserKhalil،


توقيع :ali mohamed ali
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
 الاخرين لوجه الله وان تحتسب له اجر عند الله


15-10-2019 09:32 صباحا
مشاهدة مشاركة منفردة [6]
صلاح الصغير
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 55
المشاركات : 283
الجنس : ذكر
تاريخ الميلاد : 13-10-1973
يتابعهم : 1
يتابعونه : 4
قوة السمعة : 229
الاعجاب : 86
 offline 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
استاذ / الجموعى
عندى مشكلة فى المكتبة
can't find project or library
و شكرا





15-10-2019 02:11 مساء
مشاهدة مشاركة منفردة [7]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8164
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23793
الاعجاب : 2466
 offline 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
أخي صلاح
من قائمة Tools ثم References ابحث عن أي مكتبة أولها MISSING ثم أزل علامة الصح ..





16-10-2019 12:17 مساء
مشاهدة مشاركة منفردة [8]
صلاح الصغير
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 55
المشاركات : 283
الجنس : ذكر
تاريخ الميلاد : 13-10-1973
يتابعهم : 1
يتابعونه : 4
قوة السمعة : 229
الاعجاب : 86
 offline 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
استاذ / ياسر
لم تفلح 
و حاولت انقل الفورم و الموديول الى ملف جديد و لكن للاسف دون جدوى 
و شكرا

 
 
  Untitled.png   تحميل png Untitled.png مرات التحميل :(0)
الحجم :(99.564) KB
 


أثارت هذه المشاركة إعجاب: YasserKhalil،




16-10-2019 01:37 مساء
مشاهدة مشاركة منفردة [9]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 8164
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 428
قوة السمعة : 23793
الاعجاب : 2466
 offline 
look/images/icons/i1.gif فورم بحث في نطاق تصفية
ارفق الملف الذي به المشكلة للإطلاع عليه ، ويفضل أن يكون ذلك في موضوع مستقل .. لكي لا تتداخل الموضوعات ويتم الاستفادة بشكل أكبر من أي موضوع يطرح

أثارت هذه المشاركة إعجاب: صلاح الصغير،






الكلمات الدلالية
فورم ، نطاق ، تصفية ،


 







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



الساعة الآن 02:09 صباحا

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