طاهر محمد

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

الملف المرفق حصلت عليه من صديق قال انه حصل عليه من احد المواقع للامانه

جزي الله من صممه كل خير

برجاء التعديل في

اولا فاتورة الوارد (المشتريات ) بالاتي:

1- اضافة حقل لكتابة رقم الفاتوره  بجوار الرقم المسلسل اعلاه حيث يسمع في كل بنود فاتورة الصرف ادناه

2- اضافة حقل بالاعلي لكتابة اسم المورد بجوار الرقم المسلسل ورقم الفاتوره حيث يسمع في كل بنود فاتورة الصرف ادناه

3-اضافة اعمده للسعر والضريبه والقيمه  بحيث يكون الشكل  (الصنف - الكميه - السعر - الضريبه - القيمه )
ثانيا - فاتورة الصادر (المنصرف ) تعديل بالاتي

1- اضافة حقل لكتابة رقم فاتورة الصرف بجوار الرقم المسلسل اعلاه حيث يسمع في كل بنود فاتورة الصرف ادناه

2- اضافة حقل بالاعلي لكتابة جهة الصرف به بحيث يسمع في كل بنود فاتورة الصرف ادناه

3- اضافة عمود للسعر  وعمود للقيمه بحيث يكون الا عمده ( الكميه - السعر - القيمه )

ثالثا عمل التقارير التاليه:

1- تقرير نبحث به عن الموردين ( كميه والسعر والقيمه ) + اجمالي قيم التوريد

2- تقرير نبحث به عن جهات الصرف ( كميات + قيم ) + اجمالي قيمة المنصرف 

3- تقرير يوضح رصيد الصنف (الوارد - المنصرف ) اللي هو عباره عن بطاقة مراقبة الاصناف

   اتمني من الله ان يوفقكم وان يكون هذا العمل منكم خالصا لوجهه تعالي وان يكون  من العلم المنتفع به  ولكم جزيل الشكر 

المخزن.accdb

الترحيل من SHEET1    الي SHEET2

استاذي الفاضل المشكله انه لايتم الترحيل في اول صف فارغ 

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

الباس وورد 123

واحد - اثنان - ثلاثه

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

برجاء المساعده قي اصلاح كود الترحيل

المطلوب ان يتم الترحيل في اول صف فارغ في الشيت  وهكذا 

شاكرا جهدكم الكريم 

الباس وورد 123

واحد - اثنان - ثلاثه

البرنامج.xlsm

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

شكرا لحضرتك 1- احمد بدره

شاكر مجهودكم الكريم

مازالت المشكله في الترحيل كما هي

المطلوب ان يتم الترحيل في اول صف فارغ  في صفحة البيانات 

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

بعد التحيه لاساتذتي الاعزاء

شاكرا جهدكم الكريم  وداعيا من الله لكم التوفيق

برجاء المساعده فى الاتي

1- المساعده في حل مشكلة معادلة الترحيل

2- كا هو موضخ في الصوره المرفقه برجاء ان تختفي اعمدة المبيعات لو تم اختيار نوع الفاتوره مشتريات 

وان تختفي اعمدة المشتريات لو تم اختيار نوع الفاتوره مبيعات

3- تفعيل الفورم الذي الغرض منه عندما نضغط دبل كليك فى خلية كتابة كود الصنف يتم فتح الفورم ونختار منه وينسخ كود الصنف فقط في خلية كود الصنغ

ولكم جزيل الشكر

البرنامج.xlsm

متاسف البس وورد هو 123

واحد اثنان ثلاثه

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

اعتزر عن عدم كتابة الباسورد

الباسورد هو 123

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

في الملف المرفق صفحت ترحيل بها حماية للمعادلات 

التاريخ-المخزن اسم المورد- الصنف-الوحده

برجاء جعل حماية الصفحه تعمل بعد الترحيل حيث انا يوجد بها مشكله ولاتعمل

وارد الاسيوطي.zip

تم - شكرا جزيلا

 شكرا جزيلا  ا/ سليم حاصبيا

الكود  لايعمل يعطي رسالة  ولايعمل

برجاء تظليل رأٍس العمود وليس العمود بالكامل

ولكم جزيل الشكر

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

برجاء عمل كود يلون رؤس الاعمده فقط عند الوقوف علي اي خليه بها

بمعني عندما نكتب في عمود المرتبات يظلل كلمة مرتبات فء رأس العمود

لانني يحدث معي لبس في اختيار الاعمده لو كانت كثيره

