عمل بحث للموظفين بواسطة اسم فرع محدد وشهر محدد وذلك من شيتين للموظفين خلال كل شهر

[محمد ممتاز]

السلام عليكم 

الرجاء من الخبراء فى المنتدى العظيم 

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

فى شهر يناير مثلا .

 

وللتوضيح اكثر مرفق الملف ومرفق المطلوب .

شيت الرواتب تجريبي.rarشيت الرواتب تجريبي.rarشيت الرواتب تجريبي.rarبرنامج-مرتبات.rar

[ابو عبدالبارى]

الأخ الكريمmohamedmomtaz

السلام عليكم

يرجى الطلاع على تعليمات المنتدى بتغيير الأسم الى اللعة العربية

جرب المرفق التالى لعلة يفى بالغرض ونسألكم الدعاء

abo_abary_شيت الرواتب تجريبي.rar

[محمد ممتاز]

9 ساعات مضت, ابو عبدالبارى said:

الأخ الكريمmohamedmomtaz

السلام عليكم

يرجى الطلاع على تعليمات المنتدى بتغيير الأسم الى اللعة العربية

جرب المرفق التالى لعلة يفى بالغرض ونسألكم الدعاء

abo_abary_شيت الرواتب تجريبي.rar

شكرا لكى اخى ابوعبد الباري 

 

اولا لقد قمت بتغيير الاسم للعربية .

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

وانا محتاج البحث يكون فى كل الصفحات الرئيسية او البحث التفصيلي باسم الموظف يكون بمجرد كتابة جزء من اسم الموظف يظهر لى الاسم 

او بمجرد كتابة اخر 4 ارقام فى الاقامة يظهر رقم الاقامة وكذلك المسلسل عند كتابة رقم مسلسل العامل يظهر لى كل بيانات العامل .

 

 

واشكرك اخى العزيز على تقديرك وردك وتعبك فى انجاز المطلوب .

[محمد ممتاز]

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

 

اولا نشكر القائمين على هذا المنتدى العظيم لما استفدناة من خبرات الاساتذة الافاضل فى مجال عملى .

 

 

المطلوب عمل تقرير باسم كل فرع خلال شهر معين لرواتب الموظفين خلال شهر محدد حيث ان رواتب الشركة مقسمة على شيتين وعمال الفروع موزعة على الشيتين 

 

حيث يوجد شيت البحث باسم الفرع المطلوب فية عمل ربط فى القائمة المنسدلة للفروع والشهور بحيث عند اختيار اسم الفرع وتحديد شهر معين يجلب لى جميع بيانات الموظفين 

فى شيت الشركة والمؤسسة خلال هذا الشهر .

 

اسم الدخول للملف    محمد

كلمة المرور    /123  

برنامج-مرتبات تجريب.rar

تم تعديل أكتوبر 1, 2016 بواسطه محمد ممتاز
اضافة المرفقات

[احمدزمان]

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

تم عمل الكود التالي

Sub aHMDzMN()
Dim FS As Worksheet, TS As Worksheet
Dim SH, Q1, Q2, Q3, TR, ER, FR
Set TS = Sheets(ActiveSheet.Name)
Q1 = TS.Range("E1").Text 'ÔåÑ ÔÑßÉ
Q2 = TS.Range("E2").Text 'ÔåÑ ãÄÓÓÉ
Q3 = TS.Range("D1").Text 'ÇáÝÑÚ
For SH = 1 To Sheets.Count
If Sheets(SH).Name = Q1 Or Sheets(SH).Name = Q2 Then
Set FS = Sheets(Sheets(SH).Name)
TR = TS.Range("C5555").End(xlUp).Row + 1
ER = FS.UsedRange.Rows.Count
For FR = 4 To ER
If FS.Cells(FR, 18) = Q3 Then
For C = 2 To 18
TS.Cells(TR, C) = FS.Cells(FR, C)
Next C
TR = TR + 1
End If
Next FR
End If
Next SH

End Sub

اضغط زر البحث

جرب المرفق

وقول يارب

 

برنامج-مرتبات تجريب.rar

[محمد ممتاز]

باراك الله فيك استاذ https://www.officena.net/ib/profile/18051-احمدزمان/ 

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

 الحل ماظبط  مع كل الفروع ياريت لو فية طريقة اخري للبحث والفلترة للموظفين حسب كل فرع في شيت الشركة والمؤسسة .

[omar elhosseini]

 

الاخ محمد ممتاز

ربما يمكن لأحد الاخوة مساعدتك اذا قمت بالاتي

التخلص من المسافات المزدجة بين الاسماء

او المسافات التي في بداية الاسم او نهايته

وايضا ينطبق ذلك علي اسماء الاوراق

علي سبيل المثال لا الحصر فيوجد الكثير جدا

في الورقة المسماة

يناير الشركة

في الخليه

D29

يوجد الاسم

محمد  انور محمد 

توجد مسافة مزدوجة بين محمد و انور

و توجد مسافة زائده في نهاية الاسم

هذا علي سبيل المثال لا الحصر

ملحوظة

يجب التعديل علي اصل الملف الام الذي يستمد منه ملفك هذه الاسماء

 

[محمد ممتاز]

 

السلام عليكم 

 

تحية طيبة لكل الاساتذة الافاضل 

عمر الحسيني *** أبو تامر   

          

احمدزمان

تم تعديل الملف وحزف المسافات بين الاسماء 

المطلوب 

