Eid Mostafa قام بنشر نوفمبر 20, 2011 مشاركة قام بنشر نوفمبر 20, 2011 الأخوة الأعزاء بالمنتدي العزيز بارك الله لكم فيما تبذلونه من جهد لتوفير المعلومة التى تساعد الكثير منا فى العمل. أرجو من لدية القدرة على عمل كود يقوم بترحيل قيد اليومية إلى ورقة اليومية التحليلية (حسب الملف المرفق) وذلك وفقاً للمتطلبات التالية:- كل قيد فى صف منفرد (مستقل) وكل حساب فى العمود الخاص بة (مدين / دائن). خاصية الترقيم الآلى للقيد. خاصية إستدعاء لتعديل قيد سبق إدخالة. رسالة تنبية فى حالة نسيان ملء خانة شرح القيد (خلية E 44 بورقة J.V). إذا كان القيد غير متوازن لا يتم الترحيل. رسالة تأكيد قبل الترحيل (مثل سيتم ترحيل القيد موافق / غير موافق). رسالة تأكيد الترحيل (مثل تم الترحيل بنجاح). مسح البيانات من ورقة قيد اليومية بعد الترحيل. ترحيل حسابات القيد كل بحسب طبيعتة (بمعنى أن حسابات الأستاذ العام عمود B & A ترحل إلى American Journal – Ledger) ، (حسابات الأستاذ المساعد عمود D & C ترحل إلى American Journal – Sub Ledger) إن أمكن ذلك ، أما إن كان ذلك غير ممكناً فيرجى ترحيل القيم بالعمود C والعمود D. Statement to Send.rar وأنا على يقين تام بأنى قد أكثرت عليكم ولكن كلى عشم فى الله ثم فيكم فى تلبية طلبى هذا. ولكم خالص تحياتى وتقديرى ،،،،،، أخوكم / عيد مصطفى رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 23, 2011 الكاتب مشاركة قام بنشر نوفمبر 23, 2011 معقولة 56 مشاهدة ولا رد واحد حتى ؟؟؟؟؟؟؟ !!!!!!! رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر نوفمبر 24, 2011 مشاركة قام بنشر نوفمبر 24, 2011 السلام عليكم أخي العزيز ماطلبته كثير لعل ذلك هو مايجعل الإخوة لايقبلون علي المشاركة عموما تفضل المرفق وبه معظم ماطلبته إلا "خاصية إستدعاء لتعديل قيد سبق إدخالة." Statement to Send_ALL2.rar رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 24, 2011 الكاتب مشاركة قام بنشر نوفمبر 24, 2011 الأخ العزيز / طارق أشكرك شكراً جزيلاً أولاً على إهتمامك بالرد ، وثانية على مجهودك الرائع الذى لا يوصف. ولك خالص تحياتى وتقديرى ،،،،،، أخوك / عيد مصطفى رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 24, 2011 الكاتب مشاركة قام بنشر نوفمبر 24, 2011 الأخ العزيز / طارق أكرر شكرى مرة أخرى. ولى طلب صغير جداً. ألا وهو تعديل الكود ليقرأ الحسابات من العمود (B) بشيت (Chart of Accounts) وأنا أعلم أن الكود يقرأ من العمود (K) وذلك لأنة كانت توجد حسابات مكررة ، وقد قمت بتعديلها بحيث لا يكون هناك تكرار أو تشابة بها. مرفق الملف ولك خالص تحياتى وتقديرى ،،،،،، أخوك / عيد مصطفى Statement to Send_ALL2.rar رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 24, 2011 الكاتب مشاركة قام بنشر نوفمبر 24, 2011 الأخ العزيز / طارق نظراً لحاجتى الماسة لهذا الملف فى الوقت الحالى فقد حاولت إجراء تعديل طفيف على الملف المرسل منك ، ولكن ظهرت رسالة عند الترحيل تفيد بأن بعض الحسابات لاتوجد بشجرة الحسابات. لذا برجاء التكرم بتعديل الكود ليقرأ الحسابات من العمود (B) بشيت (Chart of Accounts) ، علماً بأننى قد قمت بتعديل طفيف على بعض أسماء الحسابات بحيث لا يكون هناك تكرار أو تشابة بها. مرفق الملف بعد التعديل من جانبى ولك خالص تحياتى وتقديرى ،،،،،، أخوك / عيد مصطفى Statement to Send_ALL3.rar رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر نوفمبر 26, 2011 مشاركة قام بنشر نوفمبر 26, 2011 السلام عليكم أخي عيد تفضل المرفق لم أجربه فقط نسقت أسماء الحسابات Statement to Send_ALL4.rar رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 26, 2011 الكاتب مشاركة قام بنشر نوفمبر 26, 2011 أخى / طارق أولاً : أهنئك بالعام الهجرى الجديد. ثانياً : أشكرك شكراً جزيلاً على مجهودك الرائع وإهتمامك بالرد. سأقوم بالإطلاع على الملف وسأوفيك بأية متطلبات أخرى إن وجد. ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 26, 2011 الكاتب مشاركة قام بنشر نوفمبر 26, 2011 أخى / طارق بعد الإطلاع على الملف المرسل منك. تبين لى ما يلى :- أنه عند ترحيل أحد القيم المدينة لأحد الحسابات يتم معها ترحيل قيمة دائنة بمبلغ صفر لنفس الحساب، وكذلك الحال عند ترحيل أحد القيم الدائنة لأحد الحسابات يتم معها ترحيل قيمة مدينة بمبلغ صفر لنفس الحساب. (مثال ذلك حساب وسائل نقل وإنتقال خلية F & G وأيضاً مجمع إهلاك وسائل نقل وإنتقال خلية P & Q فى شيت American Journal Sub-Ledger. كما أرجو منكم التكرم بإفادتى عن كيفية تعديل فقرة الكود الخاصة بإضافة أو تعديل حسابات فى شجرة الحسابات ، وذلك حتى أتمكن من إجراء أى تعديل بمعرفتى حيث أننى عندما قمت ببعض التعديلات عليها لم تؤخذ فى الإعتبار (مرفق صورتان). كما ستلاحظ أننى قد قمت بإضافة ورقتا عمل وهما :- 1- Statement of Account 2- Movement والشيت الأول يقوم بترحيل بعض بيانات الشيت الثانى وبالطبع لست أنا من قام بعمل هذا الكود. وستلاحظ أنه يجب إدخال قيد اليومية بشيت Movement حتى يتم إظهارها فى شيت Statement of Account. وما أريدة منك هو ربط شيت Statement of Account بالملف الذى نعمل علية بحيث أقوم بإدخال البيانات مرة واحده فى شيت JV وترحل إلى:- 1- American Journal - Ledger 2- American Journal - Sub-Ledger 3- Statement of Account ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى Statement to Send_ALL4.rar رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 28, 2011 الكاتب مشاركة قام بنشر نوفمبر 28, 2011 أخى / طارق أنا فى إنتظار ردك بشأن ما جاء فى ردى رقم (9) فى أقرب فرصه ممكنه. وأرجو ألا تنسى طلبى بشرح الكود وتحديداً فيما يتعلق بجزئية شجرة الحسابات ، وذلك حتى تتاح لى المرونه الكافيه فى تعديلها فى أى وقت وهو أمر متكرر الحدوث فى مجال عملنا بصفه عامه. ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر نوفمبر 29, 2011 مشاركة قام بنشر نوفمبر 29, 2011 السلام عليكم أخي العزيز / عيد سأتناول الحلول معك نقطة بنقطة أنه عند ترحيل أحد القيم المدينة لأحد الحسابات يتم معها ترحيل قيمة دائنة بمبلغ صفر لنفس الحساب، وكذلك الحال عند ترحيل أحد القيم الدائنة لأحد الحسابات يتم معها ترحيل قيمة مدينة بمبلغ صفر لنفس الحساب. (مثال ذلك حساب وسائل نقل وإنتقال خلية F & G وأيضاً مجمع إهلاك وسائل نقل وإنتقال خلية P & Q فى شيت American Journal Sub-Ledger. ضع التالي مكان الجزء من السطر رقم 20 إلي رقم 10 20 'Remember t = Right Column No If crd = "" Then .Cells(LastRow, t) = .Cells(LastRow, t) + deb Else .Cells(LastRow, t + 1) = .Cells(LastRow, t + 1) + crd End If 10 Next R ومثله مكان الجزء من السطر رقم 40 إلي رقم 30 40 'Remember t = Right Column No If crd = "" Then .Cells(LastRow, t) = .Cells(LastRow, t) + deb Else .Cells(LastRow, t + 1) = .Cells(LastRow, t + 1) + crd End If 30 Next R رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر نوفمبر 29, 2011 مشاركة قام بنشر نوفمبر 29, 2011 وشرح سريع لهذه الجزئية من الكود كل مايسبقها هو تأكيد أن البيانات مضبوطة وأن رقم القيد قد تم عمله وشرح الكيد في الخلية E44 موجود و.... كل الشروط التي طلبتها ثم في الأخير الجزء بين السطرين 20 ، 10 والخاص بالنقل لليومية الفرعية ينقل البيانات التي سبق تخزينها في متغيرين deb , crd للدلالة علي داءن ومدين وقد أضفت لهما شرط إن كان المدين لايحتوي علي شيء فلتنقل قيمة الدائن فقط وإلا لتنقل قيمة المدين فقط ونفس الحال بالنسبة للجزء بين السطرين 40 ، 30 والخاص بالنقل لليومية العامة رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر نوفمبر 29, 2011 مشاركة قام بنشر نوفمبر 29, 2011 النقطة التالية كما أرجو منكم التكرم بإفادتى عن كيفية تعديل فقرة الكود الخاصة بإضافة أو تعديل حسابات فى شجرة الحسابات ، وذلك حتى أتمكن من إجراء أى تعديل بمعرفتى حيث أننى عندما قمت ببعض التعديلات عليها لم تؤخذ فى الإعتبار (مرفق صورتان). هذا الخطأ يحدث لأني جعلت المقارنة بين إسم الحساب في ورقة الـ JV والورقة التي سيرحل إليها مثلا إذا عندك حركتين أولا من ح/ مجمع إهلاك أصول ثابتة ثم إلي ح/مجمع إهلاك وسائل نقل وإنتقال عند ترحيل الأولي ، لن يجد هذا الحساب في الورقة الفرعية سيعطي الرسالة ثم يجده في الرئيسية فيرحله وعند ترحيل الحركة الثانية ، سيجد هذا الحساب في الورقة الفرعية فيرحله ثم يكمل للورقة الرئيسية فلايجده فسيعطي الرسالة لذلك سأعدل هذه الجزئية رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 29, 2011 الكاتب مشاركة قام بنشر نوفمبر 29, 2011 أخى / طارق أشكرك شكراً جزيلاً تم تنفيذ التعديل ، وإختفت القيم الصفرية (مرفق الملف بعد تعديل الكود). أرجو منك الآن أن ننتقل سوياً إلى شرح أو توضيح الجزئية التالية:- ألا وهى (كيفية تعديل فقرة الكود الخاصة كى يتأثر بإضافة أو تعديل حسابات فى شجرة الحسابات) حيث أنه بالنسبة إلى ووفقاً للملف المرفق إليك الآن فإن نطاق أسماء الحسابات بورقة عمل [Chart of Accounts] هى عمود C سطر 170 وهو الأمر الذى أوضحته لك فى الصورتان السابقتان. وما أقصده من الشرح هو توضيح لنطاق فقرة شجرة الحسابات بالكود بحيث فى حالة إضافة أو حذف حسابات أقوم بتغييرها كى تؤخذ فى الإعتبار. ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 29, 2011 الكاتب مشاركة قام بنشر نوفمبر 29, 2011 آسف نسيت الملف Statement (29.11.11).rar رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر نوفمبر 30, 2011 مشاركة قام بنشر نوفمبر 30, 2011 السلام عليكم أخي العزيز لم أفتح مرفقاتك ، ولكني فهمت ماتقصد مرفق الملف بصورته الأخيرة وبه مايلي (1) تجزئة الكود لأكواد فرعية ليسهل عليك وعلي من يريد أن يتابعه (2) كود إضافي لإستخراج شجرة الملفات في صفحتها أوتوماتيكيا ثم نقله إلي صفحتي الحسابات الفرعية والتفصيلية (3) كود إضافي لنقل نسخة من القيد للصفحة الجديدة - Statement of Account - ولكني لست محاسب فلاأعلم هل القيد المراد نقله بتفاصيله ام رئيسي ؟ (4) إضافة ورقة بآخر الملف - شرح الكود - شرحت بها جزء منه ولكن الوقت لم يسعفني فلتقرأ الشرح ثم حدد النقاط التي تريد زيادة شرح فيها تفضل المرفق Statement to Send_ALL6.rar رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر نوفمبر 30, 2011 الكاتب مشاركة قام بنشر نوفمبر 30, 2011 أخى / طارق أشكرك شكراً جزيلاً سأقوم بالإطلاع على الملف وسأوافيك بأية ملاحظات إن وجدت ، وإن شاء الله أتمنى أن لا يكون هنالك طلبات أخرى. ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر ديسمبر 2, 2011 الكاتب مشاركة قام بنشر ديسمبر 2, 2011 أخى / طارق لا تزال مشكلة (هذا البيان لا يوجد فى شجرة الحسابات) قائمة. مرفق الملف ، ومرفق صور من قيد اليومية. ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى Statement to Send.rar رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر ديسمبر 2, 2011 الكاتب مشاركة قام بنشر ديسمبر 2, 2011 أخى / طارق الملف المرفق بالمشاركة السابقة أرسل بالخطأ. مرفق الملف ، ومرفق صور من قيد اليومية. ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى Statement to Send_ALL6.rar رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر ديسمبر 2, 2011 مشاركة قام بنشر ديسمبر 2, 2011 السلام عليكم فعلا أخي ، هذا صحيح وطبيعي الكود سيعطي تلك النتيجة للحساب الذي في الأصل غير موجود في شجرة الحسابات وستجد أيضا الخطأ #N/A في المعادلة بالعمودF من الشيت J.V هل تريد إضافة الحساب لشجرة الحسابات إذا لم يكن موجود بها أصلا؟؟ وهل النتيجة بالشيت Statement of Account هي ماتريد ؟؟ أنتظر ردك رابط هذا التعليق شارك More sharing options...
abouelhassan قام بنشر ديسمبر 2, 2011 مشاركة قام بنشر ديسمبر 2, 2011 (معدل) شكر وتقديروفائق الاحترام استاذنا الفاضل استاذ طارق بارك الله فيك استاذنا احترام من القلب تم تعديل ديسمبر 2, 2011 بواسطه abouelhssan رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر ديسمبر 2, 2011 الكاتب مشاركة قام بنشر ديسمبر 2, 2011 أخى / طارق لم أستوعب جيدأ ما قصدتة من أن (هذا صحيح وطبيعي الكود سيعطي تلك النتيجة للحساب الذي في الأصل غير موجود في شجرة الحسابات ). فالحسابات الثلاثة التى أرسلت إليك صورهم موجودين بشجرة الحسابات وهم كالتالى:- - فوائد دائنة موجود بشيت [Cart of accounts] حساب رقم 604 خليه [C 168] - إلتزام ضريبى مؤجل (إيراد / مصروف) موجود بشيت [Cart of accounts] حساب رقم 605 خليه [C 169] - التغير فى القيمة العادلة لوثائق صندوق ثمار موجود بشيت [Cart of accounts] حساب رقم 60201 خليه [C 165] أما فيما يتعلق بشيت Statement of Account فهو لم يتأثر إطلاقاً بالقيد المحاسبى. (مرفق صورة من القيد ، مرفق صورة من Statement of Account تبين أن حركة الحساب لم تتأثر بالقيد المحاسبى) ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى Statement of Account.rar رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر ديسمبر 3, 2011 مشاركة قام بنشر ديسمبر 3, 2011 عندما أجريت البرنامج علي الجهاز عندي لم يعطي تلك الرسالة إلا مرة واحدة فقط في حساب ليس موجود بالفعل في شجرة الحسابات رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر ديسمبر 3, 2011 الكاتب مشاركة قام بنشر ديسمبر 3, 2011 أخى / طارق هل يوجد ما يمكن إجراؤة بحيث تكون هنالك مرونه كافيه فى جزئية شجرة الحسابات ؟ بمعنى أننا الآن متفقين على أسماء الحسابات موجود بشيت [Chart of Accounts] وبالعمود C وإلى صف معين بالنسبة لى هو سطر 169 وأرجو ألا أكزن مخطئ فى ذلك. فماأقصدة الآن أن تكون هنالك المرونة الكافية بحيث أننى فى حالة حذف أو إضافة أسماء حسابات جديدة يقوم الكود بأخذ ذلك فى الإعتبار (بمعنى أن نزيد أو نقل عن C 169)؟ الرد عند أهل العلم و المعرفه. ولك خالص تحياتى وتقديرى أخوك / عيد مصطفى رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر ديسمبر 4, 2011 مشاركة قام بنشر ديسمبر 4, 2011 ممكن إن شاء الله ولكني مشغوووووول والله صبرا جميلا أو يتدخل أحد الإخوة رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.