محمد طاهر عرفه

جزاك الله خيرا معاك حق اضافة السولفر آليا لن تضر و لكن لاحظت ان اضافته فى المرة الاولي على اوفيس 2007 تأخذ بعض الوفت اذا لم يكن محملا من قبل ، لذا فى هذه الحالة قد يكون من الاسلم اضافته يدويالاول مرة على الاقل اذا لم يكن محملا ضمن تحميل الاوفيس ، ثم التحكم فى تفعيله من عدمه بالكودكما تفضلت و قد عدلت الكود الاصلي ليسمح بالتفعيل الالي كما تفضلت مع أن يصبح فيه نوع من الاستئذان فبل التفعيل لربما لا يرغب المستخدم فى التفعيل لأي سبب ، و الاصدار السابق كان فقط ينبه الى عدم التحميل و يغلق الملف If AddIns("Solver Add-in").Installed = False Then If MsgBox("You must activate the Solver Add-in to use this File", vbYesNo, "Some Thing Wrong !") = yes Then AddIns("Solver Add-in").Installed = True End If End If

الملف فى مكتبة الموقع http://www.officena.net/ib/index.php?app=downloads&showfile=99 موضوع الحوار http://www.officena.net/ib/index.php?showtopic=32359

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

إسم الملف: برنامج لتقليل هالك الحديد File Submitter: محمد طاهر تاريخ الإضافة: 11 May 2010 آخر تحديث: 17 Jun 2010 القسم فى المكتبة: دورات و دروس فى الإدارة والعمل و الحياة هذا الملف لتقليل هالك الحديد و يعتمد على اضافة السولفر فى الاكسيل 2007 و يعيبه استغراق وفت طويل فى الحساب و يوجد به خمسة طرق مختلفة للحساب تختلف فى دقتها و سرعتها الملف اعددته من فترة طويلة و استغرق جهدا كبيرا ، و لكن لا أستطيع الحكم عليه و عن مدى فائدته بعد مضي هذه الفترة ، و لكن للاسف لم انشره سابقا وأوفيسنا لم يكن قد تم افتتاحه بعد ،و قد ذكرني به موضوع الأخ طارق ، لذا أنشره الآن و اتمني ان يكون مفيدا للمهتمين بهذا المجال و يعيب هذا الملف أنه قد يغيب أثناء التنفيذ خصوصا مع الطرق الأولي و أسرع الطرق و أقلها دقة هي الخامسة المسماة Turbo صراحة لم استرجع تفاصيل الملف ، فقد مضت فترة و اتركه بين يدي المهتمين بهالك الحديد و الأكواد ، الان قمت بتعديله ليعمل على 2007 ، و تذكر لابد من وجود اضافة السولفر ليعمل Solver Add-in و ايضا اوجه الانتباه الي انه قد يطول فترة التنفيذ بحسب الحالة و الطريفة المختارة فصبرا جميلا أترككم مع الملف إضغط هنـــــــــــا لتنزيل الملف

جزاكم الله خيرا و السجع فى الموضوع أجمل من المرفقات كمان

موضوع مرتبط http://www.officena.net/ib/index.php?showtopic=729&st=0&p=3588&hl=العائد&fromsearch=1&#entry3588

عند مقارنة خيارات متعددة وفقا لمعايير محددة ، يتم أولا تحديد وزن نسبي لكل من هذه المعايير حتى نستطيع الوصول الى قرار و هنا سنعرض لطريقة تحديد الأوزان النسبية ، و من ثم عمل التقييم و طبعا اشهر تطبيق لذلك عند المقارنة بين المتقدمين لمناقصة معينة وفقا لعدة معايير و هنا يشتمل المثال على المقارنة بين عدة أنواع افتراضية من السيارات وفقا لمجموعة من المعايير مثل السعر و الصيانة و درجة الرفاهية و درجة الأمان ، و بناء على ذلك سنتعلم كيف نضع أوزان نسبية لكل من المعايير ، و بناء على ذلك تتم عملية المفاضلة ومرفق مثال بالاكسيل يحوي أتمتة كاملة لتطبيق الطريقة التي تم شرحها فى العرض التقديمي ، يحوى دالتين بالكودالمثال معد بواسطة اكسيل 2007 الشرح و الملف التطبيقي فى مكتبة الموقع و قد تم اليوم اضافة الاصدار الثالث http://www.officena.net/ib/index.php?app=downloads&showfile=96 Function countme(Mycell, Mychr) countme = 0 For i = 1 To 4 If Mid(Mycell, i, 1) = Mychr Then countme = countme + 1 Next i End Function Function Countmyrange(Myrange As Range, Mychr) For i = 1 To Myrange.Cells.Count Countmyrange = Countmyrange + countme(Myrange.Cells(i), Mychr) Next i End Function

