حسين بلال قام بنشر أغسطس 17, 2009 قام بنشر أغسطس 17, 2009 السلام عليكم ورحمة الله وبركاته أرغب بعمل ملف وفيه أكثر من فورم, بدي اظهر الفورم الأول إذا كان في خلية محددة ما القيمة 1 مثلاً واظهر الفور الثاني إذا كانت القيمة في نفس الخلية 2 وهكذا يعني ممكن بهالحالة قوم باضافة قائمة إلى هذه الخلية للختيار الفورم المطلوب. الموضوع مهم لذا أرجو المساعدة. جزاكم الله خيراً سلفاً
أيسم إبراهيم قام بنشر أغسطس 17, 2009 قام بنشر أغسطس 17, 2009 السلام عليكم الأخ الكريم تفضل المرفق . إن شاء الله به ما طلبت. لاتنسانا من صالح الدعاء في هذه الأيام المباركة دمت بخير أيسم إبراهيم LIST.rar
حسين بلال قام بنشر أغسطس 17, 2009 الكاتب قام بنشر أغسطس 17, 2009 السلام عليكم اخي ايسم, جزاك الله خيراً لمساعدتك, بس للأسف الكود لم يعمل أبداً ولا أعرف السبب, رغم أنني قد حازلت وألزت القائمة من الخلية الصفراء بس بدون أي نتيجة أرجو منك التأكد من الكود وجزاك الله سلفاً
أيسم إبراهيم قام بنشر أغسطس 17, 2009 قام بنشر أغسطس 17, 2009 السلام عليكم أخي الكريم الكود يعمل جيدا . أنا لسه مجربه حالا ملحوظة بعد ما تختار الرقم من القائمة انقر بالماوس في أي خلية أخرى لتفعيل الكود منتظر ردك أيسم إبراهيم
ياسر خليل أبو البراء قام بنشر أغسطس 17, 2009 قام بنشر أغسطس 17, 2009 أحسنت صنعاً يا أيسم تسلم الأيادي يا رجل أخوك أبو البراء
حسين بلال قام بنشر أغسطس 17, 2009 الكاتب قام بنشر أغسطس 17, 2009 السلام عليكم ورحمة الله وبركاته أخي أيسم, جزاك الله خيراً ورزقك الجنة, للحقيقة في المرة الأولى لسبب ما ماكان اكسيل أفندي يعرض علي رسالة تمكين الكود أما الآن فالكود تمام ومية مية. الله يجزيك الخير واعتذر عن الخطأ اللي بدر مني
أيسم إبراهيم قام بنشر أغسطس 17, 2009 قام بنشر أغسطس 17, 2009 السلام عليكم الأخ الأستاذ : ياسر خليل سلمت لنا و عوفيت الأخ الأستاذ : hbsqn لا اعتذار بين الأخوة الأحبة دمتم جميعا بخير و في طاعة الله أيسم إبراهيم
خالد القدس قام بنشر أغسطس 17, 2009 قام بنشر أغسطس 17, 2009 السلام عليكم كود غاية في الروعة أخي أستاذ أيسم بارك الله فيك وزادك الله من فضله
أ / محمد صالح قام بنشر أغسطس 17, 2009 قام بنشر أغسطس 17, 2009 السلام عليكم ورحمة الله وبركاته كل عام وأنتم بخير شكرا أخي أيسم على المجهود الرائع في مساعدة الإخوة الزملاء ومساهمة مني في ذلك المجال وتخطيا لموضوع الضغط في أي مكان بعد الاختيار قمت بهذا التعديل أتمنى أن يحوز رضاكم نظام المرفقات عندي به خلل يبدو أنه من المتصفح فرفعت الملف على mediafire هنــــا
أيسم إبراهيم قام بنشر أغسطس 18, 2009 قام بنشر أغسطس 18, 2009 السلام عليكم أستاذ : mas جزاكم الله كل خير على هذه الإضافة دمت بخير أيسم إبراهيم
حسين بلال قام بنشر أغسطس 18, 2009 الكاتب قام بنشر أغسطس 18, 2009 السلام عليكم الله يجزيكم الخير يارب, الفكرة كمان بتخدم الموضوع اللي ببالي بس من فضلك, أنا كنت شفت من قبل هيك أداة بس ماعرفت مصدرها ولا كيفية اضافتها وماشابه لأنني لاعتقد أنها من أدوات الفيجوال بيسك. أرجو منك اكمال معروفك وتبيان هذه النقطة جزاكم الله خيراً ورضاً وعافيةً
أ / محمد صالح قام بنشر أغسطس 18, 2009 قام بنشر أغسطس 18, 2009 يمكنك الوصول لأدوات التحكم وإضافتها في ورقة العمل من خلال تبويب المطور developer ثم من الأمر إضافة insert كما بالصورة هذا بالنسبة لأوفيس 2007 أما بالنسبة لأوفيس 2003 فمن خلال إظهار شريط الأدوات نماذج forms ولكل قائمة تحدد الخلية المرتبطة وكذلك مصدر القائمة وعدد الصفوف في القائمة من خلال الضغط بزر الفارة الأيمن واختيار خصائص 1
خالد القدس قام بنشر أغسطس 18, 2009 قام بنشر أغسطس 18, 2009 السلام عليكم ما شاء الله استاذ mas اضافة جميلة بارك الله فيك
حسين بلال قام بنشر أغسطس 18, 2009 الكاتب قام بنشر أغسطس 18, 2009 السلام عليكم ورحمة الله وبركاته الله يجزيك الخير, في 2003 الشكل مختلف كما أن الأداة التي في الملف هي من 2007 فشكلها مختلف وخصائصها كذلك جزاك الله خيراً. طيب سؤال بسيط ولو إني كثرت غلبة عليكم هلا ممكن اضافة هكذا أدوات وتعديل خصائصها من كود, يعني الكود اللي سبق كان فقط لتفعيل الالأداة فماذا عن ايجادها أصلاً؟؟؟؟ جزاك الله خيراً
أ / محمد صالح قام بنشر أغسطس 18, 2009 قام بنشر أغسطس 18, 2009 السلام عليكم ورحمة الله وبركاته الله يجزيك الخير, في 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 وهي على الترتيب المدى الذي تملأ به القائمة الخلية المرتبطة عدد الصفوف في القائمة عرضها بطريقة ثلاثية الأبعاد عنوان القائمة لا تنسوني من صالح دعائكم في هذه الأيام المباركة 1
أ / محمد صالح قام بنشر أغسطس 18, 2009 قام بنشر أغسطس 18, 2009 السلام عليكم ما شاء الله استاذ mas اضافة جميلة بارك الله فيك أسعدني مرورك على ردودي أخي خالد شرف لي أن أرى منك هذا الاهتمام 1
حسين بلال قام بنشر أغسطس 22, 2009 الكاتب قام بنشر أغسطس 22, 2009 السلام عليكم ورحمة الله وبركاته هل ممكن ربط الكود السابق بحلقة تكرارية, يعني خلال العمود A إذا كانت الخلية a1 غير فارغة فاضف هذه الأداة واربطها بخلايا...... وإلا فانتقل إلى الخلية a2 وهكذا هل يمكن كتابة هكذا كود؟؟؟؟ جزاكم الله خيراً ورضاً وعافيةً أخي الكريم وبارك الله لك في رمضان
قطان قام بنشر أغسطس 23, 2009 قام بنشر أغسطس 23, 2009 السلام عليكم أخي الحبيب ابن البلد كل عام وأنت بخير ورمضان كريم على الجميع بعد الاطلاع على الموضوع أرجو أن يكون هذا المطلوب والسلام ختام آمل أن يكون هو المطلوب.rar
skyblue قام بنشر أغسطس 27, 2009 قام بنشر أغسطس 27, 2009 الاستاذ قطان في الملف في المشاركة رقم 18 يظهر القائمة المنسدلة عندما تكون الخلية A1 غير فارغة . المطلوب هل يمكن التعديل في الكود بحيث لو جعلت الخلية a1 فارغة تختفي القائمة المنسدلة تحياتي
سالم شباني قام بنشر أغسطس 27, 2009 قام بنشر أغسطس 27, 2009 السلام عليكم ورمضان مبارك جزاك الله خيرا أستاذ MAS123 على هذه المعلومات القيمة زادك الله علما ونفعنا به إن شاء الله الشكر موصول إلى الأستاذ قطان على إضافته للموضوع فبارك الله فيه
قطان قام بنشر أغسطس 28, 2009 قام بنشر أغسطس 28, 2009 السلام عليكم أخي الكريم skyblue ملاحظة جيدة وتم عمل اللازم (مع تعديل بسيط جدا) وشكر على مرورك أخي سالم ولا تنسى ملاحظاتك على الموضوع والسلام ختام آمل أن يكون هو المطلوب.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.