logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
Hatem Eissa hassona229-- لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة اكسيل مشاريع جاهزه



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





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

السلام عليكم ورحمة الله تعالى وبركاته
بعد العودة الميمونة للمنتدى أحببت أن أقدم لكم هذا الملف عسى أن يفيد الجميع
نبدأ على بركة الله
الكود
CODE
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


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

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

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

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


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



look/images/icons/i1.gif فورم بحث في نطاق تصفية
  14-10-2019 03:17 مساءً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36757
الاعجاب : 185
بارك الله فيك أخي الحبيب الجموعي وجزيت خيراً
عوداً حميداً ومشكور على هديتك الرائعة والمميزة .. دمت لنا بخير وود وسعادة




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




look/images/icons/i1.gif فورم بحث في نطاق تصفية
  14-10-2019 10:09 مساءً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1309
الدولة : مصر
الجنس :
تاريخ الميلاد : 4-7-1990
الدعوات : 59
قوة السمعة : 4570
الاعجاب : 0
موقعي : زيارة موقعي
جزاك الله خير الجزاء استاذ الجموعي



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

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

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




look/images/icons/i1.gif فورم بحث في نطاق تصفية
  15-10-2019 12:54 صباحاً   [5]
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1765
الدولة : مصر
الجنس :
الدعوات : 2
قوة السمعة : 9685
الاعجاب : 25
أحسنت استاذنا الكريم موفق ان شاء الله



توقيع :ali mohamed ali


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

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




look/images/icons/i1.gif فورم بحث في نطاق تصفية
  15-10-2019 02:11 مساءً   [7]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36757
الاعجاب : 185
أخي صلاح
من قائمة Tools ثم References ابحث عن أي مكتبة أولها MISSING ثم أزل علامة الصح ..




look/images/icons/i1.gif فورم بحث في نطاق تصفية
  16-10-2019 12:17 مساءً   [8]
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 55
المشاركات : 367
الجنس :
تاريخ الميلاد : 13-10-1973
قوة السمعة : 505
الاعجاب : 4
استاذ / ياسر
لم تفلح
و حاولت انقل الفورم و الموديول الى ملف جديد و لكن للاسف دون جدوى
و شكرا
 
  Untitled.png   تحميل png Untitled.png مرات التحميل :(0)
الحجم :(99.564) KB
 





look/images/icons/i1.gif فورم بحث في نطاق تصفية
  16-10-2019 01:37 مساءً   [9]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36757
الاعجاب : 185
ارفق الملف الذي به المشكلة للإطلاع عليه ، ويفضل أن يكون ذلك في موضوع مستقل .. لكي لا تتداخل الموضوعات ويتم الاستفادة بشكل أكبر من أي موضوع يطرح




اضافة رد جديد اضافة موضوع جديد




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









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

الساعة الآن 02:37 PM