بن علية حاجي

السلام عليكم ورحمة الله أخي الكريم حمادة، تم، في ملفي المرفق الأخير، إدراج كود أخي الحبيب طارق لمسح البيانات دون المعادلات في كل الأوراق (أوتوبيس-طائرة-مطروح-تعديل)... أرجو أن يفي بالغرض... أخوك بن علية الملف المرفق : مانفست كلابشة_Ali5.rar

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

السلام عليكم أخ coucopu72 من المفروض أن تفتح موضوعا جديدا تضع فيه طلبك وليس أن تدخل مواضيع أخرى وخاصة لما يكون طلبك لا يتوافق مع طلب صاحب الموضوع الأصلي وقد فعلتها في مواضيع أخرى... بالنسبة لموضوعك حضرت لك الكود التالي : Sub Sort_Data() With Feuil1.Sort .SetRange Range("B2:B" & Range("B65000").End(xlUp).Row) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With Range("B2").Select End Sub وقد أرفقته بالملف المرفق... الملف المرفق : Classeur1.rar أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، والحل بالدالة SEARCH بالملف المرفق... أخوك بن علية الملف المرفق : حساب النقاط_Search.rar

السلام عليكم ورحمة الله أخي الكريم، حضرت لك الملف التنفيذي بالمرفقات يبين عملية إضافة دالة جديدة إلى قائمة الدوال عن طريق Add-Ins وكيفية تمكينها مع الوظائف حتى تكون مفعلة عند فتح برنامج إكسيل... ونسخة الإكسيل المستعملة هي نسخة إكسيل 2007 بالفرنسية... أرجو أن يكون مفيدا للمطلوب... أخوك بن علية الملف المرفق : 12.rar

السلام عليكم ورحمة الله أخي الكريم، يجب عليك تغيير عنوان الموضوع لأن العنوان "من يساعدني" هو عنوان مخالف للقوانين (راجع قوانين المشاركة في المنتدى بأعلى الصفحة الأولى)... بالنسبة لموضوعك قمت بإدراج عمودين إضافيين K و L تم وضع معادلات جلبتهما من موضوع مشابه في منتدى آخر كنت قد قمت بمساعدته فيه... العمود المساعد K يمكن إخفاؤه... أرجو أن يفي هذا بالغرض المطلوب... أخوك بن علية الملف المرفق : africa.zip

السلام عليكم ورحمة الله أخي الكريم، ما هي نسخة الأوفيس التي تعمل عليها ؟ أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، لإضافة الدالة إلى قائمة الدوال وتكون متوفرة عند فتح برنامج إكسيل يجب اتباع الخطوات التالية: 1- فتح ملف جديد 2- نسخ ولصق الدالة (نص كود الدالة) باستعمال محرر VBA في موديول Module 3- حفظ الملف باسم (تختاره) بالتنسيق .xla في نسخة 2003 والتنسيق .xlam في النسخ المتقدمة 2007 فما فوق (دون تغيير مسار التسجيل التلقائي وهو مسار "الوظائف الإضافية") 4- الموافقة على الحفظ 5- تمكين الوظيفة الجديدة في إكسيل كيفية تمكين الوظيفة : * في نسخة 2003 : - فتح خاصية "أدوات" Tools - وضع علامة داخل مربع (بواسطة الفأرة Mouse) للاسم الذي سميته سابقا - الضغط على OK ثم غلق برنامج إكسيل وفتحه من جديد وستجد بإذن الله الدالة متوفرة في القائمة... * في نسخة 2007 فما فوق - فتح خاصية "خصائص إكسيل" Options Excel (حسب النسخة) - اختيار "وظائف إضافية" Add-Ins - ثم اختيار "وظائف إضافية للإكسيل" Excel Add-Ins ثم فتح "إدارة" Manage بأسفل العلبة (على اليمين أو اليسار حسب لغة الواجهة) وبعد النقر على Go يتم اختيار الوظيفة الجديدة المسماة. ملاحظة : عند نقل الملف استعملت فيه هذه الدالة إلى جهاز آخر لا تتوفر فيه هذه الوظيفة (الدالة) نتحصل على الخطأ NOM# أو NAME# وهو خطأ عدم توفر الدالة في الجهاز... أرجو أني وُفقت في شرح العملية... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، قمت بعدة تعديلات في الكود وفي أوراق العمل لمحاولة جعل الملف يعمل دون مشاكل... بالنسبة لكود تغيير اللغة فهو يعمل عندي على أحسن وجه (إلا أنه -معي- يقوم بإلغاء لوحة الأرقام)... أخوك بن علية الملف المرفق : مانفست كلابشة_Ali5.rar

السلام عليكم ورحمة الله أخي الكريم، يستحسن في هذه الحالة استبدال المعادلات التي استعملت فيها الدالة IF بمعادلات بسيطة باستعمال الدالتين INDEX و MATCH (ما دام لديك في الملف جدولا مرجعيا C4:D14) -انظر الملف المرفق-... يمكن أيضا استعمال الدالة SEARCH في مثل هذه الحالات... أخوك بن علية الملف المرفق : حساب النقاط.rar

السلام عليكم ورحمة الله أخي الكريم، معذرة على التأخير بسبب السفر، و أقدم لك الملف التنفيذي التالي الذي يشرح عملية تغيير مستوى أمان الماكرو في أوفيس 2007 -النسخة بالفرنسية- أرجو أن يفي بالغرض... أخوك بن علية الملف التنفيذي : hb1.rar