يمكنك استخدام احد برامج التقاط الصور من الشاشة مثل Snagit

جميل جدا شكرا على الموضوع الشيق فى البداية استغربت الامر و تصورت انه قد يكون مصادفة الفكرة تعتمد على اننا نتعامل مع ثلاثة ارقام نكررها فتصبح 6 ثم ان ناتج القسمات الثلاثة ايا كان ترتيبها عو يناظر فعليا القسمة على 1001، و بالتالي سنحصل على الرقم الاصلي فى كل الاحوال لان الرفم الاصلي ثلاثي

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

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

تجرية من جوجل كروم

اذا تريد جعلها خلفية لجميع الشاشات view slide master insert picture

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

تجربة تجربة تجربة

السلام عليكم نظام الموقع لا يحوي رسائل خاصة الا بعد الترقية الي الأعضاء الفاعلين و يكون ذلك بترشيح من المشرفين عند ملاحظة مشاركات فاعلة فى طرح مواضيع و الرد على الاستفسارات

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

اذهب الى Sent Items اختار Developper Design This Form ثم اختار اظهار حقل النسخة BCC كما فى الصورة ثم احفظ الملف

اللهم اشفه شفاء لا يغادر سقما و جميع مرضى المسلمين

من الممكن أن تأتيه رسالة فورية عن طريق Tools Rules adn Alerts أو من القائمة المختصرة Create Rule و لكنها ستكون مرسلة من احد خساباتك و طبعا هذا ليس المطلوب و من الممكن من نفس المكان عمل قاعدة لحذف البريد آليا فور وصوله كما أنه من الممكن تعريف البريد كبريد غير مرغوب فيه من القائمة المختصرة Junk Email فنزل في المجلد الخاص بذلك

اختصارات االاكسيل 2007 بطريقة سهلة (و باقي تطبيقات الاوفيس ايضا ) ربما نشر هذا الموضوع سابقا ، و لكن حقيقة استغربت اني لم الااحظ هذه الخاصية لمعرفة الاختصارات و التعامل معها ، اضغط Alt ، ستظهر لك كافة الاختصارات للقوائم على الشاشة و بالتبعية بعد الدخول للقوائم الفرعية و ايضا للايقونات المخصصة كما هو مبين فى الصورة و كذلك الحال لباقي تطبيقات الاوفيس و عذرا اذا كان مكررا

اختصارات الوورد 2007 بطريقة سهلة ربما نشر هذا الموضوع سابقا ، و لكن حقيقة استغربت اني لم الااحظ هذه الخاصية لمعرفة الاختصارات و التعامل معها ، اضغط Alt ، ستظهر لك كافة الاختصارات للقوائم على الشاشة و بالتبعية بعد الدخول للقوائم الفرعية و ايضا للايقونات المخصصة كما هو مبين فى الصورة و كذلك الحال لباقي تطبيقات الاوفيس

تم التعديل

اعرض الملف تحديد الأوزان النسبية و التقييم + تطبيق بالإكسيل عند مقارنة خيارات متعددة وفقا لمعايير محددة ، يتم أولا تحديد وزن نسبي لكل من هذه المعايير حتى نستطيع الوصول الى قرار و هنا سنعرض لطريقة تحديد الأوزان النسبية ، و من ثم عمل التقييم و طبعا اشهر تطبيق لذلك عند المقارنة بين المتقدمين لمناقصة معينة وفقا لعدة معايير و هنا يشتمل المثال على المقارنة بين عدة أنواع افتراضية من السيارات وفقا لمجموعة من المعايير مثل السعر و الصيانة و درجة الرفاهية و درجة الأمان ، و بناء على ذلك سنتعلم كيف نضع أوزان نسبية لكل من المعايير ، و بناء على ذلك تتم عملية المفاضلة ومرفق مثال بالاكسيل يحوي أتمتة كاملة لتطبيق الطريقة التي تم شرحها فى العرض التقديمي ، يحوى دالتين بالكود تم استخدامهما فى المقارنةو المثال معد بواسطة اكسيل 2007 صاحب الملف محمد طاهر تمت الاضافه 27 مار, 2010 الاقسام Project Management