ولكم جزيل الشكر

تظليل.zip

شكرا جزيلا 

جزاك الله خيرا

 sh.range("a4:f4").AutoFilter

استاذي الفاضل  اضفت هذا الكود ولكنه تظهر رسالة خطأ 1004

الارجاء تطبيقه من طرفكم علي الملف المرفق 

ولكم جزيل الشكر

في 11/17/2016 at 17:15, سليم حاصبيا said:

الكود المطلوب

Private Sub Workbook_BeforeClose(Cancel As Boolean)
  For Each sh In ThisWorkbook.Worksheets
        If sh.AutoFilterMode = False Then
             sh.range("a4").AutoFilter
         Else
                sh.ShowAllData
         End If
     Next
End Sub

 

هل من الممكن  عدم تحديد a4 بل جعله متاح مع جميع الاعمده التي في نطاق الفلتره

والرجاء التطبيق علي الملف المرفق

ولكم جزيا الشكر

استاذي العزيزسليم حاصبيا  بعد التحيه 

اعلم اني اثقل عليك  الكود الاخير يعمل بكفاءه عند التنقل بين الصفحات

ولكنه لايعمل عند غلق الملف  مع وجود الفلتره 

حيث اننا نغلق الملف ثم نفتحه ونجد الفلتره موجوده 

المراد ان يعمل الكود ايضا عند غلق الملف

ولكم جزيل الشكر

في 11/15/2016 at 08:51, طاهر محمد said:

استاذي العزيز سليم حاصبيا بعد التحيه 

قمت بتجربة الكود الجديد علي الملف المرفق اكثر من مره ولكنه لايعمل

فالرجاء تطبيقه من طرفكم علي الملف المرفق

ولكم جزيل الشكر

 

الرجاء التطبيق والتجربه علي الملف المرفق حيث ان الكود لايعمل

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

1- اقصد بالخروج من الفلتره هو اننا علي سبيل المثال من العملاء او الموردين نختار محمد او احمد .......وهكذا  وعندما نريد ان نخرج من حالة الفلتره نختار select all

فيظهر الجدول كما هو بدون فلتره

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

2- اقصد بتوسيع نطاق الكود هو اننا ممكن يتم الفلتره عن طريق التاريخ او عن  طريق اسم العميل وهكذا

والكود لايعمل الا اذا تمت الفلتره a4 فقط  المطلوب ان يعمل ايضا مع b4 . c4 . d4 .........وهكذا الي اخر نطاق في الجدول

استاذي العزيز سليم حاصبيا بعد التحيه 

في البدايه اشكر جهدك واهتمامك بالموضوع 

1- اخي العزيز  عند التحويل بين الشيتات يتم  الغاء الفلتره  تماما والمراد ان يتم الخروج منها وليس الغاؤها

2-  عند اغلاق الشيت وفتحه نجد ان الفلتلره كما هي  المراد (ان يعمل الكود عند التحول بين الصفحات  وكذلك عند الخروج من الشيت)

3- هل  من الممكن  ان يتسع نطاق الكود ليشمل جميع الاعمده في مدي الجدول وليس a4  فقط 

استاذي العزيز سليم حاصبيا بعد التحيه 

قمت بتجربة الكود علي الملف المرفق اكثر من مره ولكنه لايعمل

فالرجاء تطبيقه من طرفكم علي الملف المرفق

ولكم جزيل الشكر

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

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

بحيث انه عندما ننتقل الي صفحه اخري او نغلق الملف  يتم الغاء الفلتره بصوره اتوماتيكيه

ولكم جزيل الشكر

الموردن.zip

مطلوب كود لالغاء فلترة البيانات عندما  تكون الصفحه التي بها البيانات غير نشطه (اي مفتوح صفحه غيرها في نفس الشيت )

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

19 دقائق مضت, طلعت محمد حسن said:

السلام عليكم

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

اقبل تحياتي واحترامي

شكرا جزيلا اخي الكريم علي اهتمامك

متأسف اخي العزيز للسهو

باس ورد محرر الاكواد 

198100

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

الباسورد  123

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

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

1- اريد عند كتابة اي حرف في التكست الخاص باسم المورد 

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

مع ثبات جميع المعادلات التي في هذا العمل

2- الغاء الفلتره في ا ي صفحه بالشيت  عندما يكون فولام الادخال نشط

(لانه عندما تكون هناك فلتره للبيانات في صفحة الترحيل  ويتم الترحيل من الفورم تحدث مشكله بالبيانات )

موردين.zip