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

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

قام بنشر (معدل)

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

ويكون اضافة التسلسل اوتوماتيكي وليس يدويا... وعند حذف حقل من الفورم يقوم بارسال القيد المحذوف الى صفحة المحذوفات في الفورم.. واعادة ضبط التسلسل بعد الحذف

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

منظومة-الشؤون-الادارية.xlsm

تم تعديل بواسطه Abaas
قام بنشر (معدل)

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

23 ساعات مضت, Abaas said:

ويكون اضافة التسلسل اوتوماتيكي وليس يدويا... وعند حذف حقل من الفورم يقوم بارسال القيد المحذوف الى صفحة المحذوفات في الفورم.. واعادة ضبط التسلسل بعد الحذف

وكذلك اضافة عمود صورة الموظف تكون في فولدر نفس مسار المصنف ويحتوي على فولدرات باسم كل موظف تحتوي على ملفات مرفقة صور او pdf وتظهر الصورة لكل موظف في الفورم عند اختياره .

عمود التسلسل - عمود وضع الصورة -شكل أسماء الفولدرات هل هي موجودة ام يتم إنشائها -عمود الموظف -اظافة ورقة المحذوفات- هل سيتم عرض جميع الأعمدة على الليست بوكس أو أعمدة معينة !!!! 

هده تفاصيل يجب توضيحها ضمن الملف الخاص بك  بشكل دقيق لا يمكننا الإشتغال على التخمين فقط 

تم تعديل بواسطه محمد هشام.
  • Like 1
قام بنشر

بعد اذن استاذنا المتألق دائما / محمد هشام.

تم اضافة المسلسل تلقائى
وتم تسجيل تاريخ ووقت التعديل واسم المستخدم تلقائيًا عند تعديل أي سجل في جدول البيانات الخاص بك.  فى العمود 8 والعمود 9

منظومة-الشؤون-الادارية - Copy.xlsm

  • Like 1
قام بنشر

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

تعديل فورم.rar

  • Like 1
قام بنشر

إتفاديا للتعديل  أخي @Abaas يرجى ارفاق نفس الملف به مثال لشكل البيانات لديك على الملف الاصلي من النطاق A:U  مع توضيح هل سيتم عرض جميع الأعمدة على الليست بوكس  أي 21 عمود أو سيتم إظهار أعمدة معينة فقط  لنتمكن من تحديد عرض الأعمدة  و عدد Textbox  المطلوب إظافتها بشكل دقيق 

 

  • Thanks 1
قام بنشر

كل الشكر للاخ محمد هشام تم تعديل الملف .. ويكون ظهور جميع الاعمدةفي الفورم مع مراعاه العمود J الاسم الكامل فيه معادلة توحيد اسم .. مع شكري وتقديري للجميع

تعديل فورم2.rar

قام بنشر
في 4‏/4‏/2025 at 03:35, mahmoud nasr alhasany said:

بعد اذن استاذنا المتألق دائما / محمد هشام.

تم اضافة المسلسل تلقائى
وتم تسجيل تاريخ ووقت التعديل واسم المستخدم تلقائيًا عند تعديل أي سجل في جدول البيانات الخاص بك.  فى العمود 8 والعمود 9

منظومة-الشؤون-الادارية - Copy.xlsm 96.7 kB · 10 downloads

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

قام بنشر (معدل)

تفضل جرب هذا

ورجاء ادخال مسارات الصورة فى العمود 10 فى شيت DbSheet   او من خلال تحديد الاسم فى السجل داخل الليست بوكس   وادخال الصورة المدرجة الخاصة بالموظف

 

 

منظومة-الشؤون-الادارية - Copy - Copy.xlsm

تم تعديل بواسطه mahmoud nasr alhasany
  • Like 2
قام بنشر (معدل)

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

2.jpg

1.jpg

تم تعديل بواسطه mohanad2025
قام بنشر
في 5‏/4‏/2025 at 07:36, Abaas said:

كل الشكر للاخ محمد هشام تم تعديل الملف .. ويكون ظهور جميع الاعمدةفي الفورم مع مراعاه العمود J الاسم الكامل فيه معادل

اسف اخي على التأخير في الرد كنت في إجازة إن شاء الله سوف أحاول تعديل  الملف وإعادة رفعه عن قريب بإدن الله 

  • Thanks 1
قام بنشر
4 ساعات مضت, alhellal hamd said:

كلمة السر والمرور

admin

1989

قام بنشر (معدل)

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

أعتذر على التأخير في الرد فقد كنت في إجازة كما ذكرت سابقا 😃

