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

السلام عليكم استشارني صديق بشأن معادلة لبيان حالة سجل المتابعة لتبيان اذا ما كان تم انجازه قبل أو في أو بعد الوقت أو ما زال قيد الانجاز كما هو موضح فى الشكل و الملف المرفق، فاعددت له المثال المرفق عن طريق المعادلات و بصرف النظر عن الحلول الأخرى الممكنة باستخدام الاكواد ، اتصور انه ربما توجد حلول افضل بالمعادلات أيضا ، لذا طرحته للفائدة و الاستفادة والاستزادة من مقترحات الأخوة الكرام =IF(D3=E3,"بحسب المخطط",IF(E3>D3,"متأخر",IF(E3="",IF(D3<TODAY(),"فات الوقت","قيد الإنجاز"),"متقدم"))) =IF(D13=E13,"On Time",IF(E13>D13,"Delayed",IF(E13="",IF(D13<TODAY(),"Overdue","In Process"),"Ahead"))) مرفق الملف LogTracking.xlsx

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

كما انه من فترة تم افتتاح اقسام تحص ما يتعلق بالبحث العلمي بالذكاء الاصطناعي و برمجته و البيانات الضخمة ، و منها قسم للبايثون و لكن للاسف لم يحدث فيها تفاعل ملحوظ حتى الان https://www.officena.net/ib/forum/174-البحث-العلمي-و-علوم-البيانات/

السلام عليكم ان لغة البايثون هي لغة برمجة تتميز بانها مفتوحة المصدر و سهلة الاستخدام مقارنة ببعض اللغات الاخرى ، يمكن ان تستخدم فى العديد من الامور و تشتهر فى مجالات التحليل الاجصائي و تطبيقات الذكاء الاصطناعي و برمجة الالعاب فضلا عن بناء عدد كبير من انواع البرامج الاخرى https://ar.wikipedia.org/wiki/بايثون_(لغة_برمجة) اما الاكسيس فهو احد اشهر تطبيقات قواعد البيانات ـ و و هو ليس تطبيق مجاني و جزء من حزمة الاوفس لشركة مايكروسوفت ، و يقبل ايضا البرمجة بلغة فيجوال بيزيك التطبيقات https://ar.wikipedia.org/wiki/مايكروسوفت_أكسس لذا فلبس هناك مقارنة بالمعنى المفهوم ، و انما كل منها ميسر لما أنشء من اجله

تم نقل الموضوع لقسم الاكسيس

السلام عليكم واجهتني مشكلة اخري فى الملفات الكبيرة ، و هى أنه عند التبديل بين الثلاثة وضعيات ، يتغير موقع المؤشر ، خاصة عندما تكون البيانات ضمن جداول فمثلا و انت تراجع البند رقم 200 ، عند اختيار اظهار النسخة الاصلية ينتقل المؤشر للبند 140 مثلا ، حيث أنه يبدو ان ذلك يعتمد على عدد الاسطر او موقع المؤشر ، دون مراعاة النص الظاهر ، ففي حالة الوضع الاصلي يكون عدد الاسطر اقل بالطبع و بالتالي تجد المؤشر فى مكان مختلف و الحل هو حفظ مكان المؤشر قبل تبديل طريقة الاظهار Dim currentPosition As Range Set currentPosition = Selection.Range و العودة له فى نهاية كل كود currentPosition.Select و طبعا يمكن استخدام خاصية ايقاف و تفعيل خاصية تحديث الشاشة فى بداية و نهاية الكود كي لا يشعر المستخدم بعملية الانتقال Application.ScreenUpdating = False Application.ScreenUpdating = True و عليه تكون الاكواد النهائية Sub Markup_No() ' Hide all Markups Application.ScreenUpdating = False Dim currentPosition As Range Set currentPosition = Selection.Range With ActiveWindow.View.RevisionsFilter .Markup = wdRevisionsMarkupNone .View = wdRevisionsViewFinal End With currentPosition.Select Application.ScreenUpdating = True End Sub Sub Markup_All() ' Show All Markup Application.ScreenUpdating = False Dim currentPosition As Range Set currentPosition = Selection.Range With ActiveWindow.View.RevisionsFilter .Markup = wdRevisionsMarkupAll .View = wdRevisionsViewFinal End With currentPosition.Select Application.ScreenUpdating = True End Sub Sub Markup_Original() ' Markup_Original Macro Application.ScreenUpdating = False Dim currentPosition As Range Set currentPosition = Selection.Range With ActiveWindow.View.RevisionsFilter .Markup = wdRevisionsMarkupNone .View = wdRevisionsViewOriginal End With currentPosition.Select Application.ScreenUpdating = True End Sub

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

لم تقم باضافة وسيلة التواصل في المشاركة

السلام عليكم تم عمل ترقية جديدة للمنتدى الان اذا واجهتك مشاكل بعد التحديث يرحى افراغ الكاش من المتصفح مثلا فى جوجل كروم او ختصارا CTR+Shift+DEL

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

السلام عليكم عادة ما تحدث بعض المشاكل بعد التحديث نتيحة تخزين المتصفح للصفخات القديمة و الحل الناجح عادة يكون اما CTR+F5 او تفريغ الكاش من المتصفح و ايضا الحرص على ان يكون المتصفح المستخدم من أحدث اضدار

السلام عليكم خيار تغيير اللغة موجود اسفل صفحة المنتدى

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

السلام عليكم يرجى ضغط CTR+F5 لتحديث الصفحات المخزنة و ان لم يكن افراغ الكاش من المتصفح

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

