أبو سـما

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

جزاك الله خير أخي محيي الدين بالفعل كلامك صحيح واستبدلت العلامة (,) بعلامة (&) والكود بالفعل لم يظهر أي أخطاء ولكن عند التطبيق أراه يكتب بالفعل داخل الخلية المحددة الرقم المطلوب ولكن يختفي الرقم مباشرة بعد ذلك لأن قيمة Textbox10 الجديدة أصبحت بعد ذلك لا شي وبالتالي لا يكتب شي داخل الخلية والمطلوب الان هو تثبيت قيمة textbox10 داخل الخلية عند الادخال ولا يتم تغييرها بعد الادخال. With WARED SH = .Cells(.Rows.Count, "A").End(xlUp).Row + 1 KH = WorksheetFunction.Match(ii, .Range("A2:A" & SH), 0) + 1 End With If TextBox14.Text = WARED.Range("A" & KH).Value Then WARED.Range("M" & KH).Value = TextBox10.Text End If

السلام عليكم ورحمة الله وبركاته ،،، اخواني الأعزاء فكرة الكود سوف تكون كالتالي : عند تسجيل كتاب صادر جديد وعندما أقوم بالضغط على إتمام عملية التسجيل فإنه سوف يقوم بأخذ الرقم الموجود في خانة رد على وارد (TEXTBOX14) ويبحث عنه في ورقة عمل الوارد في نطاق العمود (A) فإذا وجده فسوف يسجل الرقم الموجود في خانة رقم الصادر (TEXTBOX10) في ورقة عمل الوارد في العمود (M). وقد اجتهدت في عمل الكود ولكنه لم يعمل بالشكل الصحيح فالرجاء المساعدة وهذا هو الكود في (CommandButton2) : With WARED KSH = .Cells(.Rows.Count, "A").End(xlUp).Row + 1 khh = WorksheetFunction.Match(ii, .Range("A2:A" & KSH), 0) + 1 If TextBox14.Text = WARED.Range("A", khh).Value Then WARED.Range("M", khh).Value = TextBox10.Value End If End With الرجاء مساعدتي وتصحيحه وجزاكم الله خير. تنظيم المعاملات2.rar

السلام عليكم ورحمة الله وبركاته ،،، اخواني الأعزاء لقد وجدت طريقة أخرى يمكن أن أنفذ بها المطلوب والكود سوف يكون أبسط من الكود المطلوب أعلاه والطريقة كالتالي : عند تسجيل كتاب صادر جديد وعندما أقوم بالضغط على إتمام عملية التسجيل فإنه سوف يقوم بأخذ الرقم الموجود في خانة رد على وارد (TEXTBOX14) ويبحث عنه في ورقة عمل الوارد في نطاق العمود (A) فإذا وجده فسوف يسجل الرقم الموجود في خانة رقم الصادر (TEXTBOX10) في ورقة عمل الوارد في العمود (M). وقد اجتهدت في عمل الكود ولكنه لم يعمل بالشكل الصحيح فالرجاء المساعدة وهذا هو الكود : With WARED SH = .Cells(.Rows.Count, "A").End(xlUp).Row + 1 kh = WorksheetFunction.Match(ii, .Range("A2:A" & SH), 0) + 1 If TextBox14.Text = WARED.Range("A", kh).Value Then WARED.Range("M", kh).Value = TextBox10.Value الرجاء مساعدتي وتصحيحه وجزاكم الله خير.

السلام عليكم ،،، أريد عمل كود يطبق على العمود M (متابعة الكتب) في ورقة عمل WARED . وظيفة الكود كالتالـي : البحث في العمود E (رد على وارد) في ورقة عمل (SADER) فإذا كان هناك رقم مكتوب* في أي خلية فإنه يأخذ الرقم الموجود في العمود (A) في الخلية المقابلة له ويقوم بوضعه في العمود M (متابعة الكتب) في ورقة عمل WARED في الخلية المقابلة للرقم المكتوب*. * الرقم المكتوب يعبر عن رقم الوارد في ورقة عمل WARED. وجزاكم الله خير. تنظيم المعاملات2.rar

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

السلام عليكم . اخواني في الله استطعت بفضل الله وتوفيقه أن أنجز الطلب الاول وبقية جزئية وحيدة صعبت علي وهي عند البحث عن الكتاب الوارد واذا وجد في العمود M (متابعة الكتب) في ورقة عمل WARED كلمة (لا يحتاج رد) ان يفعل الـ checkbox2 بعلامة الصح واذا لم يجد الكلمة لا يفعل الـcheckbox2 ويتركها كما هي بدون علامة الصح. الرجاء الاهتمام والمساعدة في هذه الجزئية وفي الطلب الثاني أكرمكم الله. وجزاكم الله خير تنظيم المعاملات.rar

السلام عليكم ورحمة الله وبركاته طيب يا اخوان اللي عارف حاجة يعملها مش شرط يكون اللي يساعدني عارف يعمل كل المطلوب. خلينا نساعد بعض كدة وكل اللي يعرف حاجة يعملها وانا عن نفسي لما بطلب المساعدة في اي طلب بحاول فيه على قد ما اقدر ومش بستنى الاجابة تجيلي على طبق من ذهب وكم مرة طلبت مساعدة وكنت انا اللي بجاوب على نفسي وكانت الاخوة بتساعدني برده. المهم أنا هبدأ بنفسي وهقول إني أقدر أحل من الطلب رقم (2) اللي هو الاحصائية رقم (1) و (2) اللي هما معرفة عدد الكتب الواردة والصادرة المسجلة . فياريت اي عضو من الاعضاء عنده فكرة عن اي من المطلوب اعلاه يكتب الرد فورا ولا ينتظر حتى يكتمل معرفته ببقية المطلوب . وجزاكم الله خير وتقبل الله طاعتكم.

