خطأ فى كود ترحيل وارد _ منصرف كارت الصنف

[جلال الجمال_ابو أدهم]

مرفق برنامج بسيط لكارت صنف و استخراج حركة بين تاريخين

 

                           _ و هو من اعمال احد اعضاء المنتدى المحترمين

 

يوجد خطأ فى كود الترحيل لكارت الصنف سواء الوارد _ الصادر ( لا يتم الترحيل بالكامل للبيانات )

 

و يرجى اضافة كود طباعة لكشف الحركة بين تاريخين للصنف PASS 123

 

                                                                مع تحياتى و تقديرى

 

 

_المخزون جديد_نموذج ادخال و صرف _ كشف بين تاريخين_pass 123.rar

[جلال الجمال_ابو أدهم]

للرفع

[جلال الجمال_ابو أدهم]

للرفع

[احمدزمان]

السلام عليكم و رحمة الله وبركاته

اخي جلال

يجب علينا هنا اجراء بعض التعديلات

 - استخدام تسمية النطاقات لتسهيل البحث

 - التعديل على دوال استخراج البيانات في كشف الصنف

 = = = = = = = = = = =  = = = =

 

مع التحية

[احمدزمان]

السلام عليكم

تم تعديل بعض الدوال

سابقا كان يعمل البحث حتى الصف1001 فقط ولديك 15000 صف

تم اضافة نطاقات وتسميتها

 

سوف تكون استجابة الملف اسرع من السابق ان شاء الله

 

آمل التجربة

_المخزون جديد_نموذج ادخال و صرف _ كشف بين تاريخين_pass 123.rar

[جلال الجمال_ابو أدهم]

استاذى المحترم / احمد زمان

 

اسعدنى وجود بصماتك بالمنتدى _ تقبل تحياتى

 

تم تجربة الملف _ و تم الاطلاع على تعديلاتك _ جزاك الله خيرا

 

و لكن مازالت المشكلة الرئيسيه فى ترحيل فورم الوارد و الصادر _ الكود لا يقوم بترحيل كامل البيانات + خطأ فى الترحيل

 

مع تقديم تقديرى و احترامى لشخصكم الكريم

[جلال الجمال_ابو أدهم]

للرفع

[جلال الجمال_ابو أدهم]

للرفع

[جلال الجمال_ابو أدهم]

للرفع

[جلال الجمال_ابو أدهم]

للرفع

[جلال الجمال_ابو أدهم]

للرفع

[جلال الجمال_ابو أدهم]

للرفع

[جلال الجمال_ابو أدهم]

للرفع

[احمدزمان]

السلام عليكم و رحمة الله وبركاته

 

ممكن نستبدل الفورمين الإثنين وارد ومنصرف بورقة واحدة تشمل الوارد و المنصرف

كما في الصورة

 

4المخزون.bmp

 

يتم من خلالها المطلوب بالإضافة

وممكن اضافة اسماء العملاء

 

[احمدزمان]

الصورة

[جلال الجمال_ابو أدهم]

استاذ / احمد زمان

 

         الله ينور عليك _ و اقترح  زيادة الفورم ليشمل 25 : 30 صنف

[احمدزمان]

وينور عليك

ممكن اكثر من الف صف

لامشكلة

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

اثراءا للموضوع :-

 

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

Z = 2
x = 2
y = 3
On Error GoTo 1
Do Until Me.Controls("comboBox" & x).Value = ""
lr = Range("A" & Rows.Count).End(xlUp).Row
Cells(lr + 1, 4).Value = ComboBox1.Value
Cells(lr + 1, 1).Value = Application.Text(TextBox2.Value, "dd/mm/yyyy")
Cells(lr + 1, 3).Value = TextBox1.Value
Cells(lr + 1, 5).Value = TextBox3.Value
Cells(lr + 1, 2).Value = Me.Controls("comboBox" & x).Value
Cells(lr + 1, 6).Value = Me.Controls("textBox" & Z + 2).Value
Cells(lr + 1, 7).Value = Me.Controls("textBox" & y + 2).Value
x = x + 1
y = y + 2
Z = Z + 2
Loop

For i = 1 To 15
Me.Controls("TextBox" & i).Value = ""
Me.Controls("ComboBox" & i).Value = ""
Next

1 End Sub

 

H-مخازن.rar

[احمدزمان]

‏الثلاثاء‏ 7‏/2‏/1435هـ الموافق ‏10‏/12‏/2013م 

 

اخي الكريم حسين جودة

جزاك الله خيرا لكريم مبادرتك

كود رائع من اخ كريم

 

السلام عليكم و رحمة الله وبركاته

 

ان شاء الله اذا ربنا قدرنا وسهل الأمور

سوف نقوم بعمل نموذج مرن

نوع: نموذج واحد لكل النوعين وارد وصرف