يرجى مراجعة شروط النشر فى هذا القسم لابد من وضع وسيلة للتواصل

السلام عليكم احتجت مؤخرا لمراجعة مستندات كثيرة مع فريق عمل اون لاين و اثناء المراجعة الفردية قبل المناقشة، و ايضا أثناء المناقشة أون لاين، كثيرا ما اجتجت للتبديل بين وضعية اظهار و اخفاء التعديلات واظهار المستند النهائي بعد التعديل و اظهار المستند الأصلي و كل منها تتطلب ثلاثة خطوات 1- الذهاب الي قاءمة المراجعة إذا لم تكن هي المفعلة 2- ثم اختيار مربع السرد الخاص باظهار خيارات التعديلات Markup 3- ثم اختيار أحد الخيارات الفرعية، و عليه و نظرا لحاجتي لتكرار استخدام هذه الأوامر كثيرا اثناء المناقشة و اثناء مراجعتي للمستند قبل المناقشة، قمت بتسجيل تلك الاوامر كماكروهات ثم اضافتها فى ايقونات بجانب اوامر المراجعة كما تظهر الصورة ضمن المحموعة المسماة Arafa كما هو موضح بالصورة ، و ذلك لاستخدامها بسهولة و سرعة أكبر بدل عن اختيار قائمة المراجعة ثم مربع السرد ثم احد الخيارات أي ستبدال ثلاثة خطوات بخطوة واحدة و قد وجدت في ذلك توفيرا ملحوظا على الرغم من بساطة الامر ، لذا احببت مشاركة ذلك معكم و الأكواد هي Sub Markup_No() ' Hide all Markups With ActiveWindow.View.RevisionsFilter .Markup = wdRevisionsMarkupNone .View = wdRevisionsViewFinal End With End Sub Sub Markup_All() ' Show All Markup With ActiveWindow.View.RevisionsFilter .Markup = wdRevisionsMarkupAll .View = wdRevisionsViewFinal End With End Sub Sub Markup_Original() ' Markup_Original Macro With ActiveWindow.View.RevisionsFilter .Markup = wdRevisionsMarkupNone .View = wdRevisionsViewOriginal End With End Sub و يمكن أيضا اضافة تلك الاوامر الي قائمة الوصول السريع لكي تكون متاحة عند تفعيل اي قائمة و ذلك عن طريق اختيار الايقون ثم الضغط بالزر الايمن للفأرة و اختيار الاضافة لقائمة الوصول السريع و لمن لا يريد استخدام الاكواد هناك حل وسط بكفاءة أقل قليلاً ، حيث مازلت ستحتاج للضغط مرتين بدل من ثلاثة و لكن بطريقة اسهل و هو عن طريق اصافة الخيار الي قائمة الوصول السريع Quick Access Bar كما هو موضح فى الصورة التالية 1- اختار قائمة المراجعة و ثم مريع السرد الخاص باظهار التعديلات 2- اضغط على الزر الايمن للفأرة 3- اختيار الاضافة علي قائمة الخيارات السريعة Quick Access Toolbar 4- ستتم الاضافة كما هو مبين و لكن كما ذكرت فى هذا الحل ستحتاج عند الاستخدام للنقر مرتين و لكن بطريقة اسهل ودون الحاجة لاختيار القائمة الخاصة بالمراجعة

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

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

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

اللهم اغفر له وارحمه وادخله فسيح جناتك

شكرا علي كلماتكم الطيبة 🌷

يتقدم فريق الموقع و أعضاؤه بخالض العزاء للأخ @مجدى يونس لوفاة والدته اللهم اغفر لها و ارحمها و أدخلها فسيح جناتك إنا لله و إنا إليه راجعون عظم الله أجركم

و هذه المصفوفة من ملفات المساعدة لبرنامج SPSS تساعد فى تعريف انواع المتغيرات فى البرنامج بسهولة

اعرض الملف كود لقلب وضعية بلوكات كاملة طلب مني زميل حل لعكس ترتيب مجموعة من بلوكات البيانات من الوضعية الافقية الي الوضع الرأسي و ذلك دون تغيير وضعية البيانات داخل البلوك الواحد ، كما هو مبين فى الضورة يمتاز الكود بعدم مجدودية عدد البلوكات (يتم الاختيار طبقا للتظليل) و يمكن تعديله بسهولة ليناسب اعداد الاعمدة المختلفة داخل البلوك و ذلك يتعديل قيمة متغير واحد فى الكود. و لكي تستخدم هذا الكود قم اولا بتحديد عدد الأعمدة داخل كل بلوك عن طريق المتغير CC فى الكود و فى المثال هنا عدد أعمدة كل بلوك هو 3 ـ و يمكنك تغييره كما تشاء ثم قم بتظليل كافة البيانات المراد تغيير وضعها على أن تكون عدد الاعمدة المختارة من مضاعفات الرقم المختار لأعمدة كل بلوك ثم شغل الكود Sub PivotBlocks_arafa() Dim r, c, b As Integer Dim g As String cc = 3 ' قم بتعديل هذا الرقم لتغيير عدد الاعمدة الافتراضي فى البلوك الوحد r = Selection.Rows.Count c = Selection.Columns.Count b = c / cc g = ActiveCell.Address For x = 1 To b - 1 Range(ActiveCell.Offset(0, cc * x), ActiveCell.Offset(r - 1, cc * x + cc - 1)).Cut ActiveCell.Offset(r * x - 1 + 1, 0).Activate ActiveSheet.Paste Range(g).Activate Next x End Sub صاحب الملف محمد طاهر تمت الاضافه 07 يول, 2020 الاقسام قسم الإكسيل