بعد محاولتي المتواضعة لتعديل الملف  أتمنى أن أكون قد وفقت في فهم طلبك وتنفيذه بالشكل المطلوب

أعتذر أيضا على الإطالة لكن كان من الضروري توضيح بعض النقاط المهمة التي تم إدراجها في الملف حتى تتمكن من التعامل معه بسلاسة وتعديله لاحقا بما يتناسب مع احتياجاتك

 

1) بناء على طلبك تم تعديل طريقة جلب البيانات بحيث تعتمد الآن على نطاق A:U، وتم حذف الجدول السابق كما تم عرض جميع الأعمدة على ListBox التي تحتوي على 21 عمود

 Set WsRng = WS.Range("A2:U" & WS.Cells(WS.Rows.Count, 2).End(xlUp).row)

2) بما أنك طلبت إضافة اسم المستخدم وتاريخ التعديل أو الحذف لغرض المتابعة فهذا يعني أن الملف سيستخدم من قبل أكثر من مستخدم
لذلك تم تعديل شاشة تسجيل الدخول الخاصة بالمستخدمين  لتتناسب مع دالك عبر إنشاء ورقة جديدة باسم "Users" والتي ستكون مرئية فقط لمسؤول النظام (Admin)
من خلالها يمكنك تحديد أسماء المستخدمين وكلمات المرور الخاصة بهم بما يتناسب مع احتياجاتك

بعد كل عملية دخول سيتم إظافة إسم المستخدم ووقت الدخول في نفس الورقة على الأعمدة J:K 

 

Screenshot04-14-202519_04_14.png.4b54ff2578ae88d1e00003c57adf3794.png

 

3) تمت إضافة ورقة خاصة لتتبع جميع التعديلات التي تطرأ على الملف بحيث توضح:

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

246662231_.PNG.610efaea1cfedd9240ba1b7e00544705.PNG 

4) تمت إضافة ورقة خاصة بالمحذوفات وذلك استجابة لطلبك بالاحتفاظ بجميع البيانات التي يتم حذفها

تحتوي هذه الورقة على معلومات تفصيلية تشمل: البيانات المحذوفة / اسم المستخدم الذي قام بالحذف / وتاريخ العملية

 

تجدر الإشارة إلى أن كل من: ورقة التعديلات / ورقة المحذوفات /  بطاقة الموظف

ستكون مخفية عن المستخدمين العاديين ولن تكون مرئية إلا لمسؤول النظام (Admin) فقط وذلك لضمان سرية البيانات وحمايتها من التعديل أو الحذف غير المصرح به

 نظرا أن نطاق البيانات كبير يمكنك فتح  (UserForm) عبر الضغط مرتين على أي خلية في الصف الأول 

Screenshot04-14-202519_01_50.png.c7920e82d46dcd517ff623a20059bb19.png

6) إمكانية إضافة صورة الموظف من أي مكان على الجهاز حسب اختيارك دون التقيد بمسار محدد  الصيغ المسموح بها: JPG- JPEG- PNG- BMP- GIF  

7) ترحيل بيانات الموظف مع ضمان عدم تكرار الرقم الوطني:

في حال وجود رقم وطني مكرر  يتم تنبيه المستخدم 

عند نجاح الترحيل  تضاف البيانات ويتم تسطيرها تلقائيا وإظافة التسلسل على عمود A كما طلبت 

يتم إنشاء مجلد رئيسي باسم "المرفقات" (في حال لم يكن موجودا) وبداخله مجلد فرعي يحمل الرقم الوطني للموظف وتحفظ الصورة داخله (في حال تم اختيار صورة) 

وقد تم تنفيد نفس الفكرة بالنسبة لملفات PDF

Screenshot04-15-202500_19_16.png.828838c766e703552fb395cd624ef442.png

😎 عند تعديل بيانات الموظف:

يتم تحديث البيانات (بما في ذلك الصورة إذا تم تغييرها)

يتم ترحيل البيانات السابقة والجديدة إلى ورقة التعديلات لتوثيق التغييرات 

9) حذف بيانات الموظف:

يتم حذف كافة بياناته من قاعدة البيانات 

كما يتم حذف المرفقات الخاصة به (سواء كانت صورا أو ملفات PDF) من المجلد الخاص به داخل "المرفقات"

تحديث التسلسل 

10) معاينة المرفقات بسهولة:

يمكنك معاينة صورة الموظف مباشرة من ListBox بالنقر المزدوج (Double Click) إذا كانت الصورة مضافة مسبقا 

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

Screenshot04-14-202519_36_58.png.6c0d7933884ed9f7b961afabbaa96272.png

 

