elzaem_yousif

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

السلام عليكم ور حمة الله وبركاته كل عام وانتم بخير وادام الله علينا وعليكم كل الخير والصحة اولا تحيه للعاملين على المنتدى وتعمنا منهم الكثر جعله الله فى ميزان حسناتكم جميعا اعضاء ومشرفين ثانيا تفاصيل المشكلة التى اواجهها كالتالى - اريد تصميم قاعدة بيانات بسيطة من خلال الاكسيس تخدم مجال عملى فى نطاق الخدمات اللوجستية ( شحن - تحميل - تفريغ - تخليص جمركى - الخ ) ، حيث تتعامل معنا نقدم خدماتنا الى الشركات بشكل مباشر او من خلال شركات وسيطة. بمعنى اكثر وضوحا وتبسيطا، توجد لدينا قائمة من العملاء وليكن عميل 1 وعميل 2 وعميل 3 وعميل 4 وعميل 5 وقائمة للشركات الوسيطة وسيط 1 ووسيط 2 ووسيط 3 ووسيط 4 ووسيط 5 اذا قام العميل وليكن ( عميل 1 ) بالتعامل معنا مباشرة يجب ان تصدر الفاتورة باسمه - واذا قام بالتعامل معنا من خلال شركة وسيطة يجب ان تصدر الفاتورة باسم الشركة الوسيطة والعميل الواحد ممكن يتعامل معنا مباشرة او من خلال وسطاء ، والوسيط الواحد ممكن يكون وسيط لاكثر من شركة ( علاقة متعدد الى متعدد ) انا عملت جدول للعملاء وجدول للوسطاء وجدول للربط بين العملاء والوسطا وجدول للخدمات وجدول للفواتير ثم صممت فورم للفاتورة المطلوب ان يظهر لى اختيار هل العميل لهذه الفاتورة (عميل مباشر او وسيط ) حتى لا تختلط الحسابات مع بعضها كيف اعمل كده ؟؟؟؟؟ ي مرفق ملف للتوضيح مع وافر الشكر والاحترام مقدما question.rar

مرفق ملف للعمل علية به 3 ورقات عمل الورقة الثانية والثالثة بها زر ملحق به ماكرو الكود المذكور المطلوب هو جعل هذا الماكرو يعمل فى نطاق الصفحة الموجود بها الزر فقط وليس كامل الملف وجميع ورقات العمل فما هو التعديل على الماكرو بحث يقتصر على الورقة النشطة فقط او الورقة التى ينفذ بها الماكرو Jan 2016.zip

زملائى الاعزاء والسادة الخبراء هذا الكود هو لاستبدال قيم معينة داخل جميع الشيت فى ملف الاكسيل الى قيم اخرى ، ولكن هذا الكود يعمل لجميع الشيتات داخل الملف المطلوب تحويلة ليكون داخل الصفحة الحالية فقط ارجو منكم التعديل المطلوب ليكون داخل الـ sheet الذى يتم فيه اجراء الماكرو فقط Sub Button1_Click() 'PURPOSE: Find & Replace a list of text/values throughout entire workbook 'SOURCE: www.TheSpreadsheetGuru.com/the-code-vault Dim sht As Worksheet Dim fndList As Variant Dim rplcList As Variant Dim x As Long fndList = Array("Absent ", "Trainer", "Trainer ", "Op_Training", "Op_Training ", "Peer_mentor", "Peer_mentor ", "Annual ", "Forced_Annu", "Forced_Annu ", "Avl_Annual", "Avl_Annual ", "Emergency ", "Sick ", "Planned_Sic", "Planned_Sic ", "Army", "Army ", "Planned_Arm", "Planned_Arm ", "Maternity", "Maternity ", "Bereavement", "Bereavement ") rplcList = Array("Absent", "HR", "HR", "HR", "HR", "HR", "HR", "Annual", "Annual", "Annual", "Annual", "Annual", "Emergency", "Sick", "Sick", "Sick", "Other", "Other", "Other", "Other", "Other", "Other", "Other", "Other") 'Loop through each item in Array lists For x = LBound(fndList) To UBound(fndList) 'Loop through each worksheet in ActiveWorkbook For Each sht In ActiveWorkbook.Worksheets sht.Cells.Replace What:=fndList(x), Replacement:=rplcList(x), _ LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _ SearchFormat:=False, ReplaceFormat:=False Next sht Next x MsgBox "Replacemnt Done Sucssefully", 0, "Mohamed Youssef 11674" End Sub

