أ / محمد صالح

ربما يفيدك هذا الموضوع بالتوفيق

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

إذا كان فهمي للمطلوب صحيحا يمكنك وضع نصوص هذه السطور في الرأس أو التذييل لهذا الشيت حتى يتم طباعتها في جميع الصفحات بالتوفيق

آخر صف يتم حسابه على العمود A والصواب العمود B لأن A فارغ يمكنك تغيير هذا السطر lr = .Cells(.Rows.Count, "A").End(xlUp).Row إلى lr = .Cells(.Rows.Count, "B").End(xlUp).Row ولا يقوم الكود بحذف المصدر بالتوفيق

ما الفائدة من إطالة الموضوع؟؟؟؟ لقد قدم الأخ أبو أحمد فكرة الحل بوضع معادلة تحدد الرقم الذي تكرر وذكرت أنا طريقة الحذف للصفوف التي بها رقم 1 أليس هذا هو المطلوب؟؟؟؟

يجب حفظ الملف بامتداد يدعم الأكواد مثل xlsb أو xlsm

ربما يكون هذا هو المطلوب بالتوفيق test1.xlsx

جرب تشغيل هذا الكود في كل الشيتات Sub Clear_All_Filters() On Error Resume Next ActiveSheet.ShowAllData On Error GoTo 0 End Sub بالتوفيق

الملف يحتاج إلى تثبيت برنامج Adobe Acrobat يكون مثبتا على الجهاز بالتوفيق

أعتقد يجب إضافة عمود العدد المتاح من كل سلعة حتى لا يتم تجاوزه

يمكنك البحث في جوجل عن aopr

ربما يرجع اختلاف الحل المقدم من الأخ الفاضل @محمد هشام. بسبب اختلاف فهم المطلوب أعتقد أن المطلوب * إن كان الاسم الموجود في ( أ) موجود في (ب) يتم كتابة نفس الاسم / وإذا لم يكن موجودا في (ب) يتم ترك الخلية أمامه فارغة (وهذا تم تنفيذه) * إن كان الاسم الموجود في (ب) غير موجود في (أ) يتم كتابة نفس الاسم من (ب) ويتم ترك الخلية أمامه في (أ) فارغة (وهذا لم يتم تنفيذه) بالتوفيق للجميع

ممكن تعد عمود الرقم ب count =Count(A2:A10) وممكن تعد عمود الاسم ب counta =Counta(b2:b10) بالتوفيق

لعل هذه الطريقة تفيدك في الوصول للهدف تم وضع 3 معادلات: معادلة لوضع الاسم إذا كان موجودا في ب وإلا يترك خاليا (في العمود الذي تم إدراجه B ) ومعادلة لتحديد غير الموجود في ب (في العمود D) معادلة لجلب الأسماء الموجودة في ب وغير موجودة في أ (أسفل القائمة في العمود B ) بالتوفيق ترتيب عمود بنفس قيم عمود اخر.xlsx

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

معادلتك صحيحة لجمع النسب لكن أسماء المقاولين غير متطابقة وكما اقترح الأخ الفاضل محمد هشام فك الدمج عن عمود الكلاستر وكتابة رقم الكلاستر فقط بدون E في كل صف للعلم يوجد خطأ REF في المعادلة يمكن حذف هذا الشرط بالتوفيق

جرب هذه الروابط https://www.officena.net/ib/search/?q=قائمة معتمدة&quick=1&type=forums_topic&nodes=135&updated_after=any&sortby=relevancy&search_and_or=and بالتوفيق

العام معادلته =INT(B2/365) الشهر معادلته =INT((B2-B5*365)/30) اليوم معادلته =B2-SUM(B5*365,C5*30) مع العلم خطأ هذه الطريقة في الحسابات حيث 12 في 30 يساوي 360 فقط وليس 365 بالتوفيق

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

ربما يفيدك هذا الموضوع بالتوفيق

بعد اذن الأخوة المشاركين في الوصول للحل المطلوب محالف للمرفق أعتقد المطلوب البحث في جدول 2 عن الرقم القومي الموجود في جدول 1 وكتابة المرتب من العمود L إلى العمود E في نفس الشيت الأول وإذا كان هذا المطلوب فعلا فيكطم استخدام معادلة بحث عادية vlookup أبسطها =IFERROR(VLOOKUP(B3,$I$3:$L$15,4,0),0) بالتوفيق البحث.xlsx

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

أول خطوة في الوصول لمعلومة تفيدك في مطلوبك هي استعمال محرك البحث الخاص بالمنتدى وتطبيق ما تعلمته من هذه المواضيع ربما تفيدك هذه الروابط https://www.officena.net/ib/search/?q=التصدير الاكسس&quick=1&type=forums_topic&nodes=135&updated_after=any&sortby=relevancy&search_and_or=and بالتوفيق

نفعنا الله حميعا بما علمنا وعلمنا ما ينفعنا

عليكم السلام ورحمة الله وبركاته يبدو لي من السؤال أن حضرتك بدأت تسأل قبل أن تتعرف أساسيات الاكسل وأساسيات المعادلات ولذلك بدأت في تنفيذ مطلوبك والباقي عليك بعد فهم ما تم فيه تم وضع البيانات الرئيسية في شيت مستفل (مثل المحافظة والمدير والفترة) في أماكن المعلومات الرئيسية نستعمل معادلة بسيطة هي =main!b1 حيث B1 هو مرجع الخلية التي تحتوي على البيان المطلوب تم وضع رقم 1 في الخلية l1 وهي المسلسل المراد البحث عن بياناته نستعمل في خلية الاسم =VLOOKUP(L1,data!$A$1:$H$494,2,0) وفي خلية الفصل نغير رقم العمود 2 الموجود قبل الصفر إلى 3 وهطذا مع باقي خلايا المسلسل بتغيير رقم العمود في شيت البيانات نضع في الخلية L19 معادلة المسلسل التالي =L1+1 ننسخ جميع خلايا التقرير من A1 إلى J17 ونلصقهم في الطالب التالي في الخلية A19 ثم بعد ذلك ننسخ جميع خلايا التقرير الثاني من A19 إلى L35 ونلصقهم في الطالب التالي في الخلية A37 وهكذا بالتوفيق تقرير.xlsx