hzzan قام بنشر مايو 25, 2016 قام بنشر مايو 25, 2016 السلام عليكم .. لدي ملف بسيط لحساب الايرادات والمصروفات والناتج المتبقي في الخزينة (الرصيد) .. ولكن الملف بعدد محدد من الصفوف وفي كل مرة أضيف صف لابد ان ادخل العملية الحسابية للرصيد.. كيف يمكنني أن أضيف صف جديد ويأخذ نفس العملية الحسابية .؟!! الاعمدة كالتالي : A التاريخ B البيان C الإيرادات D المصروفات E الرصيد F ملاحظات العمليات في الصفوف كالتالي : 1 عنوان الكشف 2 ادخال التاريخ والبيان والإيرادات فقط ، والرصيد هو نفس القيمة المدخلة في الإيرادات. 3 ادخال التاريخ والبيان والإيرادات أو المصروفات ، الرصيد3 يكون كالتالي : (الرصيد2+الإيرادات3-المصروفات3)SUM= المشكلة عندي هي عند إضافة صف جديد مثلاً 4 أو غيره لابد أن ادخل العملية الحسابية السابقة مع تغيير الرقم 3 إلى 4 لتتوافق مع الصف4 وهكذا في كل صف يتم ادراجه . فكيف يمكنني أن أجعل أي إضافة صف تأخذ هذه العملية (رصيد الصف السابق+الإيراد الحالي للصف الجديد-المصروف الحالي للصف الجديد) بشكل تلقائي ..؟ شكر الله سعي الجميع وبارك فيكم.. للتوضيح أكثر الملف في الرابط التالي : http://www.mediafire.com/download/tyzvl9b9jj300bt/%D8%A8%D9%8A%D8%A7%D9%86+%D8%A8%D8%A7%D9%84%D8%A7%D9%8A%D8%B1%D8%A7%D8%AF%D8%A7%D8%AA+%D9%88%D8%A7%D9%84%D9%85%D8%B5%D8%B1%D9%88%D9%81%D8%A7%D8%AA.xlsx محبكم / ياسر حسين
ياسر العربى قام بنشر مايو 25, 2016 قام بنشر مايو 25, 2016 هذه الميزة توجد في الجداول قم بادارج جدول واكتب معادلاتك وسترى كيف تتكرر المعادلة لكل صف تفضل المرفق به طريقتين لحل مشكلتك في شيت2 وشيت3 بيان بالايرادات والمصروفات.rar
عبدالسلام ابوالعوافي قام بنشر مايو 25, 2016 قام بنشر مايو 25, 2016 قمت بالرد علي المشاركة ولم اجد ردي .. يبدو بان خطأ ما قد حصل اكرر اجمالي المصروفات =SUM(C4:INDIRECT("C"&ROW()-2)) اجمالي الايرادات =SUM(D3:INDIRECT("D"&ROW()-2)) اما بالنسبة لاضافة صفوف جديدة هناك طريقتين الاولى يدوية وهي كالاتي حدد الصف الاخير في الجدول الذي يحتوي بيانات " الصف رقم 7" ضع الموشر علي حد التحديد حتى يظهر شكل اربع اسهم اضغط كنترول وشفت ثم اسحب التحديد للاسف قليلا حتى يحدث تغيير طفيف علي شكل التحديد قم بالافلات .. ستلاحظ ادراج صف جديد الطريقة الثانية عن طريق الكود .. اذا لم تنجح معك الطريقة الاولى وتريد كود ساقوم بعمله لك تحياتي
hzzan قام بنشر مايو 25, 2016 الكاتب قام بنشر مايو 25, 2016 3 ساعات مضت, ياسر العربى said: هذه الميزة توجد في الجداول قم بادارج جدول واكتب معادلاتك وسترى كيف تتكرر المعادلة لكل صف تفضل المرفق به طريقتين لحل مشكلتك في شيت2 وشيت3 بيان بالايرادات والمصروفات.rar شكر الله لك يا استاذ ياسر وبارك فيك 11 دقائق مضت, عبدالسلام ابوالعوافي said: قمت بالرد علي المشاركة ولم اجد ردي .. يبدو بان خطأ ما قد حصل اكرر اجمالي المصروفات =SUM(C4:INDIRECT("C"&ROW()-2)) اجمالي الايرادات =SUM(D3:INDIRECT("D"&ROW()-2)) اما بالنسبة لاضافة صفوف جديدة هناك طريقتين الاولى يدوية وهي كالاتي حدد الصف الاخير في الجدول الذي يحتوي بيانات " الصف رقم 7" ضع الموشر علي حد التحديد حتى يظهر شكل اربع اسهم اضغط كنترول وشفت ثم اسحب التحديد للاسف قليلا حتى يحدث تغيير طفيف علي شكل التحديد قم بالافلات .. ستلاحظ ادراج صف جديد الطريقة الثانية عن طريق الكود .. اذا لم تنجح معك الطريقة الاولى وتريد كود ساقوم بعمله لك تحياتي أستاذ عبدالسلام .. أشكر لك ايضاحك .. ولكن المشكلة ليست في ناتج اجمالي المصروفات واجمالي الايرادات ... انما في معادلة الرصيد في كل صف لأن العملية مرتبطة بمحصلة (الرصيد في الصف السابق+ايرادات الصف الحالي-مصروفات الصف الحالي ).. والإشكال كيف اجعل المعادلة تلقائية بحيث عند اضافة صف جديد يأخذ نفس العملية .. اردت التعلم والمعرفة سواءٌ بالطريقة اليدوية أو بكتابة الكود .. وأسأل الله أن يبارك في علم الجميع ..
عبدالسلام ابوالعوافي قام بنشر مايو 25, 2016 قام بنشر مايو 25, 2016 الطريقة اليدوية اعلاه .. اما الكود فهو كالاتي Dim lstRow As Integer lstRow = Cells(Rows.Count, "C").End(xlUp).Row - 1 Rows(lstRow - 1).Select Selection.Copy Rows(lstRow).Select Selection.Insert Shift:=xlDown Application.CutCopyMode = False Range("A" & lstRow & ":D" & lstRow & ", F" & lstRow).ClearContents
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.