اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

الاخوة الاعزاء هل ممكن الفلترة برقم الصنف اى من رقم مثلا 15010100000001 الر رقم 15010100001000

او بمعنى ادق ان تكون الفلترة للاصناف التى تبدأ مثلا ب 150101

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

او ترمس يظهر كل الترامس

Book1.rar

قام بنشر

ضع هذا الكود في حدث الصفحة 1

Private Sub Worksheet_Change(ByVal Target As Excel.Range)

Application.EnableEvents = True

If Target.Row = 1 Then

H = ActiveCell.Column

A = [a1].Value

On Error Resume Next

Application.ScreenUpdating = False

ActiveSheet.ShowAllData

Selection.AutoFilter Field:=H, Criteria1:="=" & Cells(1, H)

End If

End Sub

ثم :

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

قام بنشر

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

قام بنشر

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

بعد التحية و التقدير لأخي ديب على مجهوده الرائع جزاه الله كل خير

اخي محمد

جرب الملفق

في الخلية D1 اكتب اي حرف او كلمة تعمل التصفية

مع التحية

Book1-AZ.rar

قام بنشر

يعنى مثل ما اكتب كلمة حوض تظهر الفلترة طيب لوممكن تتطبق على رقم الصنف يعنى مثلا 150101 يظهر كل ارقام الصنف اللى تبدا بالرقم دة

قام بنشر

الاستاذ أحمد زمان : أشكرء على كلمات الإطراء و أحب أن أوضح أن الكود الذي وضعته هو من أعمال أحد الأعضاء في المنتدي و أنسب الفضل له.

الأستاذ محمد طاهر: يمكن تطبيق ماكرو الاستاذ أحمد زمان علي رقم الكود و لكن بعد أن تجعل تنسيق خلايا الأكواد علي أنها نص و ليست رقم و ذلك طبعا من تنسيق خلايا و سوف يعمل معك الماكرو إن شاء الله. مع ملاحظه تفعيل الجزء الأخير من الماكرو و الخاص بتصفية الأكواد وذلك بازالة العلامة (').

قام بنشر

كلمة شكر لا تكفى لكم انتم الاثنين

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

شكرررررررررررررررررررررررررررا

قام بنشر

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

أخي ذيب

يمكن تطبيق ماكرو الاستاذ أحمد زمان علي رقم الكود و لكن بعد أن تجعل تنسيق خلايا الأكواد علي أنها نص و ليست رقم و ذلك طبعا من تنسيق خلايا و سوف يعمل معك الماكرو إن شاء الله. مع ملاحظه تفعيل الجزء الأخير من الماكرو و الخاص بتصفية الأكواد وذلك بازالة العلامة (').

ده كلام زي العسل يدل على المعرفة و الخبرة

جزاك الله كل خير

اخي محمد

جزاك الله كل خير

ولنا نقاشات ان شاء الله في الموضوع الآخر

قام بنشر

الأخ أحمد زمان - الأخ محمد طاهر شكرا لكما فنحن نتعلم من طرح مثل هذه المواضيع فاللهم اجعل كل عمل في هذا المنتدى في موازين حسنات من يساهم فيه و لو بكلمة

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information