للرفع يا اصدقائى هل العرض للموضوع جيد ولا عرض غير جيد وغير واضح هل نظريا الحل ممكن بس مثلا صعب شويه ؟؟؟ ولا هو مستحيل وغير ممكن الخبراء افيدونا بالله عليكم وشكرا مقدما

للرفع

للرفع

مشكور اخى الكريم ياسر على مرورك وتوضيحك الكريم واعتذر عن قصورى فى ايصال ما هو مطلوب وهنا اعيد صياغة الموضوع مره اخرى الملف المرفق بيه ورقتي عمل الورقة الاولى اسمها Team Attendance وفيها اسماء الموظفين وارقامهم ورصيد الاجازات فى بداية التعيين وتاريخ التعيين ثم حالة الموظف فى كل يوم من اول يوم تعيين حتى تاريخه ( ويتم تحديثها باستمرار كل اسبوع ) وهى اما شيفت عمل طبيعى يمثل عنه ساعات العمل مثال 0900-1800 او هو حالة اخرى مثلا اجازة عادية يكون كودها Avl_Annual او اجازة مرضية يكون كودها Sick . المطلوب هو اولا : اعادة فلترة و ترتيب هذا البيانات فى الشيت رقم 2 واسمه Sheet1 على النحو التالى عند اختيار موظف لعرض بياناته يتم ادخال رقم الموظف فى هذا الشيت فى الخلية رقم B1 واختيار الشهر المطلوب عرض بياناته فى الخلية F2 ( الخلايا باللون الاخضر ) يتم تلخيص بيانات هذا الموظف خلال هذا الشهر على الترتيب الاتى يوجد بهذا الشيت خمسة جداول هي على الترتيب الجدول الاول Annual Vacations يتم فيه ترتيب الاكواد الخاصة بالاجازات السنوية وهى على سبيل الحصر ( Avl_Annual او Annual او Forced_Annu ) الجدول الثانى Emergency Leaves يتم فيه ترتيب الاكواد الخاصة بالاجازات العارضة وهى على سبيل الحصر ( Emergency) الجدول الثالث Sick Leaves يتم فيه ترتيب الاكواد الخاصة بالاجازات المرضية وهى على سبيل الحصر ( Sick او Planned_Sic ) الجدول الرابع HR يتم فيه ترتيب الاكواد الخاصة بالمهام الادارية وهى على سبيل الحصر ( Trainer او Op_Training او Peer_mentor ) الجدول الخامس Other Vacations يتم فيه ترتيب الاكواد الخاصة بالاجازات الاخرى بخلاف ما سبق وهى على سبيل الحصر ( Army او Planned_Arm او Maternity او Bereavement ) بحث مثلا لو كان الموظف فى يوم 1 فى الشهر المختار Forced_Annu يتم وضع الكود فى الجدول الاول واليوم فى الخلية المقابلة له ولو فى يوم 2 فى الشهر المختار كان الموظف Op_Training يتم وضع الكود فى الجدول الخاص هو جدول رقم 4 واليوم الموافق فى الخلية المقابلة وهكذا الخ الخ الخلايا باللون الاصفر ( هل يتم عمل دالة مثل الـ VLOOKUP مثلا ؟؟ اعذرونى لجلهلى ) ثانيا حساب رصيد الاجازات الباقى لهذا الموظف فى بدايه الشهر المختار مثلا لم تم اختيار شهر يوليو يتم حساب رصيد الاجازات الباقية للموظف فى اول يوليو فى الخلية L1 ( باللون الاصفر ) بناء على المعادلة التالية ( الرصيد السنوى المتاح للموظف عند التعيين - ما تم استهلاكة حتى اول يوليو ) علما بان الرصيد السنوى المتاح هو موجود فى الشيت الاول Team Attendance فى العمود H ما تم استهلاكه هو الاكواد بالجدولين الاول والثاني ( Avl_Annual او Annual او Forced_Annu او Emergency ) يقوم الاكسيل بعد هذه الاكواد من بداية السنه الحالية حتى الشهر المختار وطرحها من الرصيد السنوى المتاح فلو مثلا الرصيد السنوى المتاح للموظف عند التعيين 21 يوم اجازة وتم خلال 1 يناير حتى 30 يونيو ( حتى الشهر الذى تم اختيارة وهو شهر يوليو ) استهلاك 10 ايام متنوعة الاكواد سابقة الذكر اذا الرصيد الباقى للاستهلاك هو 21 - 10 = 11 يوم ارجو ان يكون عرضى دقيق وواضح وانا تحت امركم فى اي سؤال مع وافر وجزيل الشكر مقدما على دعمكم المستمر لنا وجعله الله فى ميزان حسناتكم BALANSE ATTENT.zip