1- فى شيت البحث باسم الفرع المطلوب عند تحديد الفرع وليكن الفرع الرئيسي وتحديد شهر يناير يجلب لى فى اسفل الجدول كل الموظفين الذين يعملون فى نفس الفرع فى شيت الشركة والمؤسسة خلال شهر يناير .   2- ان امكن فى شيت الصفحة الرئيسية  البحث فى اسفل الجدول برقم الاقامة او الاسم او رقم المسلسل وخلية الشهر جعلها قائمة منسدلة احدد منها الشهر الذى اريد ان ابحث فية عن رقم الاقامة او الاسم او رقم المسلسل   اسم الدخول / محمد  كلمة المرور  / 123

برنامج-مرتبات تجريب.rar

[omar elhosseini]

 

الاخ محمد ممتاز

تم تنفيذ الطلب الاول (  الورقة الرئيسية )

وايضا م تنفيذ الطلب الثاني ( البحث باسم الفرع )

لعل وعسي اخد الاخوة يعمل علي الطلب الثالث ( البحث برقم الاقامة )

 

شاهد المرفق

 

 

Omar_1.rar

 

 

[احمدزمان]

7 ساعات مضت, عمر الحسيني *** أبو تامر said:

 

الاخ محمد ممتاز

تم تنفيذ الطلب الاول (  الورقة الرئيسية )

وايضا م تنفيذ الطلب الثاني ( البحث باسم الفرع )

لعل وعسي اخد الاخوة يعمل علي الطلب الثالث ( البحث برقم الاقامة )

 

شاهد المرفق

 

 

Omar_1.rar

 

 

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

استاذنا الكبير بعلمه و مكانته ابو تامر حفظه الله ورعاه

تشرفت كثيرا بمروركم الكريم جزاكم الله خيرا

فلقد تعلمت على يديكم الكثير و لا انسى فضلكم

بارك الله فيكم

 

[محمد ممتاز]

9 ساعات مضت, عمر الحسيني *** أبو تامر said:

 

الاخ محمد ممتاز

تم تنفيذ الطلب الاول (  الورقة الرئيسية )

وايضا م تنفيذ الطلب الثاني ( البحث باسم الفرع )

لعل وعسي اخد الاخوة يعمل علي الطلب الثالث ( البحث برقم الاقامة )

 

شاهد المرفق

 

 

Omar_1.rar

 

 

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

 

اخى الفاضل الاستاذ 

عمر الحسيني *** أبو تامر

 

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

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

واشكرك مرة اخرى وجعل ذلك فى ميزان حسناتك .

 

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

فى ذلك فبحاول اجنهد فى ذلك وابحث فى هذا المنتدى العظيم .

 

والشكر موصول للاستاذ  

احمدزمان

 

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

 

 

[omar elhosseini]

 

الاخ المحترم  احمدزمان

لاتقل هذا فأنت استاذ قدير محترم

ولك اعمال قيمة كثيرة

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

 

 

الاخ محمد ممتاز

شكرا لك اخي نحن في الخدمة

سأحاول ضبط الصفحة الرئيسية لك

 

 

 

[محمد ممتاز]

الله يبارك استاذنا القدير  

عمر الحسيني *** أبو تامر

وشكرا لمجهودك ولوقتك الثمين الذي تبذلة فى سبيل خدمتى 

وجعل كل ذلك فى ميزان حسناتك واسأل الله ان يبارك فيك وفى علمك الوفير

 

حزفت كل الارتباطات التشعبية ومازالت الهزة موجودة فى الشاشة عند البحث لو كان ملهاش حل عادى اتحملها  

 

 

تم تعديل أكتوبر 4, 2016 بواسطه محمد ممتاز

[omar elhosseini]

 

الاخ محمد ممتاز

شاهد المرفق

Omar_2.rar

 

 

[محمد ممتاز]

عمر الحسيني *** أبو تامر

ماشاء الله عليك شغل ممتاز وحاجة احترافية جداااا

 

 

1- بس ينقص التنسيق حاجة بسيطة وهي عند اضافة شيت اخر للملف احتاج انة يظهر اسم الشيت تلقائي فى القائمة ويختفى من علامة التبويب 

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

 

مثال :- 

اخترت مثلا الفرع الرئيسي فى شهر يناير وكان عدد الموظفين 30 موظف 

عند التغير واختيار الفرع الثاني فى شهر يناير وكان عدد موظفى الفرع 20 موظف تبحث الدالة تمام على 20 موظف بس يتبقى 10 موظفين من الفرع الرئيسي فى اخر الشيت

 

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

 

[omar elhosseini]

 

الاخ محمد ممتاز

شاهد المرفق

 

Omar_3.rar

 

اما طلبك الاول لم افهم ماذا تقصد

 

[محمد ممتاز]

 

استاذى الفاضل 

عمر الحسيني *** أبو تامر

اقصد فى حالة حبيت ازود شيت للملف مثلا شيت باسماء المسافرين  يظهر تلقائي فى قائمة الشيتات المحددة فى الفورم  

 

ولو امكن زر لاخفاء الشيتات بحيث يظهر لى الشيت الذى اشتغل علية فقط مثلا انا شغال فى رواتب شهر اكتوبر شركة ومؤسسة يكون ظاهر لى فقط 

شيتات شهر اكتوبر شركة ومؤسسة وباقى الشيتات مخفية 

 

 

السلام عليكم 

عمر الحسيني *** أبو تامر

والله ماعارف اشكرك ازاى روعة وهذا هو المطلوب بالظبط 

وربنا يبارك فيك