ابوحمزه المصرى

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

شكرا .. بارك الله فيك اخى الزباري

بارك الله فيك اخى الفاضل عبدالعزيز .. شكرا على ملف التفعيل ..لكن المشكلة مازالت قائمة مع اوفيس 2013 .. وتم حل المشكلة باسلوب أخى الكريم ياسر العربى بالفعل بتفعيل خيار XPsp3 وتشغيل البرنامج من المصدر . شكراً اخوانى على مساعدتكم لى وبارك الله فيكم

بارك الله فيك اخى الفاضل عبدالعزيز .. شكرا لاهتمامك .. جارى التحميل

up

جزاك الله كل خير اخى ابو البراء بعد اعادة تنصيب نسخة الاوفس نفس المشكله .. وللاسف لا يوجد نسخه اخرى حاليا لدى جزاك الله كل خير اخى ياسر العربى الخياران لم يكونا مفعلان وعند تشغيل احدهما كمسئول او xp يعطى هذه الرساله

اخوانى الكرام اعضاء اوفيسنا عند الضغط على Additional Controls فى ادوات الفورم لا يتم فتح النافذة .. فما الحل

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

بارك الله لك في الموهوب لك، وشكرت الواهب، وبلغ أشده، ورزقت بره.

صوموا تصحواجاء الهدي النبوي بآداب يتدبر بها المسلم أمر طعامه وشرابه، وهي علاوة على أنها أضفت على حياته الاجتماعية مسحة جمالية وسلوكية رائعة، نظّم بها الشارع تناول الوجبات وكمياتها وطريقة تناولها، بما يتفق مع ما وصل إليه الطب الوقائي الحديث وعلم الصحة، لا بل سبقه إلى ذلك بقرون عدة، فلا يأكل المسلم حتى يجوع، وإذا أكل لا يصل إلى حدّ التخمة من الشبع؛ وبحسب ابن آدم لقيمات يقمن صلبه ... إلى غير ذلك من الآداب الواردة في المأكل والمشرب.واتفاقاً مع الأهمية الصحية لطريقة تناول الطعام والشراب، وعلاقة ذلك بصحة البدن، فقد حدد نبينا - صلى الله عليه وسلم - الوضعية المثلى للجلوس على الطعام، ونهى عن وضعيات قد ينجم عنها بعض الأذى، كأن يأكل المرء أو يشرب واقفاً أو متكئاً، كما ندب إلى أن يتحدث الإنسان على طعامه لإدخال السرور على المشاركين مما يزيد في إفراز العصارات الهاضمة ويساعد على الاستفادة المثلى من الطعام.ومن الأحاديث التي تدل على إعجاز السنة النبوية في هذا السياق ما رواه المقداد بن معد يكرب عن النبي - صلى الله عليه وسلم - أنه قال: (ما ملأ ابن آدم وعاء شراً من بطنه، بحسب ابن آدم لقيمات يقمن صلبه، فإن كان لابد فاعلاً فثلث لطعامه وثلث لشرابه وثلث لنفسه) رواه الترمذي وحسنه.مراتب الغذاء ثلاثةيقول الإمام ابن القيم: "مراتب الغذاء ثلاثة: أحدها مرتبة الحاجة، والثانية مرتبة الكفاية، الثالث مرتبة الفضيلة، فأخبر - صلى الله عليه وسلم - أنه يكفيه لقيمات يقمن صلبه فلا تسقط قوته ولا تضعف، فإن تجاوزها فليأكل بثلث بطنه، وهذا من أنفع ما للبدن وما للقلب، فإن البطن إذا امتلأ من الطعام ضاق عن الشراب، فإذا أورد عليه الشراب ضاق عن النفس، وعرض عليه الكرب والتعب".ويقول الإمام الغزالي: "ومن مضار الشرَه: اشتداد المعاصي وخاصة الشهوة الجنسية، فإذا منعت التقوى صاحبها من الزنى فلا يملك عينه، فإذا ملك عينه بغض الطرف فلا يملك فكره، فتخطر له الأفكار الرديئة وحديث النفس بأسباب الشهوة، وما يتشوش به مناجاته".وقد اكتشف الطب الحديث أن الجزء العلوي من المعدة هو عبارة عن جيب ممتلئ بالهواء يقع تحت الحجاب الحاجز، وكلما كان ممتلئاً بالهواء كانت حركة الحجاب الحاجز فوقه سهلة وكان التنفس ميسورًا، أما إذا امتلأ هذا الجيب بالطعام والشراب تعرقلت حركة الحجاب الحاجز وكان التنفس صعبًا، كما أن الصلب لا يستقيم تماما إلا إذا كانت حركة المعدة مستريحة، ولا يتم ذلك إذا أُتخِمت بالطعام.جامع أصول الطبوقد أسلم طبيب أمريكي، فلما سُئل عن سبب إسلامه قال: أسلمت بسبب حديث واحد، وآية واحدة، قالوا له: ما الحديث؟ قال: قوله - صلى الله عليه وسلم - : (بحسب ابن آدم لقيمات يقمن صلبه، فإن كان لا محالة فاعلا، فثلث لطعامه، وثلث لشرابه، وثلث لنفسه)، ثم قال معقّبا: هذه أصول الطب، ولو أن الناس نفذوها ما كاد يمرض أحد.ومن طريف ما يُذكر في ذلك أن حوارًا جرى بين طبيب ألماني وصحفي مسلم في إحدى مستشفيات ألمانيا، قال الطبيب الألماني للصحفي المسلم: ما سبب تأخر المسلمين عن الحضارة والنهضة؟ فأجابه الصحفي المسلم - بالهوية فقط - : إن سبب تأخر المسلمين هو الإسلام، ‍‍‍‍فأمسكه الطبيب من يده، وذهب به إلى جدار قد عُلقت عليه لوحة، فقال له: اقرأ الكلمات المكتوبة على هذه اللوحة، فإذا فيها الحديث الشريف الذي يقول فيه النبي - صلى الله عليه وسلم - : (ما ملأ ابن آدم وعاء شراً من بطنه...)، وعند نِهاية الحديث قد كُتب، القائل: محمد بن عبد الله، فقال الطبيب الألماني للصحفي المسلم: أتعرف هذا؟ قال: نعم هذا نبينا، فقال له: نبيكم يقول هذا الكلام العظيم، وأنت تقول: إن سبب تأخركم هو الإسلام!! وختم الألماني الحوار بقوله: للأسف إن جسد محمد عندكم، وتعاليمه عندنا!!وخلاصة ما يذكره الأطباء المتخصصون في ذلك - تصديقا للحديث - أن الإسراف في الطعام هو السبب الحقيقي لمرض السمنة التي تؤدي إلى تصلب الشرايين وأمراض القلب وتشحم الكبد وتكون حصوات المرارة ومرض السكر ودوالي القدمين والجلطة القلبية والروماتزم المفصلي الغضروفي بالركبتين وارتفاع ضغط الدم والأمراض النفسية والآثار الاجتماعية التي يعاني منها البعض، وقد لجأت كثير من المصحات العالمية في الدول الغربية إلى استعمال الصيام كوسيلة فعالة في إنقاص وزن المرضى الذين لا تجدي معهم وسيلة أخرى.

