أبو العاصم

للرفع

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

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

أخى الكريم جزاك الله خيرا الكود يعمل وجيد جدا هل بالامكان تطبيق الكود على ملفى المرفق ولو تكرم وتدمج معه الكود الذي أرفقته أنا للقيام بالتسلسل ولو رأيت تعديلا علي كود التسلسل فلتتفضل انت وتضعه

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

أخى الكريم جزاك الله خيرا الكود يعمل وجيد جدا هل بالامكان تطبيق الكود على ملفى المرفق ولو تكرم وتدمج معه الكود الذي أرفقته أنا للقيام بالتسلسل ولو رأيت تعديلا علي كود التسلسل فلتتفضل انت وتضعه

للرفع

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

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

عم ياسر خليل إلهى اشوفك جاى من الحج طل على الموضوع ده ربنا يسعدك يا عم http://www.officena.net/ib/index.php?showtopic=60174&p=386317

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

الله المستعان الطلب صغير ولا يوجد تعاون

اذا فلنغلق هذا الموضوع الحلول كيرة ولا أحد يتعاون المشكلة فينا فهل من مرشد لكتاب أو فيديو لتنفيذ مطلوب أم ان العطاء قل

هل بامكان التعديل على رصيد الكود

للرفع

up

اين الفارس ياسر خليل

السلام عليكم ورحمة الله الكود المرفق هو الكود الوحيد الذى إهتديت اليه لعمل الترصيد أطلب تعديل عليه بحيث يكون الرصيد فى عمود واحد فقط بحيث لو الصيد قلب سالب يدرج الرصيد بالسالب ولو فى الإمكان الوصول الى كود جديد يقوم بنفس الفكرة يغير كل أرقامه أتوماتيك بمجرد تغيير أى عمليه سابقه أكون شاكر جدا الكود Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("E9:E20")) Is Nothing Then '--------------------------- If Target.Cells.Count > 1 Then Exit Sub Application.ScreenUpdating = False aa = Application.Sum(Range("E9:E20")) bb = Application.Sum(Range("F9:F20")) If aa - bb + [A9] > 0 Then Target.Offset(0, 2) = aa - bb + [A9] If aa - bb + [A9] < 0 Then Target.Offset(0, 3) = aa - bb + [A9] If aa - bb + [A9] = 0 Then Target.Offset(0, 2) = 0 Target.Offset(0, 3) = 0 End If End If If Not Intersect(Target, Range("F9:F20")) Is Nothing Then '--------------------------- If Target.Cells.Count > 1 Then Exit Sub Application.ScreenUpdating = False aa = Application.Sum(Range("E9:E20")) bb = Application.Sum(Range("F9:F20")) If aa - bb + [A9] > 0 Then Target.Offset(0, 1) = aa - bb + [A9] If aa - bb + [A9] < 0 Then Target.Offset(0, 2) = aa - bb + [A9] If aa - bb + [A9] = 0 Then Target.Offset(0, 1) = 0 Target.Offset(0, 2) = 0 End If End If End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) End Sub المرفق به الكود القديم وتعديلى عليه ترصيد.rar

للرفع بارك الله فيكم

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

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

طلب كود فيجول فى حدث الصفحة يقوم بعملية الترصيد فى العمود مثلا G كود يقوم بعملية ترصيد للعمودين E وهو الوارد F وهو النصرف يجمع الرصيد السابق فى الخلية مثلا G10 + الخلية E 11 - الخلية F11 الرجاء المساعدة

للرفع يا شباب فى العمود G معادلة للرصيد فمثلا فى الخلية G10 = =G9+E10-F10 المطلوب تحويل تلك المعادلة لكود فى حدثث الصفحة وتوفيقه أو تركيبة مع كود التسلسل التلقائى

للرفع

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