أ / محمد صالح

وتسهيلا على الإخوة من طول المعادلة قمت بعمل دالة تقوم بالغرض المطلوب بسهولة Function MasDateAdd(interval As String, number As Double, dt As Date) As Date MasDateAdd = DateAdd(interval, number, dt) End Function وطريقة استدعائها =MasDateAdd("m",14,a1) وتعني إضافة 14 شهر (m) إلى التاريخ الموجود في الخلية a1 و ينبغي علينا معرفة الحروف التي يجب كتابتها في interval وهي كالتالي yyyy ----> year , q ----> quarter , m ----> month , d ----> day , ww -----> week , w -----> weekday , y -------> day of year , h ----> hour , n ------> minute , s ---------> second أتمنى أن تكون الدالة موفقة في تأدية المطلوب ملحوظة الدالة تعمل بالزيادة والنقص بمعنى أنه يمكننا طرح عدد معين من الشهور أو الأيام من تاريخ معين مثال =MasDateAdd("m",-14,a1) ولا تنسو أخاكم محمد صالح من صالح دعائكم

أخي الكريم بعد إذن أخي طارق يمكنك استعمال هذه الدالة على فرض أن التاريخ موجود في الخلية a1 =DateAdd("m",14,a1)

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

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

جزاك الله كل خير شرح مفيد ومختصر

يسعدني أن أكون من أول المشاركين لأخي أيسم فرحته وإنجازه فهذا الموضوع كان يشغل بال الكثير والحمد لله الذي وفقك في الوصول إليه وجزاك الله كل خير وجعله في ميزان حسناتك وبالنسبة للآراء فبعد دراسة الملف دراسة متأنية إن شاء الله

سعيد بمرورك أخي مجدي وهذا ملف لشرح الموضوع من أوله كنت قد أرسلته لأخي محمد جبالي http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=37121 أتمنى أن يوضح الصورة لمن لم تتضح عنده وفقنا الله وإياكم إلى كل ما يحب ويرضى

أخي الكريم أنا لا أتحدث عن مكان التوقيع وإنما مكان الصورة التي بالتوقيع فلو مثلا اضفت صورة على القرص المحلي E إلى توقيعك يكون كود html الخاص بهذه الصورة هو <img src="e:\yourpicture.jpg" width="100%" height="100%" /> وعلى هذا حينما يعرض التوقيع داخل الرسالة في جهاز آخر لا يكون عنده صورة بنفس الاسم وفي نفس المسار ولذلك يجب أن يكون مسار الصورة موجود في مكان يتم قراءته في الجهازين جهاز المرسل وجهاز المستقبل وأعتقد أن أفضل مكان للصور هو الانترنت أتمنى أن يكون اتضح الأمر

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

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

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

أخي الكريم أ . مجدي جربت الكود على أكثر من نسخة للأوفيس بداية من اكس بي و 2003 و 2007 و 2010 ولا يوجد مشكلة وتم تلافي جميع المشكلات في المرفق الموجود في المشاركة 14 وجربت النسخ العادي ونسخ التنيق ولم يحدث شيئا عذرا يبدو أن إمكانيات جهازك ليست مرتفعة بالقدر المناسب لطموحك أخي الحبيب خليها على الله

أخي الكريم علي ما توصلت إلى فهمه من خلال ما ذكرته هو أنك تريد عمل رسالة تنبيه إذا كان فرق السنوات بين التاريخين يساوي صفر أو طبعا بالسالب يمكن عمل هذا بكود بسيط في حدث عند تغيير القيم في الشيت Private Sub Worksheet_Change(ByVal Target As Range) If Sheets("sheet1").Range("c2").Value < 1 Then MsgBox "ضع نص رسالتك هنا" End If End Sub أتمنى أن يكون هذا هو المطلوب

