المساعدة في الاكواد قصد الترحيل

[كرتوتي]

السلام عليكم اخوتي أنار الله دربكم لما تقومون به من تعليم وعطاء بلا مقابل .المرجو منكم اخوتي مساعدتي في المرفق .بحيت اريد نسخ كل ما اسجله في الورقتين الاولتين الى الورقة الثالثة بنفس الترتيب.اي كلما ادخلت معطيات جديدة سجلت في نفس الوقت في الصفحة الثالثة

سجلات الحساب.rar

[أبو حنــــين]

السلام عليكم

جرب أخي المرفق

سجلات الحساب.rar

[كرتوتي]

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

[أبو حنــــين]

السلام عليكم

عندما تريد ترحيل البيانات تضغظ مرتين على الزر OK الذي سيظهر في العمود H

سجلات الحساب.rar

[كرتوتي]

اخي ابو حنين هناك مشكل البينات لا ترحل المرجو التاكد من الكود ولك كامل التقدير

[أبو حنــــين]

 

 

 

الملف يعمل عندي بشكل طبيعي

ـ 1 ) إذا ظهرت لك في العمود H الخلية بلون برتقالي و مكتوب علبيها الكلمة OK ، عندها تظغط عليها مرتين متتاليتين ليتم الترحيل

ـ 2 ) تأكد أنك لست في وضع التصميم

ملاحظة

انني بصدد ادراج فورم يتم من خلاله ترحيل البيانات سأرسله قريبا ان شاء الله

تم تعديل فبراير 25, 2013 بواسطه أبو حنين

[كرتوتي]

سأكون ممتن لك لو طورت الفكرة الى فورم.الملف جيد الان .انتظرالفورم وبارك الله في مجهودك

[أبو حنــــين]

السلام عليكم

لا اعرف كيف تتم العمليات الحسابية داخل الملف ( العمليات بيت المداخيل و المصاريف و . . . . .. )

قمت بها حسب فهمي و ان كان هناك خطأ اخبرني

عند الضغط على : إدخال البيانات تظهر لك فورم

ـ 1 ) تقوم باختيار السجل : بنك / صندوق

ـ 2 )تقوم بتعبئة مربعات النصوص البيضاء ثم تضغط على حفظ

في أسفل الفورم هناك بيانات حول الاجمالي

 

سجلات الحساب2.rar

[كرتوتي]

استاذي الف شكر لاهتمامك ومساعدتك اخي العمليات الحسابية تتم بالشكل التالي :

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

- نفس العملية نقوم بها ادا تعلق الامر بنفقات او مداخيل من الحساب البنكي في سجل البنك بحيث نسجل في كل سطر اما نفقة واحدة او مداخيل (لانسجل مداخيل ومصاريف في نفس السطر)

 

- تم نجمع في السجل اليومي الاعمال التي قمنا بها في السجلين سجل الصندوق وسجل البنك بنفس الطريقة.بالاضافة ان مبلغ السجل اليومي هو مجموع مبالغ السجلين الاخرين

 

- نقصد بالمنقول هو المبلغ الافتتاحي لكل سجل

 

علما ان لكل من الصندوق والبنك مبلغ كرصيد افتتاحي

 

- هل يمكن اخي الفرز في خانات السجل للحصول على العمليات التي تمت من احد السجلات

سجلات الحساب2.rar

[حسين العصلوجى]

اثراءا للموضوع مرفق ملف

 

يسمح بالترحيل من خلال الصفحات مع الاحتفاظ ببيانات كل سجل

يسمح بالفرز كما طلب الاخ / كرتوتى

 

 

فقط ادخل البيانات في سجل الصندوق او البنك واضفط زر الترحيل

سجلات الحساب (3).rar

تم تعديل فبراير 26, 2013 بواسطه حسين العصلوجى

[أبو حنــــين]

السلام عليكم

الشكر موصول للاخ حسين

هذا الملف بعد التعديل الجديد

سجلات الحساب4.rar

[كرتوتي]

اخي حسين المرفق يعمل بشكل جيد شكرا لك على الاثراء

 

وننتظر من المبدع ابو حنين معالجة المرفق وفق المنظور الذي قدمه .نظرا لابداعه في اضافة الفورم للبرنامج

