حمادة عمر

السلام عليكم الاخ الكريم / ◊۩ أبو ندى ۩◊ بارك الله فيك جرب اخي الكريم التعديل البسيط التالي في الكود خاصتك لتنفيذ طلبك ولكن يوجد جزء بالكود غير موجود ... وهو الكود الخاص باستدعاء الكود الخاص بظهور كافة اوراق الملف عندما يكون الاسم صحيح وهو هذا السطر في الكود خاصتك Call ShowAllSheets فبرجاء منك التجربة واشعارنا بالنتيجة ... او قم بارفاق الكود كاملا داخل مرفق Private Sub Workbook_Open() Dim MyName As String MyName = "HOSAM ABDEL MOHSEN" If ThisWorkbook.Name <> MyName Then Application.DisplayAlerts = False ThisWorkbook.Close Else Application.EnableCancelKey = xlDisabled Application.Visible = False UserForm1.Show Workbooks.Application.Visible = True Application.ScreenUpdating = False Call ShowAllSheets Application.ScreenUpdating = True Sheet2.Select End If End Sub تقبل خالص تحياتي

وبرجاء الاطلاع علي الرابط التالي لتغيير الاسم الي العربية ( طبقا لسياسة وشروط المنتدي ) ولزيادة التواصل .... برجاء الاطلاع علي الموضوع http://www.officena....showtopic=41520

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

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

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

السلام عليكم الاخ الكريم / tahermohamed بارك الله فيك 1- بالنسبة لطلبك .. الخاص بعدم تعديل اسم المورد واسم المخزن الا من خلال الكود وتم حمايتهم من التعديل .... تم تنفيذ طلبك 2- بالنسبة لطلبك في الفريم بعدم التعديل ايضا ( لا يمكنك التعديل في اسم الصنف او وحدة الصنف ) الا من خلال التغيير في كود الصنف .. كما طلبت 3- مسلسل الاصناف الموجود في الفريم ( اصبح تلقائيا ) ... بمجرد كتابتك لكود الصنف يظهر المسلسل الخاص به واسم الصنف ووحدته 4- بالنسبة لعدد الصفوف تم زيادة عدد الصفوف كما تريد .. وابتداءا من الصف السابع لا يظهر الصف الذي يليله الا في بعد كتابتك لكود الصنف في الصف السابق له ( جرب ذلك ) 5- بالنسبة للفريم ... ** المسلسل يكون تلقائى ... بمجرد كتابة كود الصنف .. تم تنفيذ طلبك ** عند كتابة كود الصنف يظهر اسمه فى مربع الاسم ووحدته فى مربع الوحدة .. تم تنفيذ طلبك ** يتم كتابة الكمية فى خانة الكمية والسعر فى خانة السعر .. ( ادخال يدوي بالطبع ) ** مربع القيمة يكون حاصل ضرب السعر فى الكمية .. تم تنفيذ طلبك ** اجمالى القيم فى اسقل الفريم يكون عبارة عن مجموع القيم فى كل الصفوف العلوية .. تم تنفيذ طلبك ** تم اضافة ليبل جديد ( يتم كتابة التفقيط فيه لاجمالي القيم ) ... لا اعلم ان كنت تحتاج اليه ام لا ** بالنسبة لعدد الصفوف يتم زيادتها تلقائيا عند ادخال البيانات بمعنى اذا وصلنا للصف السابع يتم ادراج الثامن تلقائيا وهكذا .. تم تنفيذ طلبك (( ملاحظة )) لن يتم احتساب عمليات الضرب والجمع والتفقيط الموجودة في الفورم الا بعد تحريك الماوس علي الفورم سيتم تنفيذ عمليات الازرار ( تسجيل - تعديل - حذف - طباعة ) ... بعد الانتهاء من النقاط السابقة والاتفاق النهائي عليها وعذرا لعدم انهاء العمل مرة واحدة نظرا لضيق الوقت لدي فقط هذه الايام ارجو ان يفي ذلك بطلبك تقبل خالص تحياتي واليك الملف بالمرفقات فورم111.rar

جزاك الله خيرا

