اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر (معدل)

اعمل محاسب في شركة وقمت بعمل كشف حساب لكل عميل حيث الملف يحتوي علي شيت لكل سنة وقمت برط كل الحسابات بملف اكسيل يعرض اسم العميل والرصيد الحالي له وعند ادخال حركة علي حساب العميل اقوم بالضغط علي اسم العميل في الملف الرئيسي يقوم بفتح حسابه الخاص اسف علي الاطالة

المطلوب

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

ولكم جزيل الشكر

تم تعديل بواسطه خبور خير
قام بنشر (معدل)

السلام عليكم

اخي elmounir2010

بسرعه كده فقد يعينك علي عملك

يوجد زر creat اضغط عليه و لا تتعجل

تم ربط كود العمل بالشيت الخاص به

كما يوجد داخل كل صفحة عميل لنك بالصفحة الرئيسيه

مع نقل الارصدة

جرب و اخبرني النتيجة

تحياتي

test.rar

تم تعديل بواسطه aah_aah2008
قام بنشر (معدل)

السلام عليكم

اخي عذرا تعديلا بسيطا ليتم الربط الكامل لاسماء الشيتات بكود العميل

قم بالتعديل التالي

بداخل Module1 ستجد Macro1 ضمن الكود المكتوب تحته ستجد جملة الكود التاليه

Sheets("Main").Range("G2:G200").Select

غيرها الي الاتي

Sheets("Main").Range("G2:G1000").Select

كما يوجد ايضا بنفس الــ Module ماكرو اسمه aa الكود المكتوب تحته ستجد جملة الكود التاليه

If Cells(i, 9) < 0 Then

.Offset(1, 1) = Cells(i, 9)

غيره الي

If Cells(i, 9) < 0 Then

.Offset(1, 1) = -(Cells(i, 9))

ليصحح من وضع القيمة في الطرف الدائن

مرفق ملف بعد التعديل

تحياتي

test2.rar

تم تعديل بواسطه aah_aah2008
قام بنشر

السلام عليكم

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

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

قام بنشر

استاذ الفاضل خبور

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information