شاشة دخول متعددة الوظائف

[احمد حمور-ابوعبدالله]

الاخوه الكرام

طلب مني في عملي ان اصمم شاشة دخول لملف اكسل

ولكن الطلب كان به شئ من الصعوبه بالنسبة لي

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

وكل مستخدم له باسوورد خاص ويوزر خاص

وطلب ايضا ان يتم اضافة امكانية التعديل والحذف واضافة مستخدم جديد ضمن نطاق السبع مستخدمين

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

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

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

الفورم يستوعب كما ذكرت الى سبع مستخدمين

وانا ادرجت اسم يوزر واحد وهو

اسم المستخدم AHMAD

كلمة المرور 1111

وايضا في حالة الاضافه او الحذف سيطلب باسوورد وهو 1234

وطبعا يمكنك تغيير اسم المستخدم وكلمة المرور من نفس الفورم

اما باسوورد الحذف والاضافة ستتضطر ان تغيره من محرر الاكواد

password.rar

[محمد يحياوي]

عمل رائع وفكرة جميلة

وابداع متميز

[عبدالله باقشير]

الاخ الفاضل / ابو عبدالله

و

[naderwatfa]

بسم الله ما شاء الله

ملفك رائع و مميز

الله ينور عليك و يبارك لك في دنياك و آخرتك

[خالد الشاعر]

استاذ ابو عبد الله

تسلم ايدك ملف رائع

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

و لو سمحت ممكن شرح بسيط للكود

و جعلة الله فى ميزان حسناتك

[الافصرى]

[حجم = "7"] ما اجملك ملف مفيد جدا وجزاك الله خيرا [حجم /]

[الافصرى]

اخى الكريم عند حزف احد المستخدمين وهو (احمد) يقوم البرنامج بعدم تفعيل المستخدم الاخر لماذا ارجو الرد

[احمد حمور-ابوعبدالله]

الاخ yahiaoui جزاك الله خيرا وبارك الله فيك

الاخ خبور خير جزاك الله خيرا وبارك الله فيك

الاخ نادر بارك الله فيك وجزاك الله خيرا

الاخ khhanna جزاك الله خيرا وبارك الله فيك

الاخ الافصري شكرا لك على ملاحظتك التي تداركتها في المرفق المرسل هنا

لانه بالفعل كانت المشكله عندي في اظهار واخفاء بعض الاوامر

والان الحمدلله الملف مضبوط

[احمد حمور-ابوعبدالله]

هذا هو الملف مع اضافة زر حفظ

password.rar

[الحسامي]

السلام عليكم

ما شاء الله عليك اخي احمد

كلمة حق : مبدع وصاحب افكار متميزة

وصاحب فكر عالي في التطبيق

زما نزال ننتظر منك المزيد

اخوك عماد الحسامي

[جلال محمد]

اخى ابو عبد الله

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

ولكن لي فكره

ما الهدف من وجود عدة مستخدمين طالما جميع المستخدمين جميعهم يدخلون علي الملف كاملا ؟؟

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

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

[محمدي عبد السميع]

السلام عليكم

ما شاء الله عليك اخي احمد

كلمة حق : مبدع وصاحب افكار متميزة

وصاحب فكر عالي في التطبيق

زما نزال ننتظر منك المزيد

اخوك عماد الحسامي

حقا افكار متميوة

[احمد حمور-ابوعبدالله]

اخي الحسامي اشكرك كل الشكر على كلماتك المحفزه الى كل ما هو افضل

جزاك الله خيرا وبارك الله فيك

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

ولكن زي مابقولو ( وحده وحده ) وان شاء الله سيتم المراد

اخي المحمدي بارك الله فيك وجزاك الله خيرا

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

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

ولكني هنا احتاج الى مساعده من اخوتي المبدعيين

الملف السابق تم به مراد العمل بالشكل الصحيح ولكن يعيبه شي بسيط

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

الكود الموجود في زر الامر الخاص بالحذف يعمل على حذف السطر بالكامل

وهذا بالشكل الطبيعي لا يهم ولكن في ملفي يهم لانني عندما وضعت اعتبار

سبع مستخدمين قد قمت بانشاء نطاق اسم dada من a2:a8 وتم وضع الاسم في row source الخاص بالكومبو بوكس

الا الان الامور تمام ولكن تبين لي انه عند استخدام زر الحذف فانه كل سطر يحذفه يتم تنقيصه تلقائيا من النطاق dada

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

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

ولهذا عدلت قليلا على الشاشه وذلك بالغاء option الخاص بالغاء مستخدم

واكتفيت بدلا منه ب option التعديل

password.rar

[أبو جديد]

ممتاز الله يعطيك العافية

عمل رائع تشكر علية

[Hazem Hady]

رائع جدا صديقي

قمت بتحميله

ساقوم بالتعديل عليه لاستخدامي الخاص

وابداء الملاحظات ان كانت

اشكرك علي هذا المثال كنت ابحث عنه فعلا

[الحسامي]

السلام عليكم

اخي احمد(ابو عبدالله ) العزيز

عند وضع البيانات عند استخدام ال ComboBox و الListBox

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

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

في هذه الادوات وعند مسح اي بند في الصفحة يتم مسحه في الادوات

يتم استخدام ما يسمى المدى الديناميكي

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

معادلات لذلك ومن اشهر هذه المعادلات هذه المعادلة وهي حسب برنامجك

=OFFSET(Sheet3!$A$2,0,0,COUNTA(Sheet3!$A$2:$A$50000),1)

وضعها بدل النطاق الذي استخدمته عند تسمية النطاق dada

=Sheet3!$A$2:$A$8

[احمد حمور-ابوعبدالله]

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

mr.zoOom thank you very much

------------------------------------------------------.

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

الاخ الحسامي شكرا لك جزيلا على حلك الرائع

ولو انني ضعيف جدا في دوال الاكسيل فلو اطمع منك ان تشرح لى السطر الذي اضفناه في النطاق dada

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

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

ما قصرت والله يا حسامي

[الحسامي]

السلام عليكم

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

وارجوا من احد اخواننا الخبراء في الدوال من شرحها

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

اما الطلب الثاني بسيط كل ما عليك وضع الكود التالي

في اخر سطر من اكواد كبسة " تاكيد الادخال "

ComboBox1.RowSource = "dada"

[احمد حمور-ابوعبدالله]

هذه المره الملف 100%

بفضل اخي الحسامي

اسم الدخول ------ الحسامي

كلمة السر ------- حلال المشاكل

باسوورد.rar

[الحسامي]

بفضل الله ومن ثم بفضل افكارك وابداعك اخي ابو عبدالله

[osamawhitewhale]

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

ملف راااااااائع جداً

كيف يمكنني اضافه شاشه الدخول هذه الي اي ملف عندي ؟؟

[محمد مصطفى ابو حمزة]

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

[احمد حمور-ابوعبدالله]

اخي اسامه

بارك الله فيك وجزاك الله خيرا

اخي goudzy

بارك الله فيك وجزاك الله خيرا