عبدالله بشير عبدالله

السلام عليكم استبدل هذا Private Sub UserForm_Initialize() Call showinlistbox End Sub بهذا Private Sub UserForm_Initialize() TextBox25 = Val(Sheets("table").Cells(Rows.Count, 1).End(xlUp).Value) Call showinlistbox End Sub TextBox25 = Val(Sheets("table").Cells(Rows.Count, 1).End(xlUp).Value)

وعليكم السلام ورحمة الله وبركاته أخي الكريم 🌹 يبدو إننا تجاوزنا أحد قوانين المنتدى، وهي القاعدة رقم (11) اللي تنص على: يُمنع طرح أكثر من سؤال في موضوع واحد لتسهيل البحث والمتابعة لاحقًا. لذلك لو تم الرد على سؤالك الأول، فضلاً اختر "تمت الإجابة" وابدأ موضوع جديد لسؤالك الآخر، وإذا كان بين السؤالين ارتباط، ممكن تشير للموضوع السابق في سؤالك الجديد. تحياتي وتقديري لك 🌷

وعليكم السلام ورحمة الله وبركاته دالة COUNTA (لا تعمل مع التصفية) دالة SUBTOTAL وهي في حالتين =SUBTOTAL(3, A1:A10) تقوم بعدّ كل القيم غير الفارغة في A1:A10 حتى المخفية. اي لا تعمل مع التصفية =SUBTOTAL(103, A1:A10) تقوم بعدّ القيم غير الفارغة فقط في الصفوف الظاهرة بعد التصفية أو الإخفاء اي تعمل مع التصفية الرقم 103: يمثل (عدّ القيم غير الفارغة) مع تجاهل الصفوف المخفية يدويًا أو بواسطة التصفية. اليك طلبك 05- محرك بحث يعمل على تصفية البيانات حسب كل خلية على حدى 23-10-2025.xlsm

وعليكم السلام ورحمة الله وبركاته استخدام [C3] أو [D3] يعني أنك تعتمد على قيمة الخلية في الورقة، وليس على قيمة الـ TextBox نفسه. فإذا كانت الخلية فارغة أو بها قيمة غير متوقعة، فإن التصفية قد تفشل أو تُغلق القائمة تمامًا. جرب التعديل التالي 03- محرك بحث يعمل على تصفية البيانات حسب كل خلية على حدى.xlsm

سبب هذه الأخطاء هو أن برنامج Excel 2007 لم يتمكن من العثور على عنصر تحكم ListViewData (أو ListViewControl) لأنه لم يتم تثبيته أو تفعيله بشكل صحيح على جهازك. ساعطيك خطوات ربما تحل المشكلة من محرر الاكواد -TOOLS)ادوات) -References... (المراجع...). القائمة التي تظهر، ابحث عن المكتبة المسؤولة عن ListView، والتي عادةً ما تكون إحدى هذه الخيارات: Microsoft Windows Common Controls 6.0 (SP6) Microsoft ListView Control, Version 6.0 (SP6) Microsoft Common Controls ضع علامة صح بجوار المكتبة التي تحمل اسم Microsoft ListView Control أو Microsoft Windows Common Controls. اضغط OK (موافق). إذا لم تجد المكتبة، فهذا يعني أنها غير مسجلة على جهازك قم بتحميل اصدار 2016 او 2019 للخروج من هذه الاشكاليات او يمكنك العمل على اول ملف باللستبوكس ووجود البيانات يمين او يسار لا يعنى شيئا ما دام طلبك الرئيسى وهو الفلترة يعمل بكفاءة او ربما الزملاء الافاضل لديهم ما يقدمونه لملفك

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

الليست بوكس خسب علمى خاصية الثتبيت غير موجوده على كل حال تم استبدال LISTBOX ب ListView به خاصية الثتتبيت وهذا اقصى ما لدي استطيع عمله لهذا الملف ListView موجودة في اكسل 2007 اتمنى عدم حدوث مشاكل مع الاصدار 2007 2فلتر (1).xlsm

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

جزاك الله خيرا أسعدني و أثلج صدري دعاؤك لي هذا الصباح ما أجمل صباحي وقد بدأته بدعائك الطيب! حماك الله وأفاض عليك بالخير والسعادة والبركة

وعليكم السلام ورحمة الله وبركاتة تقصد يحول اسم الشيت الى رقم اعتقد ان عدد حروف اسم الشيت يجب ان لا تتجاوز 31 حرف من ضمنها الفراغات الواضخة والمخفية بين الكلمات وهذا من ثوابت الاكسل يوجد حلان الحل الأول، والذي ربما لا تفضله كما ذكرت، هو الاختصار الرقمي. على سبيل المثال، استبدال 'أربعة وعشرون' بالرقم '24' ليصبح الوصف: 'مكيف سبليت جنرال 24 وحدة'. "الحل الثاني: على الرغم من أن أسماء بعض الأصناف تفي بمتطلبات الحد الأقصى لعدد الأحرف، إلا أن رفض النظام لها يحدث غالبًا بسبب وجود مسافات زائدة (ظاهرة أو مخفية). لاحظنا في ملفك وجود مسافات متكررة، مثل الفراغين بين 'سبليت جنرال'. لذلك، من الضروري تضمين دالة في الكود لمعالجة النص وإزالة جميع الفراغات الزائدة قبل حفظ البيانات." تفضل الملف، آمل أن يلبي هذا متطلباتك الاصناف1.xlsm لك وافر التقدير والاحترام

السلام عليكم قم بانشاء مجلد في اي مكان بالجهاز لحفظ الملفات اليك التعديل الشرقية1 (1).xlsm

السلام عليكم المشكلة أن الكود يستخدم عامل البحث النصي (*) مع عمود يحتوي على أرقام - عامل * مخصص للنصوص وليس للأرقام اليك كود يتخقق من الحالة اولا 02- محرك بحث يعمل على تصفية البيانات حسب كل خلية على حدى.xlsm

وعليكم السلام ورحمة الله وبركاته تم وضع معادلات في العمود G وكذلك العمود J نموذج.xlsx

او جرب هذا الملف ربما يتوافق مع 2007 ليس لدي الاصدار لاجرب 3فلتر.xlsm3فلتر.xlsm

وعليكم السلام ورحمة الله وبركاتة تعني أن هناك مرجع (Reference) مفقود في مكتبة VBA، وخسب الصورة Excel 2007 عند استخدام بعض الدوال مثل Trim أو الكائن Scripting.Dictionary جرب الحل التالي افتح محرر الأكواد من القائمة العلوية اختر: Tools → References ابحث عن أي سطر مكتوب بجانبه: MISSING: أزل علامة الصح من المربع الموجود أمام هذا المرجع. اضغط OK وأغلق النافذة. جرّب تشغيل الكود من جديد واعلمنى بالنتائج