بن علية حاجي

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

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

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

السلام عليكم ورحمة الله أخي الكريم، لا يمكن التعامل مع الصورة في هذه الحالات... يجب وضع بالمرفقات الملف الذي به هذا المشكل (أو ملف يشبهه) أخوك بن علية

السلام عليكم جرب هذا الحل بالمرفق باستعمال معادلات صفيف مع نطاقات بالتسمية (لاختصار المعادلات).... أرجو أن يفي بالغرض المطلوب أخوك بن علية ملاحظة : لقد أرفقت الملف الخطأ (ملف خاص بموضوع آخر) لتشابه المرفقات، أرجو المعذرة بشدة المرفق : استعلام.rar

السلام عليكم ورحمة الله أخي الكريم، هكذا فهمت المطلوب وتجد الحل (بالنسبة للمطلوب الأول) في الملف المرفق (المطلوب الثاني يمكن بالفكرة نفسها نتحصل عليه، وقد وضعت له بعض الحالات في الخلايا الخضراء)... أخوك بن علية الملف المرفق : Book1.rar

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

السلام عليكم ورحمة الله أخي الكريم ناصر سعيد، هذا ما فهمته من كلمة "الجميع"، ولكن لا مشكلة انظر إلى المرفق لعل فيه المطلوب... أخوك بن علية المرفق : كود الدوائر الحمراء على الشهادات.rar

السلام عليكم ورحمة الله أخي الكريم، تم التعديل على الكود بتغيير كلمة temp بكلمة AfterPoint تقريبا في سطر من السطور الأخيرة من الكود... أرجو أني وفقت في التعديل... أخوك بن علية الملف المرفق : 2015.rar

السلام عليكم ورحمة الله أخي الكريم سمير الصفار، لحل هذه المعضلة يجب إضافة كلمة PtrSafe في الكود بين كلمة Declare بالنسبة لـ(Public أو Private) وكلمة (Sub أو Function) حسب الكود فيكون شكل بداية الكود كما يلي : Syntax 1 (Sub) [Public | Private] Declare PtrSafe Sub name Lib "libname" [Alias"aliasname"][([arglist])] Syntax 2 (Function) [Public | Private] Declare PtrSafe Function name Lib "libname" [Alias"aliasname"] [([arglist])] [As type] أرجو أني قدمت يد المساعدة أخوك بن علية

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

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

السلام عليكم ورحمة الله أخي الكريم تم عمل المطلوب في الملف المرفق، بالنسبة للشرح -وهذه أصعب المراحل- أقول وبحمد الله: تم إدراج عناصر القائمة المنسدلة (حسب الحالات) في العمود IU بداية من الخلية IU2 (يمكن الاطلاع عليها) وتم تسمية هذه القائمة بالتسمية List (في هذا الملف) ثم تم إنشاء عنصر التحكم بالقائمة المنسدلة باستعمال أدوات VBA وربطه بالقائمة المنسدلة المسماة List وبالخلية IT2 ثم ربطه بالكود الذي سميته hben (كود الإخفاء والإظهار)... وفي هذا الكود تم التعديل على أسطره لإخفاء وإظهار الأعمدة حسب الحالات المنصوص عليها في القائمة المنسدلة وحسب عددها، لا أستطيع أن أشرح أكثر... لست أدري إن كنت قد أوصلت الفكرة؟ وأرجو أن تعذرني على هذا التقصير في الشرح... الملف المرفق بنسخة إكسيل 2003 : شيت الصف الخامس اظهار واخفاء مع الشرح.rar ملاحظة : إن حدث معك أي مشكل عند فتح الملف باستعمال إكسيل 2007 أو أعلى، أبلغني بذلك لأضع لك الملف المناسب لهذه النسخ من الإكسيل (مثل ما فعلتُ سابقا) أخوك بن علية

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

السلام عليكم ورحمة الله أخي الكريم، أعتقد أن الورقة محمية دون كلمة سرية، قم بإلغاء الحماية عنها (دون استعمال أي كلمة سرية) واكتب ما تريد من الأصناف (وبالمثل بالنسبة للأوراق الأخرى التي يتم فيها الحجز يدويا).... والله أعلم أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، إن الزر الوحيد غير المفعل هو "عن البرنامج"، أما الباقي فكلها عندي مفعلة.... جرب هذا المرفق الذي فتح معي... أخوك بن علية المرفق : Al Zayed Sales And Stores v.02.rar

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

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

السلام عليكم ورحمة الله أخي الكريم أبو حازم، يمكن ضم هذا النطاق إلى التسمية Plage وترك الكود كما هو أو يمكن إضافة هذا النطاق إلى الكود فيكون الجزء من الكود كما يلي : Range("Plage,ddd").Interior.Color = [B2].Interior.Color والله أعلى وأعلم أخوك بن علية

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

السلام عليكم ورحمة الله أخي الكريم، هذا المشكل يظهر عادة عندما نريد فتح ملف من نسخة إكسيل 2003 بنسخة إكلسيل 2007 أو أعلى، والمشكل يتعلق بلتوافق بين هذه النسخ للإكسيل... أضع بين يديك نسخة أخرى للملف تم حفظه في إكسيل 2010 (بالامتداد .xlsb)... أرجو هذه المرة أن يعمل معك الملف دون مشاكل (ولكن قبل فتحه بالإكسيل يجب تمكين وحدات الماكرو في خصائص الإكسيل)... أخوك بن علية الملف المرفق : شيت الصف الثانى الابتدائى_4.rar

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

السلام عليكم ورحمة الله ولو كان الخلية الرئيسية في ورقة أخرى كيف بكون الكود وشكرا جزيلا الأمر سهل، إذا كانت الخلية الرئيسية في ورقة أخرى، يكفي إضافة قبل [b2] اسم الشيت المعني باستعمال العبارة .("WorkSheets("Sheet2 أو .Sheet2 فيكتب الجزء من الكود : [Plage].Interior.Color = [B2].Interior.Color على الشكل : [Plage].Interior.Color = WorkSheets("Sheet1").[B2].Interior.Color أو على الشكل : [Plage].Interior.Color = Sheet1.[B2].Interior.Color أرجو أني وفقت في الإجابة ملاحظة : التسمية Plage هي تسمية لنطاق كل الخلايا التي نريد تلوينها أخوك بن علية

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

السلام عليكم ورحمة الله تم عمل المطلوب في الملف المرفق... بن علية الملف المرفق : م التدريب الادارى.rar