السلام عليكم وكل عام وانت بخير وتقبل الله طاعتكم أخواني عندي طلبان بعد إذنكم الطلب الاول : عند تسجيل كتاب وارد جديد من خلال اليوزر فورم اضافة checkbox عند تفعيله والضغط عليه يتم كتابة " لا يحتاج الى رد " في عمود (متابعة الكتب) في ورقة عمل WARED وعند عدم تفعيله لا يكتب شئ ، كما أريد عند الذهاب الى (البحث والتعديل) في اليوزر فورم والبحث في ( الوارد ) أو في (الوارد والصادر معا ) أن يظهر الـ checkboxلبيان حالة الكتاب هل يحتاج رد أو لايحتاج مع إمكانية التعديل عليه. أما بالنسبة للطلب الثاني فأريد عمل احصائية للبريد كما هو مبين في الشرح على الصورة المرفقة. وجزاكم الله خيرا ورزقنا الله وإياكم ليلة القدر. تنظيم المعاملات.rar

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

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

الله يحييك يا ابا القاسم وجزاك الله خير الدارين الدنيا والآخرة.

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

1 – اضغط على " بحث وتعديل " المشار إليها برقم (1) في الصورة المرفقة. 2- اختر " بحث في الوارد والصادر معاً " المشار إليها برقم (2) في الصورة المرفقة. 3- ادخل رقم ( 3090 ) في combobox سوف تظهر بيانات الكتاب الوارد في الجزء الخاص بالوارد المشار إليه برقم (3) في الصورة المرفقة وبيانات الكتاب الصادر المشار إليه برقم (4) في الصورة المرفقة اذا كان هناك رد على الكتاب الوارد واذا قمت بعمل أي تعديل في أي من الجانبين وضغطت على " اضغط لاتمام عملية التعديل " فسوف يعدل طبيعياً ولا يوجد أي مشكلة إلى الآن. ولكن المشكلة تظهر إذا كان هناك كتاب وارد ولا يوجد رد عليه أو كتاب صادر له وقمت بعمل تعديل في الجزء الخاص بالوارد وضغطت لاتمام عملية التعديل فتظهر رسالة خطأ على الرغم من حفظ التعديلات التي تمت على الجزء الخاص بالوارد. ادخل رقم (3091) في combobox فسوف تظهر بيانات الكتاب الوارد فقط لأنه لم يتم الرد عليه حتى الان فإذا قمت بعمل اي تعديل في البيانات وضغطت على " اضغط لاتمام عملية التعديل" فسوف تظهر رسالة خطأ واذا اهملتها واعدت ادخال نفس الرقم مرة اخرى (3091) في combobox فسوف تجد أن البيانات قد تعدلت بالفعل. والمطلوب عدم ظهور هذه الرسالة وتجاهل الخطأ عندما لا يوجد رد على الكتاب في الجزء الخاص بالصادر. وشكرا تنظيم المعاملات.rar

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

الحمد لله وبتوفيق من الله وحده تم الوصول إلى الحل وشكرا لكل من حاول المساعدة

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

السلام عليكم. اخواني الكرام مرفق ملف اكسل به ورقتان عمل واحدة باسم wared ويتم فيهاتسجيل بيانات الكتاب الوارد والاخرى باسم sader ويتم فيها تسجيل بياناتالكتاب الصادر وتم عمل واجهة للتعامل مع الملف والمطلوب تعديل بسيط فيكود البحث في الفريم رقم ٣ (بحث وتعديل) عند اختيار الاوبشن رقم ٣ (البحثفي الوارد والصادر معا). من المفترض أنه عند البحث عن رقم كتاب وارد تظهر بياناته في الجانب الايمنمن الفريم (جزء الوارد) فاذا كان هناك كتاب صادر له (رد على الكتاب) يظهر فيالجانب الايسر من الفريم (جزء الصادر) واذا لم يكن هناك صادر له فلا يظهرشي وتظهر رسالة بأن الموظف المختص (كتابة اسم المستلم) لم يقوم بالرد علىهذا الكتاب حتى الان. ولكن الذي يحدث انه عند البحث عن رقم الوارد تظهر بياناته واذا كان هناك ردعليه تظهر بياناته ايضا ولكن المشكلة تحدث في حالة اذا لم يكن هناك رد عليهفيظهر بدلا عنه بيانات الكتاب المقابل له في الترتيب في ملف الاكسل مثلا اذا كانرقم الكتاب الوارد مثلا ٣١٠٩ ورقمه في مسلسل الاكسل ٣ في (شيت الوارد)ولم يتم الرد على هذا الكتاب حتى الان فيظهر في الجانب الايسر بيانات الكتابرقم ٣ في (شيت الصادر) والذي يكون هو نفس رقم المسلسل في ملف الاكسل. فالرجاء المساعدة في حل هذه المشكلة. ملاحظة : الملف من عمل وجهد الاخ المحترم شوقي ربيع ولكن تم التعديل عليهبما يناسب احتياجاتي. تنظيم المعاملات.rar

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

السلام عليكم ورحمة الله وبركاته بفضل الله وكرمه استطعت ان اقوم بمفردي بالتعديل المطلوب وشكرا للجميع. الحمد لله :) الحمد لله :) الحمد لله :) لا حول ولا قوة إلا بالله :)

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

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

شفاك الله وعافاك أخي ياسر ولا بأس طهور إن شاء الله. وأسال الله الشافي المعافي أن يمن عليك بشفاء لا يغادر سقماً

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

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