إلياس

جرب المرفق في sheet 1 ولحماية المعادلات : 1- حدد الخلايا التي تحتوي على معادلات ثم كليك يمين ، واختر (تنسيق الخلايا) ومنها اختر (حماية) ثم ضع إشارة صح على (تأمين الخلايا) ثم موافق 2- ضع المؤشر على عنوان ورقة العمل بالأسفل ، ثم كليك يمين ، ومنه اختر (حماية ورقة) وضع الرقم السري الذي تريد ثم موافق مخزن فرست.xls

لعل المرفق يحقق المطلوب تجربة.xls

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

تفضل المرفق امسح المجاميع نهاية كل صفحة ( الخلايا الملونة ) قم اضغط زر التجميع Sample GxE=D.xlsm

أخي الفاضل أعتقد أن هذه العبارة تدل على أن الملف محمي ( لمنع الدخول إلى الأكواد والتعديل ) ولكن تأكد أولا من مشاركة الملف من خلال علامة التبويب (مراجعة)

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

آمل أن يكون المطلوب في المرفق 111.xls

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

أخي الفاضل الصواب هو مجموع الاكسيل والله أعلم . لماذا ؟ لأن هنالك منازل عشرية لم يتم احتسابها في الآلة الحاسبة والمنازل العشرية عند جبرها للقيمة الأقرب ، لا يتم تكرار الجبر على سبيل المثال : وسع المنازل العشرية للخانة قبل الجمع الأحمر الأول ستجد المنازل العشرية 22.50 وقد كانت 22.5050 وقبلها 22.50495 فتم تقريبها في الأولى ولم يتم في الثانية وفي الجملة فإن الاختلاف ناجم عن وجود منازل عشرية لم يتم احتسابها عند استخدام الآلة الحاسبة بينما الاكسيل احتسب ذلك وفقكم المولى لكل خير

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

وعليكم السلام ورحمة الله هذه الخانات (الخلايا) تم برمجتها على قبول المدخلات وفق شروط محددة ، فإن اختل شرط منها ، اعادة القيمة إلى صفر ورغم أنني لست ضليعا في البرمجة إلا أنه يمكنك الدخول على محرر الأكواد ومحو السطر التالي (مكرر) : Target.Value=0 ثم احفظ التعديل ، وقم بالنسخ ولصق القيم . وسوف تنجح العملية إن شاء الله تعالى

آمل أن يكون المطلوب كل عام وانتم بخير (2).xls

آمل أن يكون المطلوب كل عام وانتم بخير.xls

أخي الفاضل اعتذر من حضرتك . لعدم معرفتي بذلك . وإنما أجبتك آنفاً على قدر معرفتي ، حباً في مد يد العون ولعل الإخوة الأفاضل بفيدونك بما تريد وهم كثر ولله الحمد

تم التطبيق على الملف المرفق ، وهو يعمل بصورة جيده وفقكم الله حركة2018.rar

يمكنك أخي الفاضل تحويل المعادلات إلى أكواد ، لكن لا أعتقد أن الملف سيكون أخف افتح محرر الأكواد وأدرج موديول ، واكتب الكود التالي : sub jard ( ) [g5].formula="=SUMIFS('حركة اليوميه'!G5:$H$10000,'حركة اليوميه'!E5:$F$10000,E5)" range("g5:g10000").filldown end sub لاحظ أخي الفاضل أن السطر الأول هو تعريف لمحتوى ( g5 ) مع تغيير شكل الفواصل في المعادلة والسطر الثاني لسحب المعادلة على النطاق المراد . ويمكنك تكرار هذا الكود قبل اغلاقه على بقية المعادلات التي تريد تحويلها إلى أكواد آمل أن تكون الصورة واضحة ، علماً بأنني لست ضليعاً في هذا الجانب ، وإنما رأيت المساهمة على قدر معرفتي المتواضعة فتقبل ما فيها من خلل .. وفقكم الله sub jard ( ) [g5].formula="=SUMIFS('حركة اليوميه'!G5:$H$10000,'حركة اليوميه'!E5:$F$10000,E5)" range("g5:g10000").filldown end sub

أحسن الله إليك أخي مزلزل .. دالة رائعة كروعة مشاركاتك العطرة

أنظر الصورة المرفقة .. بأمل أن تكون المعلومة واضحة تقبل تحياتي

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

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

حياك الله أخي الغالي آمل أن يكون الحل في الملف المرفق 11.rar

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

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

السلام عليكم ورحمة الله وبركاته الملف المرفق يمثل المشكلة التي تواجهني في عد الخلايا بواسطة استخدام الصفائف . حيث وجدت في موقع ميكروسوفت أن استخدامها بكثرة في اوفيس 2002 و 2003 يسبب بطء شديد في البرنامج . وهذا ما حصل معي وذلك بمجرد ادخال البيانات والضغط على مفتاح enter فإن البيانات تأخذ وقتاً طويلاً حتى تظهر في الخلايا ( كعملية التحميل ). لذلك أرغب في ايجاد كود أو معادلة بديلة عن الصفائف تقوم بنفس المهمة . آمل تقبل عذري مسبقاً على استحواذي جزء من وقتكم .. تقديري واحترامي للجميع،،، 111.rar

للرفع