ناصرالمصرى

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

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

أخى الفاضل الاستاذ / ياسر خليل السلام عليكم ورحمته الله وبركاته جزاكم الله خيرا وبارك فيكم وشاكر فضلك لاهتمامك بالموضوع المرفق التالى يوضح المطلوب علما بأننى وضعت هذا الكود فى حدث تغير ورقة العمل مع تحديد الاعمدة المعنية بالنتائج دون جدوى Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row > 7 Then If Target.Column >= 89 And Target.Column <= 100 Then Application.EnableEvents = False Cells(Target.Row, "CT").Value = "" Cells(Target.Row, "CT").Value = Cells(Target.Row, "CV").Value Application.EnableEvents = True End If End If End Sub تم مسح الكود المشار اليه من المرفق حتى يتضح المطلوب بالاعمدة المظللة باللون الاصفر شاكر فضلك **** وجزاكم الله خيرا كسر الجنية بعمود واحد.xlsb.rar

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

إخوانى وأحبائى فى الله السلام عليكم ورحمته الله وبركاته جزاكم الله خيرا وبارك فيكم عما تقدموه ابتغاء مرضاة الله أخى الفاضل الاستاذ / ياسر خليل بعد طلب الاذن بشأن الكود المرسل من طرفكم يخص كسر الجنيه بنظام عمودى القرش والجنيه وكما ذكر اخى الفاضل محمد صالح ان الكود يحتاج الى مسح محتويات عمود كسر الجنيه في بداية الكود حتى لا يتم إدخاله في الحساب مرة أخرى " وهذا ماحدث بالفعل " أما عن الملف الاخير بمشاركتى السابقة فهو بنظام العمود الواحد حيث يبدأ من العمود CK رقم 89 وحتى العمود DV رقم 126 علما بأن العمود الخاص بكسر الجنية هو خلايا العمود DT رقم 124 برجاء الاطلاع **** شاكر فضل الجميع **** وجزاكم الله خيرا الاستاذ الفاضل محمد صالح.rar الاستاذ الفاضل ياسر خليل.rar

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

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

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

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

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

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

للرفع

للرفع

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

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

للرفع

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

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

أخى الفاضل / ابو سما السلام عليكم اعتذر عن التأخير لظروف طارئة بداية جزاكم الله خيرا وبارك فيكم عادة وأبدا اقوم برفع ملف مُعبر عن الملف الاصلى أرجو الاهتمام بهذا الموضوع **** شاكر فضلك *** وجزاكم الله خيرا

اخى حماده عمر السلام عليكم ورحمته الله وبركاته عظم الله أجرك وجزاكم الله خيرا شوف فكرة الموضوع هى فى الاصل ترحيل الاصناف من فاتورة المبيعات الى كل مخزن يتبع لهذا الصنف والتى تتمثل فى الاوراق من stor1 حتى stor10 إذن مانتحدث عنه هو طباعة أذون صرف الاصناف وتختلف هنا الاصناف المُرحلة من حيث العدد كمسلسل ويتم طباعة تلك الاذون على مقاس A5 بحيث يحتوى كل إذن على 20 صنف " يدوبك على أد مقاس ورقة الطباعة " وفى أحوال أخرى يزيد العدد الى أكثر من 20 صنف على مستوى المخزن الواحد http://gulf-up.com/do.php?img=295395 ومن هنا تم تثبيت الـــ 5 صفحات جاهزة لطباعة فى كل ورقة من المخازن العشرة كحد أقصى لقد أعطيتك الفكرة العامة للموضوع ولكن كيف ذلك ؟ وهل لفواصل الصفحات دور فى هذا الموضوع أعتقد ذلك ولكن كيف ذلك ؟ **** هذا مانحاول فيه سويا اما عن تذييل الصفحات فمن الممكن تحديد هذا الامر بإذن الله من داخل الكود بدلا من تحديده من الــ Footer شاكر فضل حضرتك ***** وجزاكم الله خيرا

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

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

وعليكم السلام ورحمته الله وبركاته أخى حمادة ابو سما نعم أخى الفاضل انت على الدرب الصحيح من ناحية منع الطباعة والاخفاء ولكن هناك بعض الامور برجاء شاهد الصورة التالية http://gulf-up.com/do.php?img=294722 هنا يجب الحفاظ على حدود الجدوال الـــ BORDER نظرا لتذييل الصفحات اما الاخرى فسأجرب بإذن الله عملية الطباعة على الطبيعة لإبداء الملاحظات برجاء شاهد الصورة التالية http://gulf-up.com/do.php?img=294724 شاكر فضل حضرتك **** وجزاكم الله خيرا

وعليكم السلام ورحمته الله وبركاته نعم أخى أبو سما تم طباعة الاوراق المعنية بالاخفاء باضافة هذين السطرين ActiveWindow.DisplayWorkbookTabs = False ActiveWindow.DisplayWorkbookTabs = True أرى الخير بإذن الله على أيديكم فهل يمكن استكمال فكرة الملف كما هو مشار بعاليه شاكر فضل حضرتك **** وجزاكم الله خيرا

للرفع رفع الله قدركم