السلام عليكم الاخ الكريم / tahermohamed بارك الله فيك 1- بالنسبة اخي الكريم لمسلسل رقم الاذن التلقائي ... تم الغاؤه ... اما بخصوص مسلسل الاصناف الموجود في الفريم .. فسيتم تنفيذه في حينه ( ان شاء الله ) 2- بالنسبة لرزنامة التاريخ ... تم تنفيذ طلبك كما تريد ولكن قبل الشروع في باقي الطلبات لي استفسار او توضيح ** ماهو الحد الاقصي لعدد صفوف الفاتورة .. ( ولا تقول لي انه لا نهائي ..هههه .. حيث انه غير منطقي ) .. ليتم العمل علي هذا الاساس و هل ستقوم بطباعة هذه الفاتورة ام انها ستكون للتسجيل والتعديل ... الخ فقط .. وهنا نعود للنقطة السابقة انه غير منطقي في حالة الطباعة طباعة عدد لا نهائي من صفوف الفاتورة تقبل خالص تحياتي فورم11.rar

وفقكم الله لما يحبه ويرضاه ولما فيه الخير للجميع واعانكم الله علي تحمل المسئولية الملقاه علي عاتقكم جزاك الله خيرا تقبل خالص تحياتي

جزاك الله خيرا

السلام عليكم الاستاذ / أبو انتصار بارك الله فيك ايضا امامك حل آخر وهو قيامك بجعل ملفك تنفيذي يتم تسطيبة علي اي جهاز تقوم بنقل برنامجك اليه وذلك يفيد في انه بعد حفظك للملف وقيامك بتخفيض مستوي الامان له لتعمل اكواده بشكل جيد ثم قيامك بتحويله الي ملف تنفيذي EXE وعند تشغيله علي اي جهاز آخر لا يطلب منك تخفيض مستوي الامان لانه سيعمل طبقا لآخر حفظ من قبلكم بتخفيض مستوي الامان ولتنفيذ ذلك شاهد الرابط التالي للاخ الحبيب / شوقي ربيع ... جزاه الله خيرا شرح تحويل ملف الاكسل الى exe ثم تغيير الايقونة ثم Setup... تقبل خالص تحياتي

السلام عليكم الاستاذ / أبو انتصار بارك الله فيك شاهد المرفق التالي .... عدم فتح الملف عند ما يكون مستوي الامان مرتفع مع رسالة.rar

السلام عليكم الاخ الكريم / tahermohamed بارك الله فيك ========================== عذرا اخي طلبك وموضوعك يحتاج لوقت فراغ من احد الاعضاء لتنفيذه بالكامل وياريت لو تقوم بعد ذلك بطرح موضوعك طلب طلب ( ستحصل عليه بسرعة اكثر وبحلول متنوعة واكثر ) اما قيامك بوضع موضوع كهذا وكثرة الطلبات فيه تجعل معظم من يراه يتركه ... ليس لشئ ولكن لضيق الوقت لديه ( وانا منهم ) فلقد رأيت الموضوع منذ وضعها ولكن عندما رأيت كثرة الطلبات في المرفق تركته لأخ غيري فالعذر لكل اخوانك الاعضاء لان الجميع يشارك تبعا لوقته وما لديه من معلومات ========================= اما بخصوص الملف فسأقوم بتقديم وتنفيذ طلباتك جزءا جزءا لتتناسب مع طلبك تم تنفيذ الجزء الخاص بـ 1- المسلسل لرقم الاذن اصبح تلقائياً ( لا اعلم ان كنت تريده هكذا ام لا ) 2- تم اضافة رزنامة التاريخ او الـ Calendar لاضافة التاريخ لتكست بوكس التاريخ 3- تم تنفيذ طلبك بخصوص كود المورد واسم المورد بمجرد كتابه كوده 4- تم تنفيذ طلبك بخصوص كود المخزن واسم المخزن بمجرد كتابه كوده في انتظار طلباتك بخصوص هذا الجزء اولا ثم نذهب للطلبات الاخري ان لم يكن لي اي طلبات او استفسارات في هذا الجزء تقبل خالص تحياتي فورم1.rar

جزاك الله خيرا

أستاذنا الفاضل / أبو انتصار جزاك كل خير على هذا العمل القيم والأكثر من رائع جعلة الله فى ميزان حسناتك تقبل أرق تحياتى

جزاك الله خيرا