اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

ترحيل بيانات من شيتين والقيام بعمليات حسابية وتنسيق


الردود الموصى بها

لقد قمت بالتعديل على هذا الكود الموجود في الملف المرفق . لكي ولكن وجت اخطاء ..

وطرحت الموضوع لكي يتم تصحيح الاخطاء  وتنفيذ الكود  للمهمة التي هي مطلوبة منه .

 

 

ترحيل البيانات وتنسيق المرحل وحساب العدد للارسال.rar

رابط هذا التعليق
شارك

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

نرجو التكرم منكم بالمشاركة والحل ..

ترحيل البيانات وتنسيق المرحل وحساب العدد للارسال.rar

رابط هذا التعليق
شارك

سأقوم الشرح هنا بالتفصيل :

أولا تعريف : 

1- ورقة المبيعات : هي عبارة عن جدول يتم تسجيل فيها مبيعات الموظفين يومياً حسب (مبلغ الصنف + نوع الصنف + اسم العميل + رقم هاتفة + اسم الموظف المسوق + تاريخ البيع ) وغيرها من الاعمدة الاخرى .. وعندما تتم عملية بيع لعميل ما من قبل موظف يتم تسجيل البيانات حسب الاعمدة ويسمى هذا طلب واحد . يحص موظف واحد  . وربما يدخل الموظف أكثر من طلب .  

2 - اسبوع عمل  : يبدا من بداية يوم الاحد وينتهي نهاية يوم الخميس  أي انها 5 ايام عمل

3 - ما نقوم به من عمل  :  نقوم في نهاية الاسبوع ( يوم الخميس ) بعمل عد الطلبات المدخلة في ورقة المبيعات  خلال الاسبوع الحالي . نركز على التاريخ .

    لا نه هناك طلبات صار لها اكثر من اسبوع ربما شهر او شهور ، نأخذ فقط الطلبات لهذا الاسبوع .

   ونسجل بعض البيانات وليس كل بيانات الطلب وهي ( المبلغ  + اسم المسوق + اسم العميل + تاريخ البيع )  والاهم في هذا هو اسم المسوق وتاريخ البيع .. عشان نعطي المسوق حافز 

  أما بقية البيانات المذكورة فهي للحسابات لكي تتأكد أن الطلب لم يأخذ علية الموظف مرة اخرى حافز أخر .. فالحسابات تسجل هذه البيانات لديها ، واذا اتاهم الطلب مرة أخرى لم تصرف علية

حافز . يقولون الطلب صرف عليه حافز سابقا في تاريخ ... للموظف .... ؟  

4 - مالفرق بين  الحافز والعمولات والمكافأة :  هي عبارة عن مبالغ نقدية  تصرف للموظفين  وكلها تندرج تحت اسم العمولات  وتختلف من موظف لأخر حسب وظيفته فالمبيعات غير المشرفين غير الاداريين  //  وهي كالتالي :

     أ- الحافز  :   يعطى اسبوعياً    ويحسب على عدد الطلبات فقط خلال أسبوع  ولها شرائح متعددة  .  

    ب - العمولات  :  تعطى شهرياً    وتحسب على مبلغ الطلبات خلال شهر ولها شرائح متعددة .

     ج  المكافأة وتعطى اسبوعي وشهري  وتحسب عند تحقيق الهدف على ( مبلغ أو عدد الطلبات  وأحياناً تقييم العمل ) ولكنها ليس لها شرائح بل دفعة واحدة   على سبيل المثال 200 ريال فقط . وهنا في هذا المرفق المكافأة فقط للمبيعات على عدد الطلبات فقط .   

------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

في هذا المرفق هو كيف  اجمع هذا العمل كلة  في زرار واحد .. ؟

الاشياء التي نحتاجها هي ( اولاً قاعدة البيانات أو ما نسمية بالمبيعات ثانياً شرائح  الحوافز العمولات والمكافئات  ثالثا  النتيجة التي نريدها  وهي خطاب للحسابات  وسميتها بالحوافز . )  

لقد قمت بهذا العمل ووضعت الاكواد الكثيرة وتم التنفيذ بالشكل المطلوب لكن بعض النتائج غير صحيحة  سوف اشرحها الآن بالفقرة ثانياً :

رابط هذا التعليق
شارك

ثانياً : الاخطاء التي واجهتني في هذه الاكواد هي كالتالي :

