اذهب الي المحتوي
أوفيسنا

فتح قائمة منسدلة بالضغط على زر


N_ELMASRY

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

الأخوة الأفاضل

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

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

فخطرت لى فكرة وضع زر فوق القائمة وعند الضغط عليه تظهر محتويات القائمة ونجح الأمر كما بالمثال المرفق ولكن ...

بعد الضغط على الزر تظهر محتويات القائمة ويختفى الزر خلف القائمه.

والمطلوب: أن يظل الزر فوق القائمه دائمًا بحيث لايظهر شكل القائمة المنسدله دومًا ..... فهل أجد فكرة تساعد فى انجاز هذا الامر ...

ولكم جزيل الشكر والتقدير

وهذا شرح لكيفة تنفيذ الفكره...

https://msdn.microsoft.com/en-us/library/office/ff836880.aspx

Test.rar

  • Like 1
رابط هذا التعليق
شارك

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

وللعلم فكرة الاستاذ حسام لم تعمل معى على اكسس 2016

Test.rar

  • Like 1
رابط هذا التعليق
شارك

17 ساعات مضت, husamwahab said:

تفضل اخي العزيز

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

Test1.rar

 

 

16 ساعات مضت, ابا جودى said:

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

وللعلم فكرة الاستاذ حسام لم تعمل معى على اكسس 2016

Test.rar

جزاكم الله خيرًا على سرعة الاستجابة وجارى التجربه ......

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

  • Like 2
رابط هذا التعليق
شارك

الأخوة الفاضل

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

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

وقد استفدت كثيرًا من الأفكار التى طرحتموها ..... وبعد محاولة تجربتها كلها خطرت لى فكرة والحمد لله نفذت ما كنت أرغب فيه وهى: 

أن جعلت قيمة ارتفاع القائمة يساوى صفر ووضعتها على الحد السفلى للزر 

كما بالمثال المرفق

وأكرر شكرى وتقديرى لأساتذتى الكرام 

 

TestFinal.rar

  • Like 1
رابط هذا التعليق
شارك

في 10/8/2016 at 08:36, N_ELMASRY said:

 

 

جزاكم الله خيرًا على سرعة الاستجابة وجارى التجربه ......

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

فكرة حلوة

ويمكن الاستمرار بان ياخذ الامر نص الاختيار عنوانا

Private Sub cmb_Committe_AfterUpdate()
btn_DropCommittee.Caption = cmb_Committe
End Sub

بالتوفيق

  • Like 3
رابط هذا التعليق
شارك

21 دقائق مضت, رمهان said:

فكرة حلوة

ويمكن الاستمرار بان ياخذ الامر نص الاختيار عنوانا


Private Sub cmb_Committe_AfterUpdate()
btn_DropCommittee.Caption = cmb_Committe
End Sub

بالتوفيق

ههههههههههههههه :clapping:
ربنا ما يحرمنا من لمساتك الرمهانية :wink2:
جزاكم الله خيرا :wub::fff:
دائما وابدا هناك لمسات رمهانية 
وادى المرفق الرمهانى  :dance1:

Test_2.rar

  • Like 2
رابط هذا التعليق
شارك

في 10/8/2016 at 21:45, husamwahab said:

فكرة جميلة جدا

مع بعض الاضافات تصبح قائمة حقيقية

احسنت

Test2.rar

جزاك الله خيرًا .... فكرة ممتازه بالفعل 

 

10 ساعات مضت, رمهان said:

فكرة حلوة

ويمكن الاستمرار بان ياخذ الامر نص الاختيار عنوانا


Private Sub cmb_Committe_AfterUpdate()
btn_DropCommittee.Caption = cmb_Committe
End Sub

بالتوفيق

بالفعل لمسات محترف

10 ساعات مضت, ابا جودى said:

ههههههههههههههه :clapping:
ربنا ما يحرمنا من لمساتك الرمهانية :wink2:
جزاكم الله خيرا :wub::fff:
دائما وابدا هناك لمسات رمهانية 
وادى المرفق الرمهانى  :dance1:

Test_2.rar

:rol:

الأخوة الأفاضل

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

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

لذا 

جزاكم الله خيرًا كثيرًا على حسن المساعدة والاهتمام واللمسات الفنيه التى نتعلمها منكم جميعًا

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

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

  • Like 1
رابط هذا التعليق
شارك

  • 1 month later...

بارك الله فيكم في هذا المثال كيف يمكنني اضافة جمل في القائمة حيث في هذا المثال ليس هناك جدول او مصدر للقائمة اتسأل كيف تم اضافة الجمل في القائمة 

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

في 10/9/2016 at 21:36, ابا جودى said:

ههههههههههههههه :clapping:
ربنا ما يحرمنا من لمساتك الرمهانية :wink2:
جزاكم الله خيرا :wub::fff:
دائما وابدا هناك لمسات رمهانية 
وادى المرفق الرمهانى  :dance1:

Test_2.rar

 

في 10/9/2016 at 21:12, رمهان said:

فكرة حلوة

ويمكن الاستمرار بان ياخذ الامر نص الاختيار عنوانا


Private Sub cmb_Committe_AfterUpdate()
btn_DropCommittee.Caption = cmb_Committe
End Sub

بالتوفيق

 

رابط هذا التعليق
شارك

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