اذهب الي المحتوي
أوفيسنا

رضا-ابو مريم

عضو جديد 01
  • Posts

    30
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو رضا-ابو مريم

  1. المطلوب الترحيل الى صفحة TBLJOURT بنفس الاسلوب المطلوب : موجود فى صفحة FRMOCACH FINAL_STOCK_ACC2017.rar
  2. المطلوب ترحيل رقم الفاتورة التاريخ رقم العميل اجمالى الفاتورة 10% ض مبيعات الصافى الى صفحة " inh " المطلوب ترحيل رقم الفاتورة رقم الصنف اسم الصنف الكمية السعر الاجمالى الى صفحة "int" tax.rar
  3. فى صفحة SalesForm يوجد زر ترحيل هل يمكن اكواد زر استدعاء و زر تعديل و شكرا Sales Tax V5.rar
  4. الاخ ياسر هل ممكن كود الاستدعاء و التعديل لنفس الفاتورة
  5. الاخ ياسر اعتذر عن الخطاء غير المتعمد بالنسبة للطلب الثالث المطلوب فى نفس ورقة العمل SaleForm اخفاء المدى من (A12:J36) و اظهار صف صف كلما وضعت كود الصنف فى الخلية من A12 :A36
  6. ترحيل فاتورة (SaleForm) 1- ترحيل راس الفاتورة (رقم الفاتورة و التاريخ و العميل الخ)الى شيت SalesInvH 2- ترحيل بيانات الفاتورة (رقم الصنف و اسم الصنف و الكمية و السعر و الاجمالى الخ) الى SalesInvT 3-اخفاء كل الصفوف الفارغة و اظهارها فقط عند الاستخدام و شكرا SalesTax4-4 - Copy.rar
  7. برجاء التعديل على فورم SALESFORM و عمل زر حفظ و بحث و تعديل و الغاء بحيث يتم ترحيل - Ary مع اصناف الفاتورة الى شيت Sheet8 و يتم ترحيل Ary1 الى Sheet16 SalesTax.rar
  8. الاخ حمادة عمر ممكن برمجة زر بحث و تعديل و حذف طبقا للطريقة السابقة فى زر تسجيل و شكرا
  9. الاخ حمادة عمر ممكن برمجة زر بحث و تعديل و حذف طبقا للطريقة السابقة فى زر تسجيل و شكرا
  10. الاخ الكريم حمادة عمر السلام عليكم عاجز عن الشكر و الله ذلك كل ما اريدة بالتمام و جزاك الله خير عنى وعن كل من اساعدهم بهذ العمل
  11. الاستاذ /سليم عاجز عن الشكر انا اريد ترحيل عن طريق الفورم فى شيت 3 يوجد زر امر يفتح فورم فى هذا الفوم يوجد بيانات فى راس الفورم و بيانات فى التفاصيل و كل ما اريدة ترحيل راس الفاتورة (رقم الفاتورة +تاريخ+العميل الخ) الى شيت saleH و تفاصيل الفاتورة الى (رقم الصنف و اسم الصنف الخ ) الى saleT انا استخدم الكود التالى و لكن لا يعمل 'زر تسجيل Dim Ary Dim LR As Long Dim LR1 As Long Dim Adr As String Dim r, c As Integer Dim r1, C1 As Integer '================= SAMA2 = MsgBox("سيتم تسجيل البيانات الموجودة بالفاتورة ؟هل انت متأكد من اجراء هذه العملية", vbYesNo) If SAMA2 = vbYes Then If Me.TxtInvNo = "" Or Me.TxtIndate = "" Or Me.TxtMonthCod = "" Or Me.ComDocNo = "" Or Me.ComDocType = "" Or Me.TxtcustNo = "" Or Me.Comcustn = "" Or Me.Comcustn = "" Or Me.txtstoNo = "" Or Me.ComStoN = "" Then 'Exit Sub MsgBox "اكمل البيانات الغير مسجلة اعلي الفاتورة اولا", vbMsgBoxRight, "نقص في البيانات !!!" Exit Sub Else Ary = Array(Me.TxtInvNo.Value, Me.TxtIndate.Value, Me.ComDocNo.Value, Me.ComDocType.Value, Me.txtstoNo.Value, Me.ComStoN.Value, Me.TxtcustNo.Value, Me.Comcustn.Value, Me.TxtGtotal.Value, Me.Txtsaletax.Value, Me.txtGtax.Value, Me.txtDam.Value, Me.TXTNETTOTAL.Value, Me.txtTafkit.Value, Me.TxtMonthCod.Value) '=============================== With Sheet1 LR = .Cells(.Rows.Count, "A").End(xlUp).Row + 1 End With Sheet1.Range("A" & LR).Cells(1, 1).Resize(1, 15).Value = Ary '=============================== With Sheet2 LR1 = .Cells(.Rows.Count, "A").End(xlUp).Row + 1 End With For r = 1 To 15 Adr = Cells(r, 1).Address(0, 0) If Len(Trim(Me.Controls(Adr))) Then For c = 1 To 8 Adr = Cells(r, c).Address(0, 0) Sheet2.Range("A" & LR1).Cells(r, c).Value = Me.Controls(Adr).Value Next End If Next '================ 'kh_New '================ End If MsgBox "!! تم تسجيل بيانات الفاتورة.. بنجاح " Else MsgBox "!! لم يتم تسجيل البيانات" End If
  12. السلام عليكم برجاء التعديل على المرفق بحيث يتم ترحيل راس الفاتورة الى saleH و تفاصيل الفاتورة الى saleT و شكرا Mall_5.rar
  13. السلام عليكم لقد قمت بالتعديل على المرفق كما اشارتم الية و لكن لا اعرف كيف يتم عمل الاستعلام الخاص 1- عمولة مدير الفرع فى الفرع الذى هو مديرة 2- عمولة المندوب من المبيعات الخاصة به فقط 3- عمولة الحسابات على اجمالى مبيعات الفروع ملحوظة :المبيعات يتم تسجيلها شهريا و ليس يوميا وشكرا Salary.rar
  14. السلام عليكم ارجو التعديل على المرفق و عمل الاستعلام اللازم لذلك و هل يتم اضافة جداول اخرى ام لا وشكرا
  15. لدى قاعدة بيانات موظفين بالتدريج الاتى 1 مندوب مبيعات يستحق عمولة فقط على مبيعاتة الشخصية طول الشهر 2 مدير فرع و يستحق عمولة على الفرع الخاص بة 3 حسابات و يستحق افرادها عمولة على جميع مبيعات كل الفروع ( اجمالى مبيعات الشركة الشهرية ) كيف يتم حساب ذلك Salary.rar
  16. لدى جدول رصيد اول المدة مبيعات و مشتريات و تحويلات مخزنية و لكن لا اعرف كيف يتم عمل استعلام رصيد اخر المدة لكل فرع و لكل الفروع Sales Tax System.rar
  17. السلام عليكم اخوانى فى الله اشكركم على تعاونكم ولكن ليس هو المطلوب المطلوب الاستعلام يظهر كل الاصناف سواء لها مخزون اول مدة او تم ادخال صنف جديد بعد بداية السنة
×
×
  • اضف...

Important Information