السلام عليكم ورحمة الله أخي الكريم حمادة، أعتقد أنه يجب أن تضيف كلمة PtrSafe بين كلمتي Declare و Function في السطرين 5 و 6 من الكود وستعود بإذن الله المياه إلى مجاريها... والله أعلى وأعلم انظر إلى الرابط التالي (بالإنجليزية) عله يكون أكثر فائدة مما قدمته بالأعلى... الرابط : http://msdn.microsoft.com/en-us/library/office/gg278581.aspx أخوك بن علية

السلام عليكم ورحمة الله أختي الكريمة نادية، إن الأخ عباد قدم -على ما أعتقد- صورة لتطبيق عملية البحث على نسخة الملف في الرد رقم 21# (دون CheckBox أو قيمته تساوي 0) لذلك عملية البحث عن العدد 10 أعطت جميع البيانات التي رقم ICn يحوي العدد 10 سواء في رقم اليوم أو رقم الشهر أو رقم السنة أو الرقم الذي ينتهي به ICn... وأرقام ICn التي استخرجت بياناتها هي : 257/2010/10/24 (وهنا الرقم 10 موجود في رقم الشهر ورقم السنة) - 253/2012/05/10 (هنا العدد 10 موجود في رقم اليوم) - 10/2012/01/04 (والعدد 10 موجود في نهاية رقم ICn) وهذا سبب ظهور هذه البيانات... بالنسبة لعدم عمل الملفات بطريقة صحيحة في جهازك فهذا ليس لي فيه أي تفسير... أخوك بن علية

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

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

السلام عليكم ورحمة الله أخي الكريم، الدالة غير موجودة في الملف المرفق... ما هو كودها ؟ يجب أولا وضع (نسخ و لصق) كود الدالة بموديول Module بالملف المرفق ثم يمكنك استعمال هذه الدالة حسب خصائصها... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، ما هي الدالة ()SheetNum المذكورة في شريط الصيغة هل هي دالة مستحدثة؟ أم تقصد شيئا آخر بها؟؟ أخوك بن علية

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

السلام عليكم ورحمة الله أختي الكريمة نادية، الظاهر أن المشكلة عندك، فالملفات كلها تشتغل جيدا، قمت بتحضير ملفين تنفيذيين الأول "ملف1" هو تطبيق على ملفي الأول Nadia_Offic8 والثاني "ملف2" هو تطبيق على ملفي الثاني (تعديل ملف أخي عباد) Nadia_Offic8_b... وتلاحظين أن في كلا الملفين عملية البحث تأتي بالمطلوب... والله أعلى وأعلم أخوك بن علية الملف المرفق : Demo.rar

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

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

السلام عليكم ورحمة الله أخي الكريم عادل أبو زيد، معذرة أخي على التأخر في الرد وكما وعدتك بالأمس عملت على الملف لإكمال ما تبقى من المطلوب، وقد أضفت ورقتين للمصنف "الشراء" و "البيع" جمعت فيهما حركة الشراء والبيع للعميل المراد استخراج حسابه بين تاريخين معينين... قمت بإضافة معادلات في العمود A في أوراق الشراء (البضاعة المشتراه - جبنة ثلاجة مشتراه) والبيع (المباع من الرومي - جبنة ثلاجة مباعة) ضرورية لتعبئة ورقتي "الشراء" و "البيع"... أرجو أن تقبل بهذه الإضافات... تم التعديل على الكود وفق هاتين الورقتين الجديدتين... أتمنى أن تفي هذه التعديلات بالغرض المطلوب وأكون إن شاء الله قد وفيت وعدي... أخوك بن علية الملف المرفق : البرنامج_1.rar

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

السلام عليكم ورحمة الله أختي الكريمة نادية، هل جربت الأعداد التالية : 10 ، 44 ، 74 ، 90 ، 91 وهي أعداد موجودة أرقام ICn الخاصة بها... ربما تستعملين أعدادا لا تطابق أرقام الـ IC الموجودة في الجدول.... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، بالنسبة للدالة MAX فقد ذكرت سبب استعمالها بالتسمية، ويمكن استعمال صيغتها (المعادلة) بدل تسميتها في المعادلة بـ J14 غير أنه يجب تأكيد المعادلة بوساطة ctrl+shift+enter مما يزيد في حجم (وزن) المعادلة وقد يبطئ ذلك الملف وهذه أيضا إجابة للتساؤل الثاني، إن لكل معادلة حجم (وزنها بـالـبايت Bits) كلما زاد هذ الوزن كلما أثّر ذلك سلبا في عمل الملف... والدالة VLOOKANYCOL دالة مستحدثة في المنتدى وغير معروف حدودها وطاقتها في الملفات... وقد قارنت وزنها مع وزن الدالة INDEX التي عوضتها بها فوجدت أن وزنها تقريبا 15 مرة وزن المعادلة الجديدة... وليس لي تفسير آخر... أرجو أني قربت المفهوم لحضرتك... ملاحظة : بالنسبة للدالة MAX فهي تقوم بتحديد رقم الصف الأخير الذي يحقق الشرط (من الصف 14): 'الانتاج والمبيعات'!$D$1:$D$10000=الطلبيات!$D14 وهذ يعني تعيين آخر رصيد للصنف المطابق لما في الخلية D14 من شيت "الطلبيات" أخوك بن علية