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

كيفية ربط اظهار فورم بقيمة خلية محددة


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

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

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

الموضوع مهم لذا أرجو المساعدة.

جزاكم الله خيراً سلفاً

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

السلام عليكم

اخي ايسم, جزاك الله خيراً لمساعدتك, بس للأسف الكود لم يعمل أبداً ولا أعرف السبب, رغم أنني قد حازلت وألزت القائمة من الخلية الصفراء بس بدون أي نتيجة

أرجو منك التأكد من الكود وجزاك الله سلفاً

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

السلام عليكم

أخي الكريم

الكود يعمل جيدا . أنا لسه مجربه حالا

ملحوظة

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

منتظر ردك

أيسم إبراهيم

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

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

أخي أيسم, جزاك الله خيراً ورزقك الجنة, للحقيقة في المرة الأولى لسبب ما ماكان اكسيل أفندي يعرض علي رسالة تمكين الكود أما الآن فالكود تمام ومية مية.

الله يجزيك الخير واعتذر عن الخطأ اللي بدر مني

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

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

كل عام وأنتم بخير

شكرا أخي أيسم على المجهود الرائع في مساعدة الإخوة الزملاء

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

قمت بهذا التعديل

أتمنى أن يحوز رضاكم

نظام المرفقات عندي به خلل يبدو أنه من المتصفح

فرفعت الملف على mediafire

هنــــا

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

السلام عليكم

الله يجزيكم الخير يارب, الفكرة كمان بتخدم الموضوع اللي ببالي

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

جزاكم الله خيراً ورضاً وعافيةً

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

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

ثم من الأمر إضافة insert كما بالصورة

listi.jpg

هذا بالنسبة لأوفيس 2007

أما بالنسبة لأوفيس 2003 فمن خلال إظهار شريط الأدوات نماذج forms

ولكل قائمة تحدد الخلية المرتبطة وكذلك مصدر القائمة وعدد الصفوف في القائمة

من خلال الضغط بزر الفارة الأيمن واختيار خصائص

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

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

الله يجزيك الخير, في 2003 الشكل مختلف كما أن الأداة التي في الملف هي من 2007 فشكلها مختلف وخصائصها كذلك

جزاك الله خيراً. طيب سؤال بسيط ولو إني كثرت غلبة عليكم هلا ممكن اضافة هكذا أدوات وتعديل خصائصها من كود, يعني الكود اللي سبق كان فقط لتفعيل الالأداة فماذا عن ايجادها أصلاً؟؟؟؟

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

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

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

الله يجزيك الخير, في 2003 الشكل مختلف كما أن الأداة التي في الملف هي من 2007 فشكلها مختلف وخصائصها كذلك

جزاك الله خيراً. طيب سؤال بسيط ولو إني كثرت غلبة عليكم هلا ممكن اضافة هكذا أدوات وتعديل خصائصها من كود, يعني الكود اللي سبق كان فقط لتفعيل الالأداة فماذا عن ايجادها أصلاً؟؟؟؟

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

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

خصائص الأداة لا تختلف بين إصدارات الأوفيس مطلقا ربما يتغير الشكل فقط

وبالنسبة للطلب الثاني الخاص بكود إنشاء القائمة

فهذا هو مع مراعاة تغيير المعاملات المطلوبة

Sub Createdropdown()

Dim Drp1 As Object

    Set Drp1 = ActiveSheet.DropDowns.Add(120, 20, 100, 18)

    With Drp1

        .ListFillRange = "$a$1:$a$10"

        .LinkedCell = "K3"

        .DropDownLines = 8

        .Display3DShading = True

        .Caption = "اختر من القائمة : "

    End With

End Sub

الموجودة بعد with وهي على الترتيب

المدى الذي تملأ به القائمة

الخلية المرتبطة

عدد الصفوف في القائمة

عرضها بطريقة ثلاثية الأبعاد

عنوان القائمة

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

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

السلام عليكم

ما شاء الله استاذ mas اضافة جميلة

بارك الله فيك

أسعدني مرورك على ردودي أخي خالد

شرف لي أن أرى منك هذا الاهتمام

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

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

هل ممكن ربط الكود السابق بحلقة تكرارية, يعني خلال العمود

A

إذا كانت الخلية

a1

غير فارغة فاضف هذه الأداة واربطها بخلايا...... وإلا فانتقل إلى الخلية

a2

وهكذا

هل يمكن كتابة هكذا كود؟؟؟؟

جزاكم الله خيراً ورضاً وعافيةً أخي الكريم وبارك الله لك في رمضان

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

الاستاذ قطان في الملف في المشاركة رقم 18 يظهر القائمة المنسدلة عندما تكون الخلية A1 غير فارغة .

المطلوب هل يمكن التعديل في الكود بحيث لو جعلت الخلية a1 فارغة تختفي القائمة المنسدلة

تحياتي

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

السلام عليكم ورمضان مبارك

جزاك الله خيرا أستاذ MAS123 على هذه المعلومات القيمة

زادك الله علما ونفعنا به إن شاء الله

الشكر موصول إلى الأستاذ قطان على إضافته للموضوع فبارك الله فيه

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

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information