لا اخى الفاضل ياسر اقتراحاتك وملاحظتك مهمة جدا وافادتنى كثيراً بل بالعكس انه ليسعدنى ذلك

كده تمام Sub IN_SH () Dim INSH As Worksheet On Error Resume Next For Each INSH In Worksheets If INSH.ProtectScenarios = False Then INSH.Protect "123" End If Next INSH Set INSH=Nothing End Sub Sub UN_SH () Dim UNSH As Worksheet On Error Resume Next For Each UNSH In Worksheets If UNSH.ProtectScenarios = TRUE Then UNSH.UNProtect "123" End If Next UNSH Set UNSH=Nothing End Sub

دائماً نتعلم منك ياكبير .. ماشاء الله على قوة المتابعه والملاحظة .. بارك الله فيك التعديل Dim INSH As Worksheet On Error Resume Next For Each INSH In Worksheets If INSH.ProtectScenarios = False Then INSH.Protect "123" End If Next INSH End Sub Dim UNSH As Worksheet On Error Resume Next For Each UNSH In Worksheets If UNSH.ProtectScenarios = TRUE Then UNSH.UNProtect "123" End If Next UNSH End Sub

تفضل اخى أكرم كود للحماية وفك الحماية عن جميع الاوراق Dim IN_SH As Worksheet On Error Resume Next For Each pro In Worksheets If pro.ProtectScenarios = False Then pro.Protect "123" End If Next pro End Sub Dim UN_SH As Worksheet On Error Resume Next For Each pro In Worksheets If pro.ProtectScenarios = TRUE Then pro.UNProtect "123" End If Next pro End Sub

افضل الحل التالى لعله المطلوب من قائمة ملف - خيارات - خيارات متقدمه - الغاء تنشيط الخيار التالى كما بالصورة

والله تعجز الكلمات فى التعبير عن هذا الموضوع القيم .. بسم الله ماشاء الله .. بارك الله فيك اخى الفاضل ابو البراء وزادك علماً نافعاً

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

معلش يابوالبراء ياحبيبى انا عارف ان انا متعب استحمل من الرخامه دى بصراحه الملف خلى دماغى بتلف ممكن الشرح عشان دماغى بدأت تعمل FOR..NEXT

شكراً اخى ابوالبراء المنقذ " زادك الله من علمه وفضله "

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

اشكرك على الاهتمام بالموضوع اخى الفاضل محمد الريفى اليك الملف مرة اخرى الارباح.rar

هل الموضوع غير واضح الشرح ام ان الحل صعب ؟

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

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

اخى الفاضل يمكن ربط الفيجوال بيسك بالاكسل ليعطى نتائج رائعه ولك رابط لشرح ذلك لاخى الفاضل ياسر العربى جزاه الله كل خير