[كرتوتي]

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

 

مزيدا من العطاء.

تمام في تمام

[أبو حنــــين]

العفو أخي

لكن جرب الملف و اخبرني ان كانت هناك أخطاء لانني لم اجربه كما ينبغي

[كرتوتي]

اخي ابو حنين واجهتني مشكلة اظن انها بسيطة

اريد ان اضيف سطور للورقة لكن لم اتمكن من اضافتها الى العمود Hلا يقبل التغير

اضافة اخرى اريد الارقام بتنسيق عملة (رقمين فقط بعد الفاصلة هكذا 125.20) تقبل الله عملك

[أبو حنــــين]

بالنسبة للسؤال الاول ادخل الى محرر الاكواد VB و بعد فتحه ستجد في اليسار اسماء الاوراق

اضغط مرتين متتاليتين على الورقة الاولى ستجد حود مكتوب الطريقة التالية

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    ScrollArea = "A4:G50000"

End Sub

 

غيره الى الطريقة التالية و ذلك بكتابة الرقم اربعة في بداية الكود ( رقم اربعة الموجود في لوحة المفاتيح وليس في الارقام اي اسفل الزر F4

 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

 '   ScrollArea = "A4:G50000"

End Sub

قم بنفس العمل مع باقي الاوراق ثم احفظ الملف و اغلقه و اعد فتحه من جديد بعدها يمكنك التغيير

لكن لا تنسى ان العمود H يحتوي على معادلات

 

بالنسبة للسؤال الثاني

قم بتحديد الخلايا التي تريد تغيير تنسيقها ثم الضغط بيمني الفأرة و تختار تنسيق خلايا ثم الرقم و تحدد التنسيق الذي تريده او تكتب مباشرة الرمز :  #,##0.00

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

[كرتوتي]

الطريقة جيدة اخي عملت معي .هناك ملاحظة احرى اخي خانات مجموع المصاريف ومجموع المداخيل والصافي في الفورم لا تعمل ها من سبيل الى جعلها تعمل

[كرتوتي]

لقد تجاوزت مشكل المبالغ في الفوروم السبب كان في معلومات الخانات في الصفحات تم تغيرها في الكود واصبحت تعمل

 

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

[أبو حنــــين]

السلام عليكم

للقيام بذلك اتبع الخطوات التالية :

ـ 1) افتح محرر VB ثم اذهب الى الكود التالي :

 

Private Sub UserForm_Initialize()
TextBox2.Value = Format(Now, "yyyy-mm-dd")
TextBox3.Value = Format(Now, "hh:mm:ss"):
ComboBox1.AddItem "سجل البنك":
ComboBox1.AddItem "سجل الصندوق"
ComboBox1.AddItem "السجل اليومي"
End Sub

ـ 2 ) قم بحذف السطر الاول من هذا الكود ليصبح كالتالي

 

Private Sub UserForm_Initialize()
TextBox3.Value = Format(Now, "hh:mm:ss"):
ComboBox1.AddItem "سجل البنك":
ComboBox1.AddItem "سجل الصندوق"
ComboBox1.AddItem "السجل اليومي"
End Sub

ـ 3) ارجع للفورم و حدد النص الذي يكتب فيه التاريخ ثم من الخصائص الموجودة في اليسار غير الخاصية Locked لمربع النص من  True  الى False

ـ 4 ) قم بنسخ الكود التالي

 

Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox2.Value = Format(TextBox2, "yyyy-mm-dd")
End Sub

 

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

اخبرني بالنتائج

تم تعديل فبراير 27, 2013 بواسطه أبو حنين

[كرتوتي]

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

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

ومجالات المداخيل .ارجو ان تتفضل علي كماعهدت فيك بقبول الطلب .لابعث لك بالمجالات المطلوب اضافتها. 

[أبو حنــــين]

ان شاء الله

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

[كرتوتي]

 

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

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

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

سجلات الحساب5.rar

[أبو حنــــين]

السلام عليكم

لقد قمت بالمطلوب لكنني لم اجرب الملف كما ينبغي فقط بعض المحاولات البسيطة

قم بتجربته و اخبرني بالنتائج

سجلات الحساب 6.rar

[كرتوتي]

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