أخي علي كثيرا ما لا يحسن أحدنا التعبير عن مقصده بالضبط فأتمنى منك مزيدا من التوضيح حتى نفهم ماذا تريد ويبدو أنك على قدر كبير من العلم بالاكسل فأتمنى أن يكون مطلوبك منطقيا ولا تغضب إن كنت قد قسوت عليك في كلامي هذا وكل عام أنتم بخير

ما شاء الله بارك الله فيك أخي يحيى

أكرمك الله أخي يحيى هذا بعض ما عندكم كل عام أنتم بكل خير

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

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

طبعا الإجابة لا يمكن ولكن الممكن هو استبدال دالة المتوسط average بدالة أخرى لا تظهر خطأ القسمة على صفر وهي بنفس معنى المتوسط =SUM(A8:B8)/2 لأنك في هذه الحالة ستقسم على رقم ثابت وهو عدد الأعمدة وفي حالتك هذه هو الرقم 2 أتمنى أن يكون اتضح الأمر

أخي قصي الأمر لايحتاج إلى إرفاق ملف ولا مثال يمكنك عملها أنت في ملف عندك 1- قم بعمل معاينة قبل الطباعة ستجد أن عدد الصفحات مثلا 4 صفحات و5 سطور وتريد ضغط ال 5 سطور في الأربع صفحات بحيث يتم طباعة الجميع في 4 صفحات فقط - لعمل ذلك افتح page setup من قائمة file وفي الجزء الخاص ب fit fit to 1 page wide by 4 pages tall ok - قم بمعاينة الصفحات مرة أخرى ستجد أنها اصبحت 4 صفحات فقط والسلام عليكم ورحمة الله وبركاته

باختصار أخي فوزي gutter تعني هامش التوثيق أو بالعامية التدبيس فعندما نريد تدبيس مجموعة من الأوراق لتجميعهم كملف واحد يمكنك التدبيس في الناحية اليمنى أو اليسرى أو من الأعلى ويسألك برنامج الوورد عن مساحة هامش التدبيس بحيث يزيد الهامش في هذه الناحية عما هو عليه بمقدار هامش التوثيق هذا حتى يظهر باقي المستند بدون مشاكل بعد عملية التدبيس أعتقد أن الموضوع اتضح لمن يعرف اللهجة المصرية واعذروني إن كنت لا أعرف معنى الدبَاسة باللهجات العربية الأخرى أخوكم أبو عبد الله محمد صالح

أخي الكريم فوزي كل عام أنتم بخير موضوع ال scaling هذا يعني التحجيم وهو خاص بنسبة الملف إلى الحجم الصلي عند الطباعة وهذا هو معنى الجزء العلوي من التحجيم فإذا أردت طباعة الملف بنسبة 75% من حجمه الأصلي أو بنسبة 115% يمكنك عمل ذلك من الخاصية الأولى والخاصية الثانية مرتبطة بالأولى بحيث يمكنك التحكم في عدد الصفحات التي يطبع فيها الشيت وذلك يكون طبعا بتغيير نسبة الملف إلى حجمه الصلي فلو مثلا أردت طباعة شيت وفي المعاينة ظهر الشيت كصفحة وسطرين في الصفحة الثانية يمكنك باستعمال الخاصية الثانية في التحجيم بمناسبة الملف إلى صفحة واحدة عرض في صفحة واحدة طول وبذلك ستتم طباعة الشيت في صفحة واحدة فقط وبالطبع ستتغير نسبة التحجيم في الخاصية الأولى إلى اقل من 100% أتمنى أن يكون اتضح الأمر

أردت فقط تهنئتكم أحبابي زوار مدونتي بالعيد الأضحى أعاده الله علينا وعليكم بكل خير وفقنا الله وإياكم لزيارة بيته الكريم تحياتي أخوكم أبو عبد الله محمد صالح

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

بعد إذن أخي نادر هذه روابط لتحميل البرنامج http://www.multiupload.com/AEG8Q4B18J أو http://www.mirrorcreator.com/files/U2FTSCLC/_______________________________________________________________230.rar_links وكل عام أنتم جميعا بخير