دغيدى

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

أخى / ابراهيم محمد سلام الله عليكم وكل عام وأنتم بخير تتطورت الفكرة لنصل لما نصبوا إليه

ما رأيكم لعبة جميلة لتنشيط الذاكرة.rar

أخى الكريم هذا الموضوع من المواضيع المخالفة يمكنك مراسلة الزميل على الخاص عفوا يغلق الموضوع

=IF(MONTH(TODAY())>=9;YEAR(TODAY());YEAR(TODAY())-1)& " / " &IF(MONTH(TODAY())>=9;YEAR(TODAY())+1;YEAR(TODAY()))& " م " تفضل ليت التنسيق بالعربية

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

الأخ / خالد شعبان سلام الله عليكم طلب منكم الزميل محمدى عبد السميع ازالة كل وسائل الحماية حتى يكون الموضوع مفيدا ولكن..............

أخى الفاضل دوما / عباس السماوى شكرا لكم على مجاملتكم الرقيقة

عزيزى ؟؟؟؟؟؟؟؟؟؟ لما لا تكتب اسمك الصحيح للتواصل الشخصى أين الملف

شكرا أخى الكريم / محمد ابراهيم

لاحظت ضرورة كتابة الحروف الكبيرة والصغيرة (username)

Private Sub Workbook_Open() Dim US As String Dim i As Integer US = Environ("username") If US <> "Gamal" Then ' PUT HERE NAME OF THE USER FOR COMPUTER Sheets("ورقة2").Visible = xlSheetVeryHidden Sheets("ورقة3").Visible = xlSheetVeryHidden Else For i = 1 To Sheets.Count Sheets(i).Visible = xlSheetVisible Next End If End Sub ما رأيك اخى الكريم فى هذه الحالة لو لم يكن اسم الجهاز مطابقا للكود سوف يخفى الشيتات الحددة

أخى الكريم / ابراهيم محمد شكرا لكم لوحظ أن If US = "IBRAHIM" Then موجود بالكود برجاء شرح الكود وما دور موديول 1

أخى الكريم الملف لا يعمل عندى ( office 2013) اسم الجهاز Gamal برجاء تعديله

أخى الكريم أكمل الكود بعدم الفتح فى حالة عدم تطابق اسم المستخدم للجهاز مع اسم محدد داخل الكود ( لعدم نقل الملف)

تم حذف المشاركة الغريبة المخالفة

أخى الكريم الوحدات لا تتجزء

يغلق الموضوع للمخالفة الصريحة لقواعد المشاركة

أخى قنديل وفقكم الله السن يحسب فى 1/10 فى بداية السنة الدراسية يعنى 1/10/2013 وشكرا

أخى الكريم / ابراهيم ابو ليلة وفقكم الله حل مبدع الأخ الكريم / الأب الروحى اشكركم على مشاعركم الصادقة ولِماذا لا تغير اسم الظهور لان من حقنا التواصل الشخصى

=IF(B4<90.449;SUM(B4;94.5);IF(AND(B4>=90.5;B4<=118.449);SUM(B4;91.5);IF(B4>235.5;B4+64.5;""))) أخى الكريم تفضل ولكن 1 - طلبك لا شمل الأعداد من 118.5 إلى أقل من 235.5 2 - ما معنى سؤال اكسل صندوقه هل هذا العنوان معبر فى حالة البحث فى المواضيع ؟؟؟؟؟؟؟؟؟

السلام عليكم شكرا جزيلا لجميع من شاركوا وخاصة الاجاية الشافية للأخ / عبد الله باقشير

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

أخى الأب الروحى شكرا على ذوقك الرفيع

أخى الأب الروحى كلام الزميل بن علية مضبوط لا بد ان تكون متسلسلة