
رضا-ابو مريم
عضو جديد 01-
Posts
30 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو رضا-ابو مريم
-
للرفع
-
المطلوب الترحيل الى صفحة TBLJOURT بنفس الاسلوب المطلوب : موجود فى صفحة FRMOCACH FINAL_STOCK_ACC2017.rar
-
للرفع
-
للرفع
-
للرفع
-
المطلوب ترحيل رقم الفاتورة التاريخ رقم العميل اجمالى الفاتورة 10% ض مبيعات الصافى الى صفحة " inh " المطلوب ترحيل رقم الفاتورة رقم الصنف اسم الصنف الكمية السعر الاجمالى الى صفحة "int" tax.rar
-
فى صفحة SalesForm يوجد زر ترحيل هل يمكن اكواد زر استدعاء و زر تعديل و شكرا Sales Tax V5.rar
-
الاخ ياسر هل ممكن كود الاستدعاء و التعديل لنفس الفاتورة
-
الاخ ياسر اعتذر عن الخطاء غير المتعمد بالنسبة للطلب الثالث المطلوب فى نفس ورقة العمل SaleForm اخفاء المدى من (A12:J36) و اظهار صف صف كلما وضعت كود الصنف فى الخلية من A12 :A36
-
ترحيل فاتورة (SaleForm) 1- ترحيل راس الفاتورة (رقم الفاتورة و التاريخ و العميل الخ)الى شيت SalesInvH 2- ترحيل بيانات الفاتورة (رقم الصنف و اسم الصنف و الكمية و السعر و الاجمالى الخ) الى SalesInvT 3-اخفاء كل الصفوف الفارغة و اظهارها فقط عند الاستخدام و شكرا SalesTax4-4 - Copy.rar
-
برجاء التعديل على فورم SALESFORM و عمل زر حفظ و بحث و تعديل و الغاء بحيث يتم ترحيل - Ary مع اصناف الفاتورة الى شيت Sheet8 و يتم ترحيل Ary1 الى Sheet16 SalesTax.rar
-
الاستاذ /سليم عاجز عن الشكر انا اريد ترحيل عن طريق الفورم فى شيت 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
-
السلام عليكم لقد قمت بالتعديل على المرفق كما اشارتم الية و لكن لا اعرف كيف يتم عمل الاستعلام الخاص 1- عمولة مدير الفرع فى الفرع الذى هو مديرة 2- عمولة المندوب من المبيعات الخاصة به فقط 3- عمولة الحسابات على اجمالى مبيعات الفروع ملحوظة :المبيعات يتم تسجيلها شهريا و ليس يوميا وشكرا Salary.rar
-
السلام عليكم ارجو التعديل على المرفق و عمل الاستعلام اللازم لذلك و هل يتم اضافة جداول اخرى ام لا وشكرا
-
لدى قاعدة بيانات موظفين بالتدريج الاتى 1 مندوب مبيعات يستحق عمولة فقط على مبيعاتة الشخصية طول الشهر 2 مدير فرع و يستحق عمولة على الفرع الخاص بة 3 حسابات و يستحق افرادها عمولة على جميع مبيعات كل الفروع ( اجمالى مبيعات الشركة الشهرية ) كيف يتم حساب ذلك Salary.rar
-
هل من رد سريع يا اخوة
-
لدى جدول رصيد اول المدة مبيعات و مشتريات و تحويلات مخزنية و لكن لا اعرف كيف يتم عمل استعلام رصيد اخر المدة لكل فرع و لكل الفروع Sales Tax System.rar
-
السلام عليكم اخوانى فى الله اشكركم على تعاونكم ولكن ليس هو المطلوب المطلوب الاستعلام يظهر كل الاصناف سواء لها مخزون اول مدة او تم ادخال صنف جديد بعد بداية السنة