السلام عليكم عندى شيت اكسيل فيه جداول حضور الموظفين يتم استخراجه من برنامج يقوم بعمل الجداول بشكل عشوائى كل اسبوع اقوم بنسخها فى الاكسيل وهى اما كود شيف للحضور مثال 0800-1700 0700-1600 1500-0000 او كود اخر لو الموظف مثلا اجازة او مثلا فى تدريب او مثلا فى استدعاء للجيش الخ الخ ومثال الاكود Avl_Annual Maternity Op_Training Annual Army والمطلوب هو عند اختيار كود الموظف فى الشيت رقم 2 والشهر المطلوب يقوم الاكسل بفصل الاكواد الخاصة فى جداول حسب الملف المرفق بالترتيب ومن ثم حساب الرصيد المستهلك والرصيد الباقى لهذا الموظف فى هذا الشهر Attend.zip

تم تحميل الملف مع الشكر والتقدير بارك الله فيك يا اخى العزيز جارى التحميل والعمل على الملف واخطارك بالنتيجة ان شاء الله سؤال هل من الممكن اضافة كود فى نفس الصفحة لحذف الصفوف الفارغة فى حيز البيانات ( حتى لو احتوت على معادلة فقط ) .؟

عزيزى ياسر خليل أبو البراء ارجو اعادة ارسال الملف بطريقة اخرى حيث ان الموقع لا يعمل معى

الاستاذة الافاضل بكل حب وتقدير اتقدم بسؤالى لحضراتكم بعد ما دوخت على طريقة عملية لحله وللاسف فشلت ، وارجو من الله ان يكون الحل موجود بينكم انا استخرج تقرير من برنامج واقوم بنسخة الى الاكسل وبناء معادلات لاستخراج تقارير تحليلة لهذا التقرير ، وهذا التقرير يضيف فواصل صفحات تلقائية لا ارغب بها وهى ثابتة لا تتغير ، اريد من الاكسل ان يبحث فى العمود ( J ) اذا وجد خلية تحتوى على اى جزء من ( __________ ) لاحظ لا يشترط ان تكون القيمة مطابقة وانما لو فقط تحتوى على اى جزء من النص السابق - وهى فواصل الصفحات من البرنامج سابق الذكر - يقوم بحذف الاتى 1- الصف السابق للصف الموجود فى الخلية ( j ) اى جزء من ( __________ ) ، يعنى الصف العلوى لهذا الصف 2- الصف نفسة الذى يوجد به فى الخلية ( J ) اى جزء من النص ( __________ ) 3- عدد 16 صف التالى للصف نفسة الذى يوجد به فى الخلية ( J ) اى جزء من النص ( __________ ) ولكم منى جزيل الشكر والتقدير جعله الله علمكم خالصا فى ميزان حسانتكم يوم الحساب محاسب محمد يوسف مدير مالى tardy.rar

بسم الله الرحمن الرحيم وبه استعين مشكلتى فى الملف المرفق هى الاتى الجدول الاول ( اليمين ) به كميات الاسمنت المشتراه وسعرها والدور المخصصة له ( ارضى - بدروم - قواعد مسلحة - دور اول ... وهكذا ) الجدول الثانى ( اليسار ) مطلوب جمع الكميات المخصصة لكل دور على حده والاسعار التى تم الشراء بها بمعنى اذا فى الجدول الاول تم اجمالى ما تم شراءة وتخصيصة للدور الاول 5655 طن واجمالى سعر الشراء 3565000 الف جنيه يتم نقل هذه البيانات للجدول الثانى امام الدور الاول وشكرا 101.rar