أ / محمد صالح

بسم الله الرحمن الرحيم إخوتي في الله سلام الله عليكم ورحمته وبركاته بالنسبة للدالة المستخدمة في ملفي taqseet2 هي دالة FLOOR تستعمل في تقريب رقم لأسفل، باتجاه الصفر، إلى أقرب رقم مضاعف معنوي. بناء الجملة (FLOOR(number,significance Number (الرقم) القيمة الرقمية التي تريد تقريبها. Significance (الرقم المضاعف) المضاعف الذي تريد تقريبه. ملاحظات إذا كانت إحدى الوسيطتين غير رقمية، ترجع FLOOR القيمة الخطأ #VALUE!. إذا كان لكل من number وsignificance لهما إشارات مختلفة، ترجع FLOOR قيمة الخطأ #NUM!. بصرف النظر عن إشارة الرقم، فيتم تقريب القيمة لأسفل عند تعديلها بعيداً عن الصفر. فإذا كانت number عبارة عن مطابقة الرقم بمضاعفات الأرقام المعنوية، فلا يحدث تقريب. فبالنسبة للطريقة الأولى تجد في الخلية d2 المبلغ المراد تقسيطه وتجد في الخلية d5 عدد الأقساط وتجد في الخلية d3 هذه المعادلة =D2-FLOOR(D2/2;D5) وتعني أنها تساوي المبلغ - تقريب ناتج قسمة المبلغ على 2 (النصف ) إلى أقرب عدد الأقساط بمعنى أن نصف المبلغ وليكن 833 هو 416.5 والدالة تقربه لأسفل إلى أقرب رقم يقبل القسمة على عدد الأقساط (4) وأقرب رقم يقبل القسمة على 4 لأسفل من الرقم 416.5 هو 416 ثم نأتي لعملية الطرح 833-416=417 فيكون هذا هو قيمة القسط الأول والباقي 416 مقسم على 4 أقساط كل قسط =416/4 يساوي 104 وهكذا مع تغير المبلغ وتغير عدد الأقساط وأعتقد أنكم يمكنكم تفسير باقي المعادلات في باقي الطرق وإلا فأنا مبعرفش أشرح تحياتي للجميع MAS

أشكر أخي خالد على مروره وكلماته الرقيقة وأشكر أخي بوعمر رغم أني كنت متوقع أنك من المستخدمين لأوفيس 2007 نصيحة أخرى كنا نحفظ اختصارات لوحة المفاتيح في الأوفيس السابق وكثيرا ما نريد الوصول السريع للأمر ولكننا نفشل أو نصل للأمر المطلوب بعد كثير من الخطوات *** الآن في أوفيس 2007 يمكنك الضغط على زر alt لتجد صورة مثل هذه وفي الصورة السابقة تجد كل حرف يميز التبويب الخاص به فإذا ضغطت على حرف h والذي يخص التبويب home ستجد هذه الصورة أيضا فإذا أردت مثلا فتح قائمة الخطوط اضغط ff وهذه تعني المجموعة font لأن كل تبويب مقسم إلى مجموعات وكل مجموعة مقسمة إلى أوامر ثم بعد اختيار المجموعة اخترت font والذي هو نوع الخط إذا لتفتح قائمة الخطوط من لوحة المفاتيح تضغط alt+h+ff أتمنى أن تكون نصيحة سريعة ومفيدة وهكذا أتمنى من الإخوة من يعلم شيئا يخبر الجميع به ملحوظة الصور من أوفيس 2010 ولكن الفكرة واحدة بإذن الله أخوكم محمد صالح

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

أخي الكريم الموضوع أولا وأخيرا يرجع لشخصية الإنسان من حيث كونه مغامر ومتطلع وباحث أم أنه يتبع القول : " اللي تعرفه أحسن من اللي متعرفوش" أنا شخصيا استعمل أوفيس 2010 ورغم أنه نسخة تجريبية technical preview ولكني مؤمن بأن شركة عظمى في مجال البرمجيات وتمتلك فريق عمل لا يوجد مثله في العالم مثل ميكروسوفت ستخرج على العالم بنسخة تكون أقل شأنا من سابقتها ولذا انصحك باستخدام كل ما هو حديث والصبر على العلم ويوجد حكمة تقول : "الإنسان عدو ما يجهل" بمعنى أنه إذا صعب عليه شيء قال أنه غير جيد رغم أنه من الممكن أن يكون العيب فيه وأولا وأخيرا هذا مجرد رأي ولكل منا رأيه الخاص فلا حجر على رأي أحد ولا أطالب الآخرين بالتبعية الفكرية فأنا أكره التبعية الفكرية جدا تحياتي أخوك محمد صالح

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

يا أخي لو لاحظت المعادلة المكتوبة في الخلية كنت ستجد أنك يمكنك التعديل كما ترغب فقط استبدل الجزء التالي في المعادلة DAY(TODAY()) وضع مكانه "1" وعلى العموم هذا الملف بعد التعديل أشكرك على ذوقك فيما يخص موقعي المتواضع frmfirst2last.rar

أخي الكريم هل عدد الأقساط متغير أم ثابت على خمس أقساط؟؟ وأعتقد أنه لا يجب تساوي الأقساط الأربعة الباقية في الطريقة الثانية لأنه من الممكن أن يكون المبلغ المتبقي بعد ما يتم دفعه لا يقبل القسمة على أربعة أم أنه يمكننا تعديل المبلغ المدفوع لما ينبغي أن يكون على العموم هذه محاولة taqseet2.rar

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

الله ما كنت أعرف أن هذا تمرين ومطلوب من الإخوة في دورة عذرا إن كنت قد أسأت

الله ما كنت أعرف أن هذا تمرين ومطلوب من الإخوة في دورة عذرا إن كنت قد أسأت

وإياك اخي ياسر يسّر الله أحوالك

بعض ما عندكم أخي أيسم أسعدني مرورك كل عام أنتم بخير

ولا يهمك يا أخي المهم يكون هو ده المطلوب

تفضل أخي زورو المطلوب في صورة دالة Book1.rar

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

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

شكرا لمرورك أخي صفوت وهذا مثال وليس فرضا بقاء المسار على السي ولكن هل لاحظت أن البرنامج سيقوم بعمل نسخة احتياطية من البرنامج في كل مرة تفتح ثم تغلق فيها البرنامج فاسمح لي بطلب ( ليس اختبارا لأني على ثقة في أعضاء هذا الصرح ولكن من باب تبادل الخبرات) عمل شيء يسمح للمستخدم بالاختيار هل يريد عمل نسخة احتياطية عند الخروج فإذا كانت الإجابة بنعم قام البرنامج بالنسخ وإلا فلا ولي اقتراح آخر وهو معرفة عدد النسخ الموجودة في مجلد النسخ الاحتياطي فإذا زادت عن 5 قام البرنامج بحذف الأقدم كيف يتم ذلك؟؟ حتى نكون قد صممنا نظام للنسخ الاحتياطي يمكن لكلٍ منا وضعه في برنامجه برجاء التواصل من الإخوة مشرفي وأعضاء المنتدى فزكاة العلم نشره وكل عام أنتم بخير M.A.S محمد عبد الجواد صالح

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

بالفعل أخي الكريم يمكن إظهار وإخفاء شريط الصيغة والأفضل من وجهة نظري هو اخفاء المعادلة و ما تفرقش إظهار أو إخفاء شريط الصيغة فيكون الكود بعد التعديل وبعد إضافة كلمة مرور لحماية الشيت هكذا Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.HasFormula Then Selection.Locked = True Selection.FormulaHidden = True ActiveSheet.Protect Password:="mas123" Else ActiveSheet.Unprotect Password:="mas123" End If End Sub ويعني الكود السابق إذا كانت النطاق يحتوي على معادلة يتم حماية وإخفاء المعادلة في الخلية ثم حماية ورقة العمل بكلمة مرور هي mas123 وإلا فيلغي الحماية التي تم تنفيذها في جواب الشرط الأول أخوكم محمد صالح

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

تفضل أخي هذا هو الكود الخاص بالطباعة ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1 وتحدد فيه الصفحات من .... إلى ..... وكذلك عدد النسخ ولكل تستعمله تضعه في sub وتربط زر أو شكل تلقائي أو صورة بهذا الماكرو أرجو أن أكون قد أفدتك

تسلم أخي من كل سوء كل عام أنتم بخير

شكرا على مرورك اخي سالم أسعدني مرورك على موقعي المتواضع

بالنسبة لظهور الحروف العربية كرموز غريبة في ايميل الياهو مثلا يوجد أسفل كل رسالة مجموعة من الأزرار وهي deleete * replay *forward * spam * move ويوجد أسفل هذه الأزرار قائمة مكتوب فيها select message encooding اختر utf-8 وإذا لم تضبط معك اختر windows-1256 حيث أن الترميز الأول هو الترميز العالمي والثاني هو ترميز اللغة العربية كلامي هنا على الياهو كلاسيك أما بالنسبة للياهو الجديد فيوجد قائمة في صورة زر في أعلى الرسالة more options ومنه اختار encooding أخبرني هل حلت المشكلة بعد هذه المحاولات أم لا أخوك محمد صالح

أخي ياسر موضوع ظهور اللغة العربية المنسوخة من vbe تحتاج فقط لنسخ ولصق النص في المفكرة notepad ثم نسخه منها إلى الموقع وقد تم علاجها في أوفيس 2010 هذا من أوفيس 2010 Private Sub Worksheet_SelectionChange(ByVal Target As Range) MsgBox "عربي" End Sub وهذا بعد نسخه في المفكرة ونسخه من المفكرة إلى هنا Private Sub Worksheet_SelectionChange(ByVal Target As Range) MsgBox "عربي" End Sub