Sheets("المبيعات").Activate
 lR = Cells(Rows.Count, 1).End(xlUp).Row
  a = Date
  b = Weekday(Date)
 For  c = 1 To 7
    a = a - 1
    b = b - 1
    If b = 1 Then   GoTo nasa
    End If
Next c

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

 والخطاء في الكود هو : أذا كان اليوم سبت او احد ..  ننقص منه 7 . يعطينا النتيجة حق الاسبوع الماضي .. وهذا لا نرغب فية . 

رابط هذا التعليق
شارك

لعلي وجت الحل في المشكلة الاولى وهي أيجاد أول يوم في الاسبوع الحالي .. وهو يوم الاحد .

 


 
  a = DateAdd("d", 0, "11/8/2015")
  b = Weekday(a)
 For b = b To 2 Step -1
   If b = 1 Then
    GoTo nasa
    End If
   a = a - 1
Next b
nasa:

لقد وضعت الدالة  dataeadd بدل date   لكي اجرب عليها ان الكود شغال صح او لا ..  ولو وضعت بدل الصفر 1 أي زوت يوم  وهكذا كنت ازود عليها عشان اتأكد أن الكود ماشي صح .. ويبقى  التقييم منكم .. أذا كان صحيح أم عندي خطاء ههههه  وأذا كان هناك مختصر نتمنى طرحة .. في المشكلة الاولى .

رابط هذا التعليق
شارك

النقطة الثانية هي :

انه يوجد لدينا في الشيت (h) شرائح الحوافز والمكافئات للموظفين (المسوقين) والمشرفين  وهي كالتالي

المبيعات    حافز/  المبيعات / الاسبوعي /  لرفع الطلبات 
  عدد الطلبات  الحافز  مكافئة المركز الاول 
  1 0 0
  2 200 0
  3 300 200
  4 450 200
  5 600 200
  6 150 زيادة على السابق لكل طلب 150
         
المشرفين    حافز/  مشرف المبيعات / الاسبوعي  / لرفع الطلبات 
  عدد الطلبات  الحافز  ملاحظات 
  5 500  
  6 600  
  7 750  
  9 1,000  
  >9 100 أضافة على السابق 
       

 

اريد توزيعها تلقائيا  حسب الموظفين الذين يستحقونها في شيت ( الحوافز )  في الخلايا الفارغة  وهي كالتالي .

م اسم المسوق عدد الطلبات الحافز العمولة المكافأة الاجمالي
1 عبدالله 7        
2 سعيد 12        
3 احمد  11        
4 رجب  1        
5 المشرف 31        

-----------------------------------------------------------------------------------------------

يفترض النتيجة تطلع معي على النحو التالي :

م اسم المسوق عدد الطلبات الحافز العمولة المكافأة الاجمالي
1 عبدالله 7 900     900
2 سعيد 12 1,650   200 1,850
3 احمد  11 1,500     1,500
4 رجب  1 0     0
5 المشرف 31 3,200     3,200

واذا تساوت عدد الطلبات للمسوقين  فإن كل واحد يأخذ 200 ريال مكافأة .  أما أذا كان هناك فرق في العدد فالأكبر هو الذي يأخذ المكافئة .

ولقد قمت بأرفاق الملف لكم

ترحيل البيانات وتنسيق المرحل وحساب العدد للارسال.rar

علما انني اقصد ( الموظفين ) هم ( المبيعات ) هم ( المسوقين )

والمشرفين هم المشرفين

  • Like 1
رابط هذا التعليق
شارك

تم تجزئة الكود الي اجزاء وتم حل كل جزء لوحدة . وفي الاخير تم انجاز العمل ككل  ..

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

 

ترحيل البيانات وتنسيق المرحل وحساب العدد للارسال.rar

رابط هذا التعليق
شارك

السلام عليكم

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

ولإثراء الموضوع

هذا حل لبعض المشكلات آثرت أن أعرضه هنا للاستفادة

قمت بحذف كثير من أسطر الكود واستبدالها بما يناسبها

قمت بعمل ترتيب للبيانات في الورقة h  بما يناسب المطلوب

 

تقبل تحياتي

ترحيل البيانات وتنسيق المرحل1.rar

رابط هذا التعليق
شارك

للتصحيح

أبوعيد وليس أبوعبيد

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

أسأل الله أن يجعل أيامك كلها عيد في عيد 

فرحة في فرحة

ألف شكر لك 

تقبل تحياتي

  • Like 1
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information