حسن البدوي0

ارجو المساعدة للرفع

السلام عاليكم ارجو المساعة في التالي

داخل هذا الملف 3 شيتات

شيت العملاء وداخلة اماء العملاء

شيت يوميات العملاء وداخلة كل حركات العملاء من سحب ومرتجع وايداع وتنزيل دفع

شيت العملاء المتاخرين بداخلة اسم العميل المتاخر وتاريخ اخر حركة

المطلوب 

اريد في شيت العملاء المتاخرين ان يتم استدعاء اسم العميل وتاريخ اخر عملية بنائن علي اخر حركة تنزيل دفعة او ايداع بنك مصر

او ايداع البريد المصري مر عاليها 10 ايام وهي فترة السماح 

New Microsoft Excel Worksheet (3).xlsx

شكرا لك تم عمل المطلوب واسف علي الاطاله

هذا هو الملف بعد وضع فاتورتان للعميل احمد سمير والوصول للنتائج ارجو عمل الكود او المعادلات الازمة

New Microsoft Excel Worksheet.xlsx

السلام عاليكم 

اريد استدععاء اكثر 5 اصناف سحب متتالين من الكبير للصغير بشرط ان يكون الكمية مبين تاريخان معينين او في فترة زمنية معينة 

اريد استدععاء اكثر 5 اصناف سحب منخفض متتالين من الكبير للصغير بشرط ان يكون الكمية مبين تاريخان معينين او في فترة زمنية معينة 

البيانات عبارة عن  شيت(مخزن فواتير ) يوجد به سجل فواتير ومسحوبات ومرتجعت

New Microsoft Excel Worksheet.xlsx

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

اسف لاكن الملف كبير وغير مسموح برفعة فما العمل

السلام عاليكم اخواني اريد المساعدة في التعديل علي هذا الكود داخل الملفل

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

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

هذا هو الكود المراد التعديل عالية

Sub ÝÇÊæÑÉ_ÈíÚ_ááãÎÒä()
'
' ÝÇÊæÑÉ_ÈíÚ_ááãÎÒä ãÇßÑæ
'
Dim FS As Worksheet, TS As Worksheet
Dim Q1
Set FS = Sheets(ActiveSheet.Name)
Set TS = Sheets("ÇáãÎÒä ÈÔßá ÚÇã")

For FR = 5 To 30
Q1 = FS.Cells(FR, 6).Value
Q2 = FS.Cells(FR, 4) & "*" & FS.Cells(FR, 5)
Q3 = FS.Cells(FR, 7).Value
For TR = 3 To 999
If TS.Cells(TR, 2) = Q1 Then
For TC = 3 To 33
If TS.Cells(2, TC) = Q2 Then
TS.Cells(TR, TC) = TS.Cells(TR, TC) - Q3
GoTo 9
End If
Next 'TC
End If
Next 'TR
9 Next ' FR
'
End Sub

المخزن.xlsm

شكرا استاذي علي هذا المجهود الرائع شكرا جزيلا لك

استاذي العزيز لا اريد كود اريد دالة او معادلة في الخلية A6 بحيث عند كتابة اسم العميل في الخلية j3 يظهر القديم

القديم عبارة عن المدين-الدائن= القديم

السلام عاليكم ارجو من حضراتكم انشاء معادلة

في الشيت رقم 1 يوجد فاتورة والشيت رقم 2 يوجد مجمع كشف حساب لكثير من العملة

اريد في شيت الفاتورة  عند كتابة اسم العميل في الخلية (j3) ان يظهر في الخلية رقم(a6) اجمالي الدين للعميل

فاتورة بيع اجل.xlsx

شكرا استاذي علي هذا المجهود الرائع تم عمل اللازم بالظبط شكرا جدا

السلام عليكم ارجو منكم انشاء كود لترحيل اصناف الفاتورة الي المخزن

بحيث يوجد داخل ثلاث شيتات

الشيت الاول فاتورة بيع

الشيت الثاني فاتورة توريد

الشيت الثالث المخزن

اريد عند الضغط علي ترحيل يتم ترحيل المتر المربع لكل صنف في فاتورة البيع داخل المخزن بالثالب(يتم خصم من الكمية الموجود في المخزن)

