حسام نور

ممتاز مشرفنا أمير عاطف أنتهت المشكله . - ولكن لم تعد الرساله الخاصه بتأكيد الأيداع أو السحب تظهر . والرساله التي تظهر هي فقط الخاصه بمنع الإيداع والسحب بنفس الصف فما الحل

- تجميد الألواح أتضحت فكرته . - أما كود التاريخ فحاولت ولم أصل لنتيجه - أشكرك أخي أبو أحمد

- أهلاً بعزيزي أبو أحمد - بالنسبه لتثبيت صف فقد قمت بأختيار الصف ثم أطار ثم تجميد الألواح فأنقسمت الصفحه الي أربعة أقسام بخطوط ولا أعلم السبب ؟ - أما بالنسبه للتاريخ فأريد فقط توضيح أين تكتب المعادله ..؟ وهل هو كود أم معادله وآسف تعبناك معانا

- لاحظت أيضاً أن التاريخ يتم أدخاله تلقائياً من البرنامج بمجرد تسجيل أيداع أو سحب .. فكيف ذلك ؟ وشكراً .

- سؤال لأخي أبو أحمد . لاحظت أن الصفحه مهما نزلنا للأسفل يبقى أعلى الجدول ظاهراً وهذه ميزه ممتازه ولكن كيف تم ذلك . خالص تقديري

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

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

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

- بالفعل هذا جميل أستاذي محمد طاهر . ولكن كيف يمكنني القيام بذلك ؟ ماهي الخطوات لكي تتم الأستفاده الحقيقيه .؟

- كلامك صحيح أستاذي محمد طاهر حاسس بأحراج :SHY:

- لا حرمنا الله من علمكم النافع .. تم عمل اللازم . - ولمشرفنا محمد طاهر . على فكره لم تظهر رسالة خطأ والخليه أستجابت للمعادله فوراً .. أشكرك

السلام عليكم ورحمة الله وبركاته . إذا كان لدينا العمود Bوالمطلوب أيجاد أصغر قيمه فيه فالمعادله هي =min(b1:b1000) ولكن قد يحتوي العمود على أصفار لأكثر من خليه بينما توجد قيم أخرى أكبر من الصفر ولكنها الأقل بين خلايا العمود فما هي المعادله إذا كنا لا نريد أن نرى الصفر كأصغر رقم . وأن يتم أيجاد ماهو أصغر من الصفر ولكن الأقل بين خلايا العمود ؟ وشكراً

- شكراً لردك مشرفنا الغالي . - ولكن لا أريد طريقة الأرتباط ... اريد تنفيذ ذلك بالخاصيه كما في الصوره الموضحه . جزاكم الله خيراً

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

ياسلام عليكم وعلى تعاونكم وسرعة ردكم ... يعجز اللسان عن شكركم خالص تقديري

السلام عليكم ورحمة الله وبركاته . - بمساعدتكم مشكورين في موضوعين سابقين حصلت على كودين وأحتجت لوضعهما في ورقة عمل واحده لكن في حال أستخدام أحدهما تتم العمليه بنجاح ولكن في حال وضع الكودين بنفس ورقة العمل أحدهما فقط يعمل والثاني لا يعمل وتظهر رسالة خطأ . وأليكم الكودين . Private Sub Worksheet_Change(ByVal Target As Range) If Range("B" & Target.Row).Value > 0 And Range("A" & Target.Row).Value > 0 Then MsgBox "لا يمكن الإيداع والسحب في نفس العملية", , "عفوا" Target.Value = "" Exit Sub End If End Sub الكود الثاني Private Sub Worksheet_Change(ByVal Target As Range) If Target.Value <> "" Then If Target.Column = 1 Then MsgBox "تمت أضافة المبلغ", , "تهانينا" End If If Target.Column = 2 Then MsgBox "تم خصم المبلغ ", , "أحسن الله عزاك" End If End If End Sub فما هو الحل جزاكم الله خيرا

- أشكركم .. وصلت للحل ووضعت الكود لورقة العمل والآن يعمل خالص تقديري لمجهواتكم

- تم عمل اللازم أشكركم .. الحمد لله عرفت الطريقه

المثال ممتاز مشرفنا محمد طاهر . - ولكن لقد جربت أدخال الكود عن طريق الضغط على Alt+f11 ثم لصق الكود ولكن لم يعمل . - فأين يتم كتابة الكود ؟؟ وشكراً

أشكر خالص تجاوبكم . - أخي أبو أحمد وضعت الكود داخل ملف الأكسيل وأدخلت قيم في العمود a وأمامها قيم بالعمود B ولم تظهر رساله فهل هناك طريقه معينه يجب أتباعها .؟ مشرفنا الجميل Sharaf فكرتك جميله في المثال المرفق خالص تقديري لمجهودك . خالص شكري

السلام عليكم ورحمة الله وبركاته . - صممت على الأكسيل ما يشبه كشف البنك A1= الأيداع B1= السحب C1= تفاصيل الحركه D1= التاريخ - وعندما أريد تسجيل عملية أيداع أقوم بكتابتها في خليه داخل العمود A ثم أترك الخليه الخاصه بالسجب وهي B فارغه وأقوم بتسجيل تفاصيل العمليه في C ثم التاريخ في D - قد يخطأ أحد المستخدمين ولا ينتبه ويقوم بتسجيل مبلغ مسحوب في خلية الأيداع أو العكس . - وقد يخطأ آخر ويقوم بتسجيل حركة سحب وايداع بنفس الصف - المطلوب هو أن لاتقبل الخليه A1 مثلاً تسجيل أرقام في حال أدخال رقم في B1 والعكس أيضاً . وينطبق ذلك على باقي العمودين - أيضاً مطلوب ظهور رساله ( MESSAGE BOX ) عند أدخال رقم في خلية الأيداع تقول ( تمت أضافة المبلغ ) . - وظهور رساله أخرى عند أدخال رقم في خلية السحب تقول ( تم خصم المبلغ ) . أتمنى أن لا أكون قد أثقلت عليكم . نفعنا الله بعلمكم أخوكم حسام

- علم وتم عمل اللازم .. شاكراً تعاونك أستاذي الفاضل

كرماً أستاذي محمد طاهر هل تخبرنا بطريقه أظهار الورقه sالمحميه بكلمة سر لإني لم أستطع أظهارها شاكراً لكم جهودكم مرة أخرى .

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

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