نجوم المشاركات

بسم الله الرحمان الرحيم السلام عليكم بعد غيابي الطويل عن هدا المنتدى العزيز لاسباب ........؟ اتركوها على الله لم اشاء ان اعود خالى اليدين لدى ارتأيت ان اضع بين ايديكم هدا الملف المتواضع وهو عبارة عن برنامج خاص لاصحاب محلات بيع الموبيلات كنت قد صممته لاحد اصدقائي بدون اطالة الباسوورد 123 لاغلاق الفورم وفتح ملف الاكسل Alt + b الباسوورد 111118 ارجو ان ينال اعجابكم تحياتي لكم Archivé Mobile V 1.001.rar الملف الاصلي بدون عمله ملف تنفيذي

السلام عليكم ورحمة الله أخي الكريم الشريف محمد عبد الهادي، قمت بتغيير الدالة HOUR بالدالة TEXT مع التنسيق القياسي Standart على الخلايا المعنية بالمعادلة... أرجو أن تلبي المعادلة طلبك... أخوك بن علية المرفق : دالة hour.rar

السلام عليكم ورحمة الله أخي الكريم، في الملف المرفق السابق قمت بحذف الوقت من خلايا التاريخ في النطاق F1:F7 وفي الملف المرفق الجديد قمت بإدراج التنسيق الشرطي على الملف الأصلي مع تعدبل على معادلات التنسيق باستعمال الدالة TEXT مع تنسيق jj/mm/aaaa على التاريخ ليتوافق التاريخ في الجدول الأول مع التاريخ في الجدول الثاني (الاستغناء عن التوقيت في التاريخ)... ملاحظة : إذا كنت تستعمل النسخة الإنجليزية للإكسيل عليك أن تغير الكتابة jj/mm/aaaa في معادلات التنسيق الشرطي بالكتابة dd/mm/yyyy أرجو أني وفيت المطلوب... أخوك بن علية المرفق المعدل : test2.rar

اخى الكريم bilal2005 كده هتكون الالون كتيره جدا وبالمعادلات والتنسيق الشرطى ستكون مرهق جدا على وعليك تقبل خالص تحياتى

السلام عليكم اخى الكريم جرب هذا الحل test_5.rar

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

أخى فى الله الأستاذ القدير // رجب جاويش بارك الله فيكم (( إطلالتكم دائما مميزة وتنير المنتدى )) وتقبل منى وافر الاحترام والتقدير

السلام عليكم أخى الفاضل جرب الكود التالى لتنفيذ ما تريد Sub ragab() For i = 1 To Sheets.Count Sheets(i).Cells.EntireRow.Hidden = False x = Sheet1.Range("A4") + 1 Sheets(i).Range("a" & x & ":a" & Rows.Count).EntireRow.Hidden = True Next End Sub اخفاء صفوف حسب عدد الطلاب.rar

الأستاذ / علي السلام عليكم ورحمة الله وبركاته جرب هذا الملف لعله المطلوب. Book1.rar

العناصر يقصد بها الأدوات المضمنة في النموذج (ازرار،مربعات نص،قوائم .....الخ) ، ويبدو أن النموذج لديك مليئ بها . على العموم هو اقتراح فقط وليست بمشكلة تستلزم الحل. Option Explicit ضعها هنا :

بعد اذن الاخوة الكرام اذا كانت نسخة الاوفيس 2007 يمكنك الذهاب الى data وتحديد العمود الموجود فيه الارقام والضغط علىremove duplicates سوف يحذف المكرر ويبقى على رقم واحد فقط جرد وشوف

السلام عليكم اضافة عناصر الى فورم مع استخدام class Modules لربط هذه العناصر بالاكواد في المرفق مثال لاضافة OptionButton الى فورم لاسماء اوراق العمل مع ربط هذه العناصر بكود باستخدام class Modules طلب لاحدهم http://www.officena.net/ib/index.php?showtopic=30450&st=0#entry152538 ووضع هنا لتعم الفائدة اضافة عناصر الى فورم.rar

لسلام عليكم اخي الفاضل/ مزلزل ---حفظه الله اكرمك الله ولك مثلها --------------------- اخي الفاضل /خالد القدس ---حفظه الله ولك مثل دعائك اضعاف مضاعفة اكرمك الله --------------------- اختي الفاضلة/عبير مصطفى---حفظها الله تشرفت بمرورك وكلامك الطيب اكرمك الله --------------------- اخي الحبيب هادي سالم---حفظه الله تشرفت بمرورك وكلامك الطيب اكرمك الله تقبلوا تحياتي وشكري