رقم الحركة: يتم تلقائيا وضع تسلسل للحركات

النوع: يتكون من قائمتين مسندلة تختلف حسب نوع الإذن المدخل + امكانية اضافة انواع جديدة تلقائيا بمجرد ادخالها هنا سوف يتم اضافتها للقائمة النوع المختار حاليا

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

اسم العميل: يتم اختيارة من القائمة المنسدلة + امكانية اضافة اسم عميل جديد بمجرد ادخاله هنا

الأصناف: يتم اختيار الصنف من القائمة + امكانية اضافة صنف جديد بمجرد ادخاله هنا

 

كل هذه البيانات تتم معالجتها من أي مسافات زائدة قبل اضافتها

 

ونقول يارب يامسهل

[جلال الجمال_ابو أدهم]

استاذ / احمد زمان

استاذ / حسين العصلوجى

 

                      بارك الله فيكم _ واتمنى لكم دوام الصحة و العافيه

 

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

 

                                    مع تقديرى و احترامى لشخصكم الكريم

[احمدزمان]

السلام عليكم و رحمة الله وبركاته

في المرفق

اضغط زر طباعة التقرير الى اليسار

تتم الطباعة و الترحيل

 

 

‏الثلاثاء‏ 7‏/2‏/1435هـ الموافق ‏10‏/12‏/2013م 

 

اخي الكريم حسين جودة

جزاك الله خيرا لكريم مبادرتك

كود رائع من اخ كريم

 

السلام عليكم و رحمة الله وبركاته

 

ان شاء الله اذا ربنا قدرنا وسهل الأمور

سوف نقوم بعمل نموذج مرن

نوع: نموذج واحد لكل النوعين وارد وصرف

رقم الحركة: يتم تلقائيا وضع تسلسل للحركات

النوع: يتكون من قائمتين مسندلة تختلف حسب نوع الإذن المدخل + امكانية اضافة انواع جديدة تلقائيا بمجرد ادخالها هنا سوف يتم اضافتها للقائمة النوع المختار حاليا

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

اسم العميل: يتم اختيارة من القائمة المنسدلة + امكانية اضافة اسم عميل جديد بمجرد ادخاله هنا

الأصناف: يتم اختيار الصنف من القائمة + امكانية اضافة صنف جديد بمجرد ادخاله هنا

 

كل هذه البيانات تتم معالجتها من أي مسافات زائدة قبل اضافتها

 

ونقول يارب يامسهل

 

_المخزون جديد_نموذج ادخال و صرف _ كشف بين تاريخين_pass 123.rar

[جلال الجمال_ابو أدهم]

استاذ / احمد زمان

استاذ / حسين العصلوجى

تم التعديل على الملف _ مرحلة 2

تم اضافة كود بحث للاستاذ/ عبدالله باقشير كالاتى:-

• تم عمل شيت تكويد اصناف و منه يتم استخراج الارصده الحالية _ فقط ادخل اسم الصنف
• تم اضافة كود بحث و ادخال للصنف بجانب فورم الوارد و المنصرف ( دبل كليك )
• تم اضافة كود بحث عن الصنف _ بشيت كشف الصنف ( دبل كليك)
• تم ربط القائمه المنسدلة _ بصفحة تكويد الاصناف
• المطلوب _ مرحلة 3
• ان يكون فورم الوارد و المنصرف يسمح بادخال اكثر من حركة صنف فى المرة الواحدة و لتكن 25حركة صنف _ او الحد المسموح و الممكن لعدم خبرتى بالاكواد
• اعادة تنسيق _ فورم المنصرف ليكون لون و الكتابة واضحة
• زيادة خانة لرقم كود الصنف بفورم الوارد و المنصرف يظهر تلقائيا عند اختيار اسم الصنف بالفورم
• زيادة خانة لرقم كود الصنف شيت الحركة _ شيت الكشف
•           اذا تطلب الامر تعديل اسم المشاركة ليكون المطلوب اوضح لكم حرية التصرف

                         بارك الله فيكم _ مع تقديرى و احترامى

مخازن اوفيسنا معدل.rar

تم تعديل ديسمبر 10, 2013 بواسطه galal elgammal

[جلال الجمال_ابو أدهم]

اخى/ احمد زمان - المحترم

 

الله ينورعلى اعمالك الجميله _ ابداع سهل ممتنع

 

وانا اسف لاننى لم ارى مشاركتك الا بعد رفع الملف و جارى تجربة الملف _ و من غير كلام نرفع القبعة تحية للابداع

و مبدئيا _ ارجو فصل كود الترحيل عن كود الطباعه

 

                و استئذنك الاطلاع على مشاركتى _ و ابداء الرأى _ مع تقديرى و احترامى

[جلال الجمال_ابو أدهم]

للرفع

[جلال الجمال_ابو أدهم]

للرفع