اريد عند الضغط علي ترحيل يتم ترحيل المتر مريع لكل صنف في الفاتور التوريد داخل المخزن بالموجب(يتم اضهة علي الكمية الموجودة)

رصيد المخزن.xlsx

شكرا اخي علي هذا المجهود الرائع شكرا جزيلا لكم

@سليم حاصبيا استاذي المعادلة تعمل علي 500 سطر فقط واريد علي ما يزيد عن 100 الف سطر 

السلام عاليكم ارجو من حضراتكم التكرم علي في ايجاد هذا الكود

اريد عند كتابة اسم العميل في الخليه c3 والضغط علي بحث تظهر نتائج العميل كما موضح في الشيت الثالث النتائج ماخوزا من الشيت رقم 2 (مجمع حسابات العملاء) مع مراعات ان عدد البيانات في الشيت رقم 2 ممكن يتخطي ال100000 سطر نظرا لكشف حساب عميل طويل المدة

كشف حساب عملاء.xlsx

السلام عاليكم انا اقوم بانشاء برنامج حسابات بسيط للعملاء والموردين 

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

اريد فقط انشاء كود بحيث انا داخل شيت فاتورة العملاء رقم 1 هناك فاتورة عملاء اريد عند الضغط علي ترحيل يتم خصم عددالامتار المربعة  لكل صنف من المخزن الامتار موجودة في العامود(h)

الطلب الثاني 

هناك شيت كشف حساب العملة 

اريد عند كتابة اسم العميل في الخلية(c3)وتحديد التاريخ من الخلية (f3الي f4)يتم سرد بيانات العميل المحددة بين التاريخين  من شيت (مجمع حساب العملاء الاعدادات)

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

من فضلك تم تنبيهك كثير جداً لا تقوم برفع وتكرار نفس المشاركات .. فهذا نفس الملف

البدوي كاربت.xlsm

 السلام عاليكم

اريد المساعدة في الاتي

اريد تشغيل هذه المعادلة لكي يتناسب مع هذا الشيت

دون اضافات اي صفوف او اعمدة التعديل يكون علي الكود فقط

انتبه من فضلك مشاركة مكررة ... تـــم بالفعل حذف المشاركة الأخرى

=IFERROR(INDEX('كشف حساب'!$B$4:$H$972;SMALL(IF('استخراج كشف حساب عميل'!$E$3<='كشف حساب'!$B$4:$B$972;IF('استخراج كشف حساب عميل'!$E$4>='كشف حساب'!$B$4:$B$972;IF('استخراج كشف حساب عميل'!$C$3='كشف حساب'!$C$4:$C$972;ROW('كشف حساب'!$B$4:$H$972)-3)));ROW($A1));MATCH('استخراج كشف حساب عميل'!B$5;'كشف حساب'!$B$3:$G$3;0));"")

55.xlsx

شكرا اساتذتي الكرام علي هذا المجهود الجبار

اخي حسين مامون انت فعلت اللازم ولاكن اخر طلب بعد اذنك اريد اسم العميل داخل الشيت وزر الرجوع كما موضح في الشيت رقم 3

55.xlsm

اخي العزيز هذا الكود يعمل معي جيدا كل ما اريدة هو بعد كل عملية يجعل الخلية بدون قيمة لا يوجد بها شيئ

اسعار العملاء.xlsm

استاذي العزيز اريد في شيت العميل ان يظهر اسم العميل

السلام عاليكم  بعد اذن الجميع اريد المساعدة في تعديل كود

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

انتبه من فضلك مشاركة مكررة .. تم بالفعل حذف المشاركة الأخرى 

اسعار العملاء.xlsm

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

تم وضع فولدر باسم فواتير في برتيشن e

اريد حفظ الفاتورة BDF 

اريد حفظ الفاتورة برقم الفاتورة 

اريد حفظ الفاتورة برتيشن e 

ملحوظة اريد الفاتورة المحفوظة بصيغة الBDF ورقة واحده مثل الورقة المطبوعة اي انا تكون بدون فراغات 

ملحوظة ا

اضغط زر طباعة اريد الBDF هكذا