m.hindawi قام بنشر أبريل 28, 2005 قام بنشر أبريل 28, 2005 (معدل) بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته هذه هي النسخة المعدلة من برنامج المخازن ولقد قمت بتجارب كثيرة عليه وانشا الله لا تحتوي على اية خطأ كما قمت بتعديل بسيط على القوائم واظهار واخفاء اشرطة الادوات ارجو ان تنال اعجابكم طريقة تشغيل البرنامج اولا فك االملف المضغوط باستخدام برنامج وين رار ثم شغل الملف المسمى المخازن اذا كانت بعض المراجع لديك غير معرفة سوف تظهر لك رسالة خطأ اضغط على زر debug ستفتح لك قائمة هي قائمة refrences والتي من خلالها يتم اضافة المراجع وهي على الشكل التالي اولا قم بازالة جميع المراجع الموجود عندك في الجهاز هناك بعض المراجع التي لايمكن ازالتها لانها قيد التشغيل ثم اضف المراجع كما هي بالصورة المرفقة اعلاه ملاحظة قد لا تحتاج الى كل المراجع الموضحة بالصورة ولكنني اضفت بعضها تحسبا ملاحظة اذا لم تفتح شاشة ال refrences تلقائيا يمكن فتحها عن طرق التالي اضغط alt +f11 يفتح مشروع فيجوال بيسك ثم من القائمة tools اختر refrences ثم قم باضافة المراجع حسب الشرح ملاحظة بالنسبةللطباعة اذا لم يكن لديك طابعة مثبة على الجهاز قد تظهر رسالة خطأ للحيلولة دون ظهورها عليك ان تثبت طابعة على الجهاز حتى لو لم يكن عندك طابعة تستطيع ذلك عن طريقة اضافة طابعة من لوحة التحكم بالنسبة لاستخدام البرنامج الافضل استخدام الارقام العربية وهي على الشكل التالي بالنسبة لارقام الاصناف يفضل استخدام الحروف الانجليزية مع الارقام العربية على الشكل ارجو ان ينال البرنامج اعجابكم واذا كان لديكم اية ملاحظات او استفسارات لا تترددو في طرحها هنا almakhazn.rar تم تعديل أبريل 28, 2005 بواسطه m.hindawi 2
mokent77 قام بنشر مايو 3, 2005 قام بنشر مايو 3, 2005 اخوي مشكور بس مازالت رسايل الخطا كثيرة0 GetNo = Format(TheNo, "000000000000.00") I = 0 Do While I < 15 If I < 12 Then myno = Mid$(GetNo, I + 1, 3) Else myno = "0" + Mid$(GetNo, I + 2, 2)عند فتح النموذج Sub hide() Sheets("data").Cells(16, 1) = 0 Dim cb As CommandBar Dim comd() As String With Application .DisplayFormulaBar = False .DisplayStatusBar = False For Each cb In .CommandBars If cb.Visible = True Then Sheets("data").Cells(16, 1) = Sheets("data").Cells(16, 1) + 1 End If Next End With ''''''''''''''''''''''''''''''''''' tt = Sheets("data").Cells(16, 1) With Application gg = 16 For Each cb In .CommandBars If cb.Visible = True Then Sheets("data").Cells(gg, 4) = cb.Name gg = gg + 1 End If عند الخروج من البرنامج
مصطفى عبد الرحمن قام بنشر مايو 3, 2005 قام بنشر مايو 3, 2005 سلام عليكم هل نسخة الملف الاكسل مرتبطة فى عملها ببعض الاكود التى يجب ان تنصب على نظام التشغيل وهل النسخة ايضا لها معنى اقصد نسخة نظام التشغيل من ناحيتى الاخطاء كثيرة وهى اما مشكلة فى البريك مود او فى الكومبايلور رجاء مراجعة الملف
m.hindawi قام بنشر مايو 4, 2005 الكاتب قام بنشر مايو 4, 2005 (معدل) بسم الله الرحمن الرحيم اخي الكريم مصطفى لا اعتقد ان لنسخة نظام التشغيل اي علاقة بالاخطاء قمت بتجربة املف على الملينيوم وعلى ال الاكس بي و ايضا قمت بالتجربة على اوفيس اكس بي واوفيس 2003 ولم يظهر اية خطأ الرجاء من الاخوة الكرام الذين تظهر لديهم رسالة خطأ ان يسجلوا الرسالة ويدرجوها هنا لمعرفة مصدر الرسالة حتى اتتمكن من معرفة سبب ظهورها ولكم الشكر هناك امر اخر وهي الاخطاء التي تتم معالجتها اثناء التشغيل بالامر on error اذا كنت قد اعددت الفيجوال بيسك لديك بان يقوم بايقاف التشغيل لبرنامج اكسل عند كل الاخطاء فانه عليك ان تقوم بالتالي افتح برنامج الاكسل ادخل الى محرر الفيجوال بيسك بالضغط على alt+f11 من القائمة tools اختر options ستفتح شاشة فيها اربعة علامات تبويب وهي editor edetir format general docking اختر علامةالتبيوب general على اليمين سوف تجد عبارة error traping تاكد من ان العلامة على breake on unhandled errors بعد ذلك عليك حذف الملف القديم ثم اعادة فك الضغط من الملف الذي حملته من الموقع ارجو من الاخوة الكرام التاكد من ذلك واذا ظلت رسائل الخطأ بالظهور ارجو ادراج الرسالة كما تظهر لمعرفة السبب تم تعديل مايو 4, 2005 بواسطه m.hindawi
mokent77 قام بنشر مايو 4, 2005 قام بنشر مايو 4, 2005 السلام عليكم ورحمة الله وبركاته،، اخي هنداوي الخيارات التي اشرت لها عندي معدة سلفا رسالة الخطا عند فتح البرنامج في هذا السطر بالتحديد عند كلمة format GetNo = format(TheNo, "000000000000.00")
mokent77 قام بنشر مايو 4, 2005 قام بنشر مايو 4, 2005 تحياتي ... اخ هنداوي عندالانتقال للرئيسية تظهر الرسالة الاتية(compile error cantfind project library)علما انني اعمل ع الاوفيس 2003 Sub MIANSHEETS() Sheets("purchase").Cells(2, 8).ClearContents Sheets("purchase").Cells(2, 11).ClearContents Sheets("purchase").Cells(2, 9).ClearContents For u = 2 To 21 For t = 1 To 3 Sheets("purchase").Cells(u, t).ClearContents Next Next Sheets("MIAN").Select End Sub
m.hindawi قام بنشر مايو 4, 2005 الكاتب قام بنشر مايو 4, 2005 (معدل) بسم الرحمن الرحيم اخي الكريم السلام عليكم ورحمة الله وبركاته الخطأ الذي اشر ت اليه هو يشر الى دالة التفقيط المسماة abouhani وهي دالة قمت بتحميلها من موقع افيسنا على الربط التالي http://www.officena.net/ib/index.php?showtopic=3069 واظن انه قد تم مراجعتها تكرارا ولا تحتوي على اية خطأ في الكود البرمجي و بكل صراحة انا لا اعرف سبب ظهور هذا الخطأ لديك قمت بمراجعتها اليوم ايضا ولم اجد فيها اية خطأ على كل حال ارجع للرابط الذي اشرت اليه اعلاه وتاكد من ذلك بنفسك اما بالنسبة للخطأ الثاني وهو compile error cantfind project library) فهذا يعني انك لم تعرف المراجع بشكل جيد راجع هذا الموضوع من اوله هناك شرح بالصورة لكيفية تعيين المراجع واعتقد والله اعلم ان الخطأ الاول ناجم عن نقص في تعليم المراجع لديك ايضا حاول ان تعيد تعريف المراجع واظن انه لن تظهر رسالة خطأ ولك الشكر تم تعديل مايو 4, 2005 بواسطه m.hindawi
ابو ولاء قام بنشر مايو 5, 2005 قام بنشر مايو 5, 2005 السلام عليكم سوف اجرب البرنامج شكرا لك اخي الكريم :(
ايمن ابوأنس قام بنشر مايو 10, 2005 قام بنشر مايو 10, 2005 السلام عليكم ورحمة الله وبركاته اخي هنداوي والاخوة جميعا يبدو ان النقاش في هذا البرنامج قد توقف لماذا؟ هل تعتبر هذه النسخة نهائية وهل يعني ان الجميع راضين عنها ام ماذا ؟ وهل كل من جرب هذه النسخة اعتبرها كاملة ام ماذا ؟ فأنا بصراحة لم استطع تجربة هذه النسخة ولا اي نسخة سابقة ، لا اعلم لماذا فالكثير من الاخطاء تظهر ولا استطيع تفاديها حتى بعد التعديل المطلوب عليها . فهل يوجد شخص جرب هذه النسخة ؟ وهل هي كاملة ولا يوجد اخطاء ؟ الرجاء الافادة ولكم جزيل الشكر .
m.hindawi قام بنشر مايو 10, 2005 الكاتب قام بنشر مايو 10, 2005 (معدل) بسم الله الرحمن الرحيم اخي ايمن السلام عليكم ورحمة الله وبركاته لقد قمت بتجربة البرنامج ولا يوجد لاخطاء برمجية فيه الاخطاء التي تظهر معك غالبا ناتجة عن عدم تعريف المراجع حاول ان تعرف المراجع بشكل جيد وان تقوم بالحفظ قبل الاغلاق على كل يمكنك تعريف المراجع كما بالصورة اعلاه في اول الموضوع وقبل ان تخرج من البرنامج يمكنك ان تجرب اذا كان هناك خطأ واذا ظهرت رسالة خطأ اعد تعريف المراجع مرة اخرى وبعد كل هذا اذا بقيت رسائل الخطأ بالظهور ارجو ادراجها هنا لاتمكن من معرفة السبب لاحظ اخي ايمن في مشاركة الاخ mokent 77 تحياتي ... اخ هنداوي عندالانتقال للرئيسية تظهر الرسالة الاتية(compile error cantfind project library)علما انني اعمل ع الاوفيس 2003 Sub MIANSHEETS() Sheets("purchase").Cells(2, 8).ClearContents Sheets("purchase").Cells(2, 11).ClearContents Sheets("purchase").Cells(2, 9).ClearContents For u = 2 To 21 For t = 1 To 3 Sheets("purchase").Cells(u, t).ClearContents Next Next Sheets("MIAN").Select End Sub لا حظ الكود ليس فيه اي خطأ ومع ذلك ظهرت رسالة الخطأ السبب عدم تعريف المرجع ولك الشكر اخي ايمن تم تعديل مايو 10, 2005 بواسطه m.hindawi
محمد حجازي قام بنشر مايو 10, 2005 قام بنشر مايو 10, 2005 السلام عليكم ... بالنسبة لي ، لم تظهر عندي أي رسالة خطأ . قد يكون الخطأ (كما قال الأخ هنداوي) في تعريف مراجع الفيجوال.
ايمن ابوأنس قام بنشر مايو 11, 2005 قام بنشر مايو 11, 2005 (معدل) بسم الله الرحمن الرحيم بداية اود ان اشكركم على الاهتمام وسرعة الاجابة عزيزي هنداوي ، الله يصبحك بالخير بعد مراجعتي للمكتبات وجدت اختلاف بسيط لا اعلم ان كان يؤثر على عمل البرنامج ام لا وهو كما يلي مع العلم انني استخدم اوفيس 2000 : 1- ظهر عندي فيها بالضبط ما يلي : Microsoft Excel 9.0 Object library بينما ما هو ظاهر عندك وفي الصورة اعلاه Microsoft Excel 10.0 Object library يعني بدل 9.0 عندك 10.0 2- وجدت عندي ايضا : Microsoft Office 9.0 Object library بينما ما هو ظاهر عندك وفي الصورة اعلاه Microsoft Office 10.0 Object library يعني بدل 9.0 عندك 10.0 هل له علاقة ؟؟؟ اما باقي المكتبات فهي متطابقة تماما بيني وبينك . المهم فتحت البرنامج وفجأة ينتقل تلقائيا الى الفيجوال بيسك وتظهر رسالة تقول : Compile error : Can't find project or library ومن ثم اضغط على ok ويكون اسم الملف barshide(Code ويكون هنالك احرف مضاءة باللون الازرق وهذه الاحرف = tt وثم اخزن واخرج من الفيجوال واحاول ان اعود الى الصفحة الرئيسة ولكن تخرج نفس الرسالة الاولى تقول : Compile error : Can't find project or library ولكن هذه المرة تغير اسم الملف واصبح MIANSHEET(Code والحرف المضاء بالازرق هو الحرف u في السطر For u = 2 To 21 لاحظ اخي الكريم جميع المشاكل في المكتبات حتى لو حاولت ان تضيف اي صنف تعود نفس الرسالة ولكن اسم الملف يتغير وهكذا . لذلك لم استطع ان اختبر البرنامج وان اجربه بشكل كامل وكم اتمنى ان افعل ذلك لاشاركك بأن اضع ملاحظاتي لك :') ولكم جزيل الشكر ، بانتظار الاجابة تم تعديل مايو 11, 2005 بواسطه ايمن ابوأنس
m.hindawi قام بنشر مايو 11, 2005 الكاتب قام بنشر مايو 11, 2005 (معدل) بسم الله الرحمن الرحيم اخي ايمن ان المرجع Microsoft Excel 9.0 Object library هو الاصدار الاقدم ولايؤثر على عمل البرنامج ولكن ساحاول ان اعطيك بعض التعليمات اتبعها وحاول هذهالمرة عسى ان يعمل البرنامج اولا قم بتشغيل البرنامج افتح محرر الفيجوال ثم افتح refrences كما في الصورة قم بازالة جميع المراجع التي يمكن ازالتها كما بالصورة التالية هناك بعض المراجع لايمكن ازالتها لانها قيد الاستخدام بعد ذلك قم باضافة المراجع مرة اخرى كما في الصورة الاولى بعد ذلك قم بالحفظ من الايقونة في الاعلى على اليسار كما في الصورة التالية ثم اعد تشغيل الملف جرب وخبرني طبعا المراجع الموجودة عندك هي الاصدار 9 هذا لايهم تم تعديل مايو 11, 2005 بواسطه m.hindawi
ايمن ابوأنس قام بنشر مايو 11, 2005 قام بنشر مايو 11, 2005 عزيزي هنداوي يبدو انه بعد ان رفعت اشارة الصح من جانب المراجع والتخزين اولا وثم اعادة طلبها مرة ثانية ، لم يظهر عندي مرجعين هما : 1- Microsoft office 10 search interface type library 2- Microsoft office runtime 1.0 type library وحاولت ان اجدهما فلم اجدهما ، فكيف استطيع اضافتهما علما بأنني لا أعلم الكثير عن الفيجيوال بيسك ؟ على العموم قمت بتخزين ما جرى وخرجت من البرنامج ومن ثم فتحته مرة اخرى طبعا بعد التعديل وبوجود نقص المرجعين اعلاه . فلم يظهر لي اي رسالة من الرسائل السابقة ولكن ظهر عندي شئ جديد وهو انه عند اضافة صنف معين وادخلت الاسم العربي وتركت الاسم بالانجليزي فارغ وادخلت السعر ( سعر شو هذا كلفة ام سعر بيع ) فرفض البرنامج قبول المدخلات لوجود خانة فارغة وقام بحذف ما ادخلته . الرجاء السماح بادخال اسم الصنف بالعربي او بالانجليزي وان لا يحذف المدخلات اذا صادف خطأ ما . وتفاجأت ايضا انه قال لي ان الصنف تم ادخاله بنجاح ولكن بعد الاستعلام عند تبين لي انه لم يدخل بالمرة . ولنا متابعة بعد الاجابة ، ولكم جزيل الشكر
m.hindawi قام بنشر مايو 11, 2005 الكاتب قام بنشر مايو 11, 2005 بسم الله الرحمن الرحيم اخي ايمن ان ترك اي خانة فارغة في اضافة الاصناف يؤدي الى عدم تسجيل الصنف وبالتالي عليك تسجيل جميع الخانات لانك عند اصدار الفاتورة يمكن الاختيار بين اللغتين عربي و انجليزي فاذا تركت خان اسم الصنف بالانجليزي فارغة سيظهر الصنف بدون اسم اما بالنسبة للسعر فهو سعر البيع عند ادخال اي صنف يتم الادخال من واقع فاتورة الشراء والتي تبين التكلفة وبالتالي تستطيع ان تدخل السعر الذي تريد وفقا لسعر الشراء وهو السعر الذي يفترض ان يظهر عند اصدار فاتورة ويمكنك تعديله اثناء اصدار الفاتورة
ايمن ابوأنس قام بنشر مايو 12, 2005 قام بنشر مايو 12, 2005 (معدل) بسم الله الرحمن الرحيم عزيزي هنداوي لم تجاوبني عن المرجعين المفقودين عندي وكيف استطيع ان انزلهما على البرنامج ؟؟؟ وهل لهذين المرجعين اي اثار مثل التي سأقول لك عنها الان ؟؟ اولا : عند اضافة صنف يقوم بقبوله ولكن لا يحتفظ بأخر رقم صنف تم ادخاله ( يعني الشخص لا يعرف الى اي رقم وصل ) وممكن بعد ما يدخل رقم صنف يظهر معه انه تم ادخاله من قبل . لي هنا ملاحظة لماذا لا تجعل رقم الصنف سيريال نمبر يعني يظهر لوحده متسلسل اذا ادخل رقم يظهر الرقم الذي بعده مباشرة ؟ هذه بتسهل التعامل مع الاصناف . ثانيا : ظهرت لي رسالة تقول : complile error variable not defined وهي موجودة في ملف اسمه (module13 (code والسطر المضاء بالازرق هو xlPrintErrorsDisplayed وظهرت هذه الرسالة بعد ان قمت بادخال فاتورة شراء واخترت رقم 1 لاصدار الفاتورة وبعد ان قمت باغلاق الفيجوال ( طبعا مع وجود الخطأ المذكور ) وبعد الرجوع الى البرنامج ظهرت شاشة فيها PARTNO QTY PRICE VENDOR RECEIVENO DATE INVNO ويوجد تحت هذه الكلمات الارقام التي ادخلتها ولكن تحت كلمة RECEIVENO التي لا اعتقد انها بالانجليزي يوجد p1001 لم اقم بادخاله من قبل . وبعد هذا لم استطع ان ارجع الى البرنامج لان كل شئ اختفى ما عدا هذه المعلومات الظاهرة وارجو ان لا تنسى الاجابة عن كيفية اضافة المكتبات المفقودة من عندي وهي : 1- Microsoft office 10 search interface type library 2- Microsoft office runtime 1.0 type library ثالثا: كيف استطيع ان ارفق صورة مثل الصور اللي انت واضعها فهذه الطريقة بتسهل علي كثير من الشرح يعني لما تظهر لي رسالة استطيع ان اخذ عنها صورة ارفقها لك حتى تستطيع مشاهدة الخطا بالضبط ؟ فكيف السبيل الى ذلك ؟ الرجاء الاجابة على جميع التساؤلات ؟ كل سؤال بنقطة حتى استطيع المتابعة ؟ . ولكم جزيل الشكر ، والله الموفق تم تعديل مايو 12, 2005 بواسطه ايمن ابوأنس
ايمن ابوأنس قام بنشر مايو 12, 2005 قام بنشر مايو 12, 2005 السلام عليكم ورحمة الله وبركاته لاحقا لردي في الاعلى : لقد قمت بعمل بعض العمليات من شراء وبيع واستعلام وطباعة فكانت الامور التالية : 1- بعد ادخال فاتورة يخرج تقرير للطباعة ولكن الترويسة بالانجليزي ولا يظهر اسم الصنف ولكن يظهر رقم الصنف وهذا غير صحيح 2- لم يتعرف على الطابعة وتخرج رسالة تقول ( الطابعة غير جاهزة) مع العلم ان الطابعة جاهزة وشغالة 100% ( نوع الطابعة canon laser ) 3- بعد الخروج من البرنامج تتغير الاحرف في اعلى الاعمدة وتصبح ارقام ( بدل a, b, c, d تظهر ارقام 1 - 2 - 3 4 ) الرجاء العمل على اعادة الاحرف بعد الخروج . اسف على كثرة الطلبات . وللموضوع بقية بعد التجهيز 100% .
m.hindawi قام بنشر مايو 12, 2005 الكاتب قام بنشر مايو 12, 2005 بسم الله الرحمن الرحيم بالنسبة لتحميل الصور تحتاج لبرنامج لاقط الشاشة تستطيع ان تحمله من الرابط التالي http://download.ec-software.com/tntsetup.exe بعد التحميل فك الكراك المرفق مع المشاركة الى مجلد البرنامج ثم اضغط PATCH بالنسبة لباقي الامور امهلني يومين لانني مشغول جدا اليوم وغدا واعدك بالرد باسرع ما يمكن ولك الشكر eattnts2c.rar
ماجدجلال قام بنشر مايو 13, 2005 قام بنشر مايو 13, 2005 اخي العزيز بعد اذن استاذي العزيز هنداوي , تستطيع ان تلتقط صورة لسطح المكتب دون برنامج ,,, في اعلي لوحة المفاتيح تجد مفتاح اسمة Print Screen SysRq افتح علي سطح المكتب الذي تريد التقاط صورة لة ثم انقر علي الزر , اذهب الي الرسام واقتح تحرير تجد الخيار " لصق " مفعل انقر علي تجد صور سطح المكتب موجودة في الرسام ,,, نسقها كما تريد وارفقها للمنتدي ,,, هذة الطريقة مجربة واكيدة ,,, واسف للمداخلة ولكن اردت تقديم المساعدة والفائدة للجميع ,,
m.hindawi قام بنشر مايو 13, 2005 الكاتب قام بنشر مايو 13, 2005 بسم الله الرحمن الرحيم أخي أيمن السلام عليكم ورحمة الله وبركاته بالنسبة للمراجع المفقودة لديك ليس لها اثر على البرنامج قمت بإزالتها من عندي ولم يتأثر عمل البرنامج بالنسبة لترقيم الأصناف تستطيع الترقيم حسبما ما تشاء ولكن الترقيم يفضل أن لا يكون عشوائيا بمعنى انه في جميع الشركات التي تقوم بإنتاج وبيع أصناف كثيرة تتبع نمط معين للترقيم مثال بفرض أن لديك أصناف كثير من نوع واحد مثلا كنت تعمل في صيدلية وفيها أصناف كثير متبادلة مثل حبوب الصداع اقترح أن يتم الترقيم كالتالي اجعل الرقم مكون من عشرة خانات أعطي احد الأصناف الرقم التالي 12010ADOL1 لاحظ أن الخمسة أرقام الأولى هي ما يسمى مفتاح الصنف وتدل على طبيعته أصبح لديك مفتاح للصنف ويدل على انه مثلا حبوب صداع (12010) أما الجزء الثاني من الرقم فيدل على نوع هذه الحبوب مثل حبوب بنادول أو باراسيتامول أو adol وعلى هذا المنوال إذا كان لديك صنف أخر من حبوب الصداع تستطيع أن تعطيه الرقم 12010PANAD لاحظ أن كلمة PANAD هي اختصار لكلمة PANADOL اتفقنا أن الخانات الخمسة الأخيرة تدل على نوع الصنف وإذا كان اسمه يتكون أكثر من خمسة أحرف عليك اختصاره ولكنني لم اجبر المستخدم على إتباع هذا النمط بل ترتكه اختياريا بمعنى انه كان بإمكاني أن اجعل البرنامج يرفض أي رقم يقل عن عشرة خانات ولكن تركته مفتوحا وذلك ليتماشى مع كثير من الأعمال الطريقة التي شرحتها بالترقيم تسهل أمور كثيرة مثل حفظ الأرقام بسهولة ويسر من قبل البائع فبمجرد النظر إلى الرقم 12010 يعرف انه حبوب صداع وبالنظر إلى الشق الثاني من الرقم يعرف نوع هذه الحبوب طبعا كما قلت أنت كان ممكن أن اجعل الكمبيوتر يقوم بالترقيم التلقائي كما في العملاء والموردين ولكن إذا كنت تتعامل مع أصناف كثيرة سوف تضيع وهنا طريقة أخرى للترقيم وهي السيريال نمبر لأي منتج بإمكانك اعتباره كرقم لهذا المنتج وهذا أيضا يسهل العمل على البائع ولا داعي لان يحفظ الأرقام فهي موجودة على علب الأصناف بالنسبة لترويسة التقارير اعتمدت اللغة الانجليزية يمكن تغير ذلك إذا أردت ذلك أعلمني وسوف اشرح لك كيفية التغير بالنسبة لرسالة الخطأ سببها نوع الطابعة الموجودة عندك وهي ليزرية على ما أظن قمت بحل المشكلة complile error variable not defined (module13 (code xlPrintErrorsDisplayed أما بالنسبة للرقم P1001 الذي ظهر ولم تدخله فهو استلام فاتورة المشتريات عندما تدخل المشتريات فانه يتم ترقيم كل فاتورة ابتداء من الرقم P1001 وهو ما يسمى بسند استلام المشتريات RECEIVENO اختصار لهذا الاسم باللغة الانجليزية لماذا هذا الترقيم؟ عليك أنت أن تجيبني أما التقارير جميعها لا يظهر فيها أسماء الأصناف وإنما أرقام الأصناف فقط لماذا واعتقد أن هذا كاف فبوجود الرقم تستطيع الرجوع إليه لمعرفة نوع الصنف وما إلى ذلك من معلومات بالنسبة لطابعتك أنا قمت بتعديل اكواد الطباعة عندي لتتلائم مع كل الطابعات إذا أردت أن تعدلها عندك أعلمني بذلك و إلا فانه عليك انتظار الإصدار الثاني من البرنامج وأخيرا شكرا لأخي ما جد جلال على هذه المعلومة التي لم أكن اعرفها
ايمن ابوأنس قام بنشر مايو 14, 2005 قام بنشر مايو 14, 2005 (معدل) شكرا لك اخي هنداوي واخي ماجد جلال فهذه المعلومات اعرفها جيدا ولكن كان سؤال كيفية ارفاقها مع الشرح في المنتدى ؟ اعتقد انها خاصية ليست مفتوحة للجميع والله اعلم ؟ فأنا عندما اريد ان ارفق صورة مع الشرح يطلب منى اسم الرابط الموجودة عليه هذه الصورة يعني يجب ان احمل هذه الصورة ومن ثم اضع رابطها ؟ فهل بهذه الطريقة تظهر الصور مباشرة بعد وضع الرابط ؟ هكذا معنى سؤالي . بالنسبة لتسلسل الارقام فأتوقع انه اسهل من الترقيم اليدوي يا اخ هنداوي فالطريقة التي ذكرتها عن العشر خانات صحيحة ولكنها تحتاج الى ذاكرة اكبر من ذاكرة الكمبيوتر يعني يمكن بدها 2 جيجا بايت لحفظها عن غيب ؟ اما الطريقة التي اقترحتها انا فهي ان يقوم البرنامج تلقائيا بوضع اخر رقم فارع موجود عنده . فهذه الطريقة لا تحتاج الى حفظ ارقام ومن ثم اقوم بوضع المعلومات المهمة عن المنتج في وصف المنتج مثل اسمه او اي معلومة اريدها . فهذه اسهل للذاكرة ، طبعا لكثرة الاصناف ( ممكن توصل مئات الاصناف ) مش معقول الشخص يحفظ كل رقم صنف اذا كان مكون من عشر خانات يا صديقي . طريقة الاستعلام عن صنف ؟ تكون بمجرد وضع جزء من اسم الصنف ليظهر لك الصنف المطوب وليس وضع رقم الصنف كاملا . بالنسبة للاستفسار عن الاصناف داخل التقرير ؟ اذا اردت طباعة تقرير معين ( لاجرد المحل ) فهل احمل معي الكمبيوتر لكي ارى ان الصنف اللي رقمه مثلا 001 انه يشير الى الصنف الذي وصفه مثلا ( بنطلون رجالي جينز تركي ) . ولكن لو ان اسم الصنف ظهر بدل رقمه يكفي ان احمل الاوراق المطبوعة واقوم بالجرد بناءا عليها . هذا ما اردت توضيحه بالنسبة لاسم الصنف . يا ريت يا اخ هنداوي ان تعلمني كيف يمكن ان اجعل الطابعة تعمل على هذا البرنامج لكي استطيع متابعة اختبار البرنامج ( الطابعة ليزرية كما قلت ) فهي canon laser shot lbp-1120 وذكرت لك ان اسماء الاعمدة تتحول من احرف الى ارقام بعد الخروج من البرنامج ؟!! للعلم فقط . ولك جزيل الشكر تم تعديل مايو 14, 2005 بواسطه ايمن ابوأنس
محمد حجازي قام بنشر مايو 14, 2005 قام بنشر مايو 14, 2005 السلام عليكم ... فهذه المعلومات اعرفها جيدا ولكن كان سؤال كيفية ارفاقها مع الشرح في المنتدى ؟ اعتقد انها خاصية ليست مفتوحة للجميع والله اعلم ؟ فأنا عندما اريد ان ارفق صورة مع الشرح يطلب منى اسم الرابط الموجودة عليه هذه الصورة يعني يجب ان احمل هذه الصورة ومن ثم اضع رابطها ؟ فهل بهذه الطريقة تظهر الصور مباشرة بعد وضع الرابط ؟ هكذا معنى سؤالي . يجب أن يكون لديك مساحة في إحدى السيرفرات لكي تستطيع عرض الصور . سجل في موقع جيران أو الياهو و حمل الصور و ضع رابطها عندما يحتاجها محرر المنتدى . وذكرت لك ان اسماء الاعمدة تتحول من احرف الى ارقام بعد الخروج من البرنامج ؟!! للعلم فقط . هذه المشكلة تكمن في تحويل نظام الترميز الموجود في الاكسل من A1 إلى R1C1 ، الرجاء مراجعة الأكواد لمعرفة السطر الذي يقوم بهذا العمل و العمل على معالجته.
ايمن ابوأنس قام بنشر مايو 14, 2005 قام بنشر مايو 14, 2005 (معدل) شكرا جزيلا للاخ محمد حجازي ... فعلا هذا ما اردت السؤال عنه وانت اكدت لي انه يجب تحميلها بأحد المواقع ومن ثم وضع الرابط . اخي هنداوي عندما قمت بالدخول الى صفحة جرد المخازن ومن ثم دخلت الى طباعة كشوف الجرد كما في الرابط التالي : بعدها ظهر لي ما يلي : كما تلاحظ لا يوجد معلومات في الكشف واختفى جميع الروابط من الكشف يعني اذا اردت الرجوع الى الصفحة الرئيسية او الى صفحة الاصناف او اي صفحة اخرى لا استطيع الا اذا اغلقت البرنامج وعدت الى من جديد . واسف على الازعاج . تم تعديل مايو 14, 2005 بواسطه ايمن ابوأنس
m.hindawi قام بنشر مايو 14, 2005 الكاتب قام بنشر مايو 14, 2005 بسم الله الرحمن الرحيم أخي العزيز ايمن لتعديل البرنامج بشان الطباعة وبشان ملاحظتك حول طباعة كشوف الجرد حمل الملف المرفق فك االضغط إلى مجلد واحفظ الاسم لأنك سترجع إليه بعد قليل قم بالتالي أولا افتح البرنامج ادخل إلى محرر فيجوال بيسك بالضغط على alt +f11 على اليسار ستجد أسماء الماكروات Modules ابحث عن Module المسمى module13 انقر علية نقرة واحدة بزر الماوس سيتم تحديد الماكرو الآن من القائمة file اضغط على remove module13 سيظهر مربع حوار يسألك إن كنت ترغب بحفظ الماكرو اضغط لا قم بنفس الأمر مع ال module14 ومع ال module15 ومع ال INVENTORYPRINT بعد ذلك من نفس القائمة fille اضغط على import file ستظهر شاشة تخبرك أن تدخل اسم الماكرو كالتالي ابحث عن المجلد الذي نزلته من الموقع اختاره ثم قم بالفتح ستجد داخله أربع ملفات تحمل نفس أسماء ال modules التي قمت بإزالتها اختر أي واحد منها ثم موافق كرر العملية حتى يتم استيراد الملفات الأربعة بعد ذلك قم بالحفظ من زر الحفظ أعلى الشاشة على اليسار هذه الملفات فيها تعديل عملية الطباعة بالجرد وكذلك تعديل الطباعة ليتوافق مع اغلب الطابعات
ايمن ابوأنس قام بنشر مايو 15, 2005 قام بنشر مايو 15, 2005 السلام عليكم ورحمة الله وبركاته اخي هنداوي ابشرك ان جميع التقارير شغالة 100 % ولكن عند الطباعة تختلف من فاتورة الى اخرى يعني فاتورة المشتريات تختلف عن فاتورة المبيعات يعني الفاتورة الاجلة بدأت من نصف الصفحة وخرج اسماء الاصناف بالعربي ( بالنسبة للاصناف فهي ممتازة ) وكانت الارقام مبعثرة في الصفحة يعني ظهرت كأنها مطبوعة عن الشاشة PRINTSCREEN وكان التفقيط بالريال وانا عندي العملة بالدينار . وكانت الاصناف في كشف الجرد بالانجليزي وكان الجدول جميعه بالانجليزي ما عدا الارصدة يعني خليط بالغتين . وظهرت الاصناف في تقرير مشتريات من مورد ( أرقام ) وليس ( اسماء ) وظهر في اسفل الجدول الترويسة مرة ثانية . يعني الجداول بدها ترتيب وتوحيد لغة وترويسة في أعلى الجداول تبين ماهية المطلوب . والله يكون بعونك علينا والله الموفق
الردود الموصى بها