Screenshot04-14-202520_30_55.png.64c5699135863815dc0030da53f3cc28.png

 

11) حفظ تقرير PDF لبطاقة الموظف عند تحديده من قائمة الموظفين (ListBox)

يتم إنشاء التقرير بصيغة PDF بمجرد تحديد الموظف من داخل LISTBOX  (بناءا على الرقم الوطني)  عمود E  ويحفظ داخل مجلد خاص بإسم الموظف

 تم إظافة يوزرفورم جديد يمكنك من عرض ملفات PDF من خلاله 

التقرير يحتوي على جميع بيانات الموظف من العمود إلى العمود U بطريقة منظمة وجاهزة للطباعة أو الحفظ ( يمكنك تعديله بما يناسبك)
 

Screenshot04-14-202519_40_40.png.908de0d0b1d95090e0185f32eb6da5f3.png

Screenshot04-15-202500_28_16.png.b64fcb06d60770dc544cd4f501db3766.png

12) حذف تلقائي لمرفقات الموظف عند حذف بياناته:

في حال تم حذف الموظف من النظام يتم أيضا حذف بطاقة الموظف (PDF) الخاصة به تلقائيا إلى جانب المرفقات (الصورة أو ملفات أخرى)

13) تم تعويض معادلة دمج إسم الموظف الكامل بالأكواد مع تحديثها تلقائيا عند التعديل

بالتوفيق............

للتجربة قم بنسخ المجلدات (تقارير الموظفين pdf + المرفقات ) بعد فك الظغط إلى نفس مسار المصنف 

Screenshot04-15-202502_14_06.png.96cc2fa5b720699900c175e9ee30889d.png

 

 

وفي حال وجود أي استفسار- تعديل إضافي أو ملاحظات -  سنكون  دائما سعداء للمساعدة والتوضيح🌿

"لا تنسونا من صالح دعائكم   –   [أخوك في الله محمد هشام]

 

 

 

 

قاعدة بيانات الموظفين .xlsm بيانات الموظفين v2.rar

تم تعديل بواسطه محمد هشام.
  • Like 3
قام بنشر
5 ساعات مضت, محمد هشام. said:

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

أعتذر على التأخير في الرد فقد كنت في إجازة كما ذكرت سابقا 😃

بعد محاولتي المتواضعة لتعديل الملف  أتمنى أن أكون قد وفقت في فهم طلبك وتنفيذه بالشكل المطلوب

أعتذر أيضا على الإطالة لكن كان من الضروري توضيح بعض النقاط المهمة التي تم إدراجها في الملف حتى تتمكن من التعامل معه بسلاسة وتعديله لاحقا بما يتناسب مع احتياجاتك

 

1) بناء على طلبك تم تعديل طريقة جلب البيانات بحيث تعتمد الآن على نطاق A:U، وتم حذف الجدول السابق كما تم عرض جميع الأعمدة على ListBox التي تحتوي على 21 عمود

 Set WsRng = WS.Range("A2:U" & WS.Cells(WS.Rows.Count, 2).End(xlUp).row)

2) بما أنك طلبت إضافة اسم المستخدم وتاريخ التعديل أو الحذف لغرض المتابعة فهذا يعني أن الملف سيستخدم من قبل أكثر من مستخدم
لذلك تم تعديل شاشة تسجيل الدخول الخاصة بالمستخدمين  لتتناسب مع دالك عبر إنشاء ورقة جديدة باسم "Users" والتي ستكون مرئية فقط لمسؤول النظام (Admin)
من خلالها يمكنك تحديد أسماء المستخدمين وكلمات المرور الخاصة بهم بما يتناسب مع احتياجاتك

بعد كل عملية دخول سيتم إظافة إسم المستخدم ووقت الدخول في نفس الورقة على الأعمدة J:K 

 

Screenshot04-14-202519_04_14.png.4b54ff2578ae88d1e00003c57adf3794.png

 

3) تمت إضافة ورقة خاصة لتتبع جميع التعديلات التي تطرأ على الملف بحيث توضح:

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

246662231_.PNG.610efaea1cfedd9240ba1b7e00544705.PNG 

4) تمت إضافة ورقة خاصة بالمحذوفات وذلك استجابة لطلبك بالاحتفاظ بجميع البيانات التي يتم حذفها

تحتوي هذه الورقة على معلومات تفصيلية تشمل: البيانات المحذوفة / اسم المستخدم الذي قام بالحذف / وتاريخ العملية

 

تجدر الإشارة إلى أن كل من: ورقة التعديلات / ورقة المحذوفات /  بطاقة الموظف

ستكون مخفية عن المستخدمين العاديين ولن تكون مرئية إلا لمسؤول النظام (Admin) فقط وذلك لضمان سرية البيانات وحمايتها من التعديل أو الحذف غير المصرح به

 نظرا أن نطاق البيانات كبير يمكنك فتح  (UserForm) عبر الضغط مرتين على أي خلية في الصف الأول 

Screenshot04-14-202519_01_50.png.c7920e82d46dcd517ff623a20059bb19.png

6) إمكانية إضافة صورة الموظف من أي مكان على الجهاز حسب اختيارك دون التقيد بمسار محدد  الصيغ المسموح بها: JPG- JPEG- PNG- BMP- GIF  

7) ترحيل بيانات الموظف مع ضمان عدم تكرار الرقم الوطني:

في حال وجود رقم وطني مكرر  يتم تنبيه المستخدم 

عند نجاح الترحيل  تضاف البيانات ويتم تسطيرها تلقائيا وإظافة التسلسل على عمود A كما طلبت 

يتم إنشاء مجلد رئيسي باسم "المرفقات" (في حال لم يكن موجودا) وبداخله مجلد فرعي يحمل الرقم الوطني للموظف وتحفظ الصورة داخله (في حال تم اختيار صورة) 

وقد تم تنفيد نفس الفكرة بالنسبة لملفات PDF

Screenshot04-15-202500_19_16.png.828838c766e703552fb395cd624ef442.png

😎 عند تعديل بيانات الموظف:

يتم تحديث البيانات (بما في ذلك الصورة إذا تم تغييرها)

يتم ترحيل البيانات السابقة والجديدة إلى ورقة التعديلات لتوثيق التغييرات 

9) حذف بيانات الموظف:

يتم حذف كافة بياناته من قاعدة البيانات 

كما يتم حذف المرفقات الخاصة به (سواء كانت صورا أو ملفات PDF) من المجلد الخاص به داخل "المرفقات"

تحديث التسلسل 

10) معاينة المرفقات بسهولة:

يمكنك معاينة صورة الموظف مباشرة من ListBox بالنقر المزدوج (Double Click) إذا كانت الصورة مضافة مسبقا 

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

Screenshot04-14-202519_36_58.png.6c0d7933884ed9f7b961afabbaa96272.png

 

Screenshot04-14-202520_30_55.png.64c5699135863815dc0030da53f3cc28.png

 

11) حفظ تقرير PDF لبطاقة الموظف عند تحديده من قائمة الموظفين (ListBox)

يتم إنشاء التقرير بصيغة PDF بمجرد تحديد الموظف من داخل LISTBOX  (بناءا على الرقم الوطني)  عمود E  ويحفظ داخل مجلد خاص بإسم الموظف

 تم إظافة يوزرفورم جديد يمكنك من عرض ملفات PDF من خلاله 

التقرير يحتوي على جميع بيانات الموظف من العمود إلى العمود U بطريقة منظمة وجاهزة للطباعة أو الحفظ ( يمكنك تعديله بما يناسبك)
 

Screenshot04-14-202519_40_40.png.908de0d0b1d95090e0185f32eb6da5f3.png

Screenshot04-15-202500_28_16.png.b64fcb06d60770dc544cd4f501db3766.png

12) حذف تلقائي لمرفقات الموظف عند حذف بياناته:

في حال تم حذف الموظف من النظام يتم أيضا حذف بطاقة الموظف (PDF) الخاصة به تلقائيا إلى جانب المرفقات (الصورة أو ملفات أخرى)

13) تم تعويض معادلة دمج إسم الموظف الكامل بالأكواد مع تحديثها تلقائيا عند التعديل

بالتوفيق............

للتجربة قم بنسخ المجلدات (تقارير الموظفين pdf + المرفقات ) بعد فك الظغط إلى نفس مسار المصنف 

Screenshot04-15-202502_14_06.png.96cc2fa5b720699900c175e9ee30889d.png

 

 

وفي حال وجود أي استفسار- تعديل إضافي أو ملاحظات -  سنكون  دائما سعداء للمساعدة والتوضيح🌿

"لا تنسونا من صالح دعائكم   –   [أخوك في الله محمد هشام]

 

 

 

 

قاعدة بيانات الموظفين .xlsm 979.19 kB · 2 downloads بيانات الموظفين v2.rar 870.14 kB · 2 downloads

ماشاء الله ا. محمد

جزاك الله كل خير على ما تقدمه من مساعدة للمنتدى العريق تسلم ايديك

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