قاهر الاكسس

السلام عليكم , هل من مساعدة يااخوان

الدليل.rar

السلام عليكم ورحمة الله وبركاتة ,, الاخوة الاعزاء , اسعد الله ايامكم واواقاتكم بكل خير يوجد لدي كود بحث في فورم اكسل بأول حرف في الاسم في الخلية وفرزه النتيجه في اللسته حسب الحرف الاول فقط , لذا اريد تعديل الكود بحيث يبحث او يفرز باي حرف داخل الخلية ليس فقط الحرف الاول مرفق لكم الكود Private Sub CommandButton4_Click() LastRow = æÑÞÉ1.Cells(Rows.Count, "A").End(xlUp).Row + 1 For i = 1 To 10 For T = 1 To LastRow If TextBox2.Text = æÑÞÉ1.Cells(T, 2) And _ TextBox1.Text = æÑÞÉ1.Cells(T, 1) Then æÑÞÉ1.Cells(T, i).Value = Me.Controls("TextBox" & i).Value End If Next Next CommandButton3.Enabled = True CommandButton4.Enabled = False End Sub ارجو مساعدتي بذالك ولكم فائق الشكر والتقدير

السلام عليكم ورحمة اله وبركاتة ,, اسعد الله اوقاتكم بكل خير هل ممكن المساعدة في كتابة كود واحد على الاقل وربطه في الفورم لكي اتمكن من تكملة الباقي وشرح طريقته لي ياأساتذتي الكرام مرفق الفورم امل الافادة بذاك ,,, وكم جزيل الشكر احبتي اخوكم ابو سعد Form.rar

هههههه الله يعطيك العافيه ,, مبدع ياستاذي

جزاك الله كل خير استاذي عبدالله , ولك فائق الشكر كيف اعمل مربع بحث جديد ! هل اقو بنسخ الاكواد نفسها مع تفيير اسم موقع الخلية ؟ وماهي فائدة المكتوب في Q2 =ISNUMBER(SEARCH("*"&MyText&"*";B8;1)) وشكرا

جزاك اللع كل خير ابو حنين , يوجد مشكة عند البحث عن "مدير شرطه" كمثال لايظهر لماذا

السلام عليكم ورحمة الله وبركانة هذا كود بحث يبحث او ( يفرز) بأول حرف يكتب هل ممكن نحول هذا الكود ان يبحث باي حرف داخل النص او الجملة وايضا كيف نجعله يبحث بالارقام ارجو المساعدة بذالك ولكم وافر الشكر Private Sub TextBox1_Change()Dim LastRow As LongLastRow = Range("c65535").End(xlUp).Row If ActiveSheet.TextBox1.Text <> "" Then Selection.AutoFilter Range("$A$7:$c$" & LastRow).AutoFilter Field:=3, Criteria1:= _ "=" & ActiveSheet.TextBox1.Text & "*", Operator:=xlOr Else Range("$A$7:$c$" & LastRow).AutoFilter Field:=3 End IfEnd Sub بحث بأي حرف او رقم.rar

شكراَ اخي العزيز, تم رفع الملف تقبل خالص تحياتي تم رفع الملف الرجاء المساعدة بذالك

شكراَ اخي العزيز, تم رفع الملف تقبل خالص تحياتي Form.rar

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

أ ) تغيير TextBox كلما اردنا ان نضيف تكست بوكس جديد بمعنى اننا لو اردنا ان نجعل صندوق ثاني سنضع كود جديد ونغير فيه رقم ال TextBox ليكون TextBox2 وهكذا .. ب ) رقم العمود الذي ستتم فيه العملية ج ) اسم النطاق الذي سنقوم بعمله والتي سنضعه في الكود جزاك الله كل خير اخي محمد هذا البحث يبحث بالحرف الاول , هل ممكن يكون البحث باي حرف من داخل الجدل اي ليس اول حرف فقط مرفق هذا المثال التابع لاأخوانا احمد انا اريد يكون مثل هذا البحث تقبل تحياتي ملفات مرفقة Book2.rar

جزاك الله كل خير اخي حمادة , هذا البحث يبحث بالحرف الاول , هل ممكن يكون البحث باي حرف من داخل الجدل اي ليس اول حرف فقط مرفق هذا المثال التابع لاأخوانا احمد انا اريد يكون مثل هذا البحث تقبل تحياتي Book2.rar

ملف د.rarالسلام عليكم ورحمة الله وبركاتة , اسعد الله اوقاتكم بكل خير احبتي ,, عندي ملف اكسل , اريد عمل مربع بحث الاصفر اي انه عند ادخال اسم الشخص يفرز لحاله في الجدول يعني عندما اكتب س او اي حرف تظهر جمع الاسامي التي بنفس الحرف وذالك بعد الضغط على Enter استرجاع الجدول Delete ارجو مساعدتي بذالك ,, ولكم وافر الشكر مرفق الملف