حمادة عمر

الاخوة الافاضل اثناء بحثي هنا في منتدانا الرائع وجدت هذا الموضوع فهل يمكن عمل ذلك بالورد كما نقوم به في الاكسيل حيث خبرتي بالورد ليست كما هي في الاكسيل ارجو التوضيح هل من الممكن تنفيذ هذا الطلب جزاكم الله خيرا

السلام عليكم وايضا تم حل مشكلة الاقتباس لدي شكرا ومع جزيل الشكر وعظيم الامتنان لادارتنا الرائعة جزاكم الله خيرا

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

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

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

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

السلام عليكم الاخ الكريم / احمد مجدى اليك المرفق هل شكل الايصال به هو كما تريد انت بالضبط ام انك تريد تعديل اي شئ عليه لنقوم بوضع اكواد الترحيل كما طلبت جزاك الله خيرا الايصالات1+.rar

السلام عليكم الاخ الكريم / وليد زقزوق حاول ارفاق ملف فقد كانت لدي هذه المشكلة وهي تحل من احد الازرار الموجودة بجوار الزر الذي تختار منه الملفات للرفع .... حاول مرة اخري حيث ان ارفاق ملف يوضح المطلوب بشكل اسهل واسرع اما بخصوص كود التنسيق فلا اعرف ماذا تقصد ولذلك اطلب منك ارفاق ملف وبخصوص كود معاينة قبل الطباعة .... استخدم الكود التالي Sub HAMADA() Cells.EntireRow.Hidden = False Sheets("Sheet1").PageSetup.PrintArea = "A2:D25" Sheets("Sheet1").PrintPreview End Sub وفي الجزء قم بوضع النطاق الذي تريد معاينته قبل الطباعة "A2:D25" وفي الجزء .... ضع اسم الشيت الذي تريده للمعاينه ("Sheet1") وفي انتظار ارفاق ملف يوضح به المطلوب او توضيحا اكثر جزاك الله خيراً

السلام عليكم الاخ الكريم / alsaudi اقدم لك هذا الحل اولا : لكي اجاور واشارك مع العملاق القدير الاستاذ / طارق محمود ..... جزاه الله خيرا ..... فهو شرف لي بالتأكيد ثانياً : لاثراءاً للموضوع وهي الطريقة التي تعلمتها من استاذي الاول القدير / يحيي حسين وهي استخراج كشف الحساب بالاكواد ارجو ان تنفع ويستفاد منه جزاك الله خيراً استخراج كشف حساب بالاكواد.rar

السلام عليكم الاخ الكريم / محمود المصرى اليك اخي الملف الذي تريده بشاشة رئيسية وزر طباعة للحالة الوظيفية مع طلبك بتعديل الترتيب وتحت امرك في اي تعديلات او طلبات أخري جزاك الله خيرا شاشة استعلام2.rar

السلام عليكم الاستاذ العملاق / طارق محمود انت اكثر من رااائع شرح بطريقة ابداعية جزاك الله خيراً

السلام عليكم الاساتذة الافاضل جزاكم الله خيراً

السلام عليكم الاخ الكريم / عمر أبو صهيب لإثراء الموضوع وعلي حسب فهمي هو نفس الطريقة المستخدمة من الاخ الكريم / جلال محمد .... جزاه الله خيرا يفعل ما تريد عند فتح الملف (يقوم باخفاء كل قوائم الاكسيل ) وعند اغلاق الملف ( يقوم باعادة القوائم لطبيعتها ) بوضع الكود في حدث ThisWorkbook ارجو ان اكون وفقت فيما طلبت جزاك الله خيراً Book2+.rar

السلام عليكم الاستاذ الكبير / رجب جاويش رااائع دائماً كعادتك في اكواد وفي شرحك الاروع بارك الله فيك استاذنا وجزاك الله خيراً

السلام عليكم الاساتذة الكرام طبعاً الدخول في موضوع لكم وردود بهذه الروعة تعتبر انتحار ولن اقدم كوداً جديداً ولكن كود الاستاذ العلامة القدير / عبد الله باقشير ... جزاه الله خيراً فعلاً يعطي خطأ حتي في حالة وجود الرقم الصحيح واعلم ان لديه التعديل الاروع كعادته وتعديل الكود من الكبير جداً / عباد .... جزاه الله خيراً لم يعمل لدي ... ولا اعلم السبب والكود المقدم من العملاق الكبير / رجب جاويش .... جزاه الله خيراً راائع واظن انه يفي بالمطلوب بصورة ممتازة وعند التجربة اضفت لمسه بسيطة جداً والاكيد ان الفضل الاول له لاكمال العملية حيث عندما يقوم الادخال فعلا يعطي الرسالة ولكنه يبقي علي القيمة الموجودة في التكست فجعلت الكود يمسح ما به بعد الضغط علي الرسالة التي تظهر ارجو ان اكون وفقت في ذلك جزاكم الله خيرا textbox2.rar

السلام عليكم الاخ الكريم / محمود المصرى جرب المرفق حيث به جميع الشاشات لكل الاقسام كل قسم كما توجد البيانات به جرب الملف واخبرني بالنتيجة لنكمل ام انك تريد شئ آخر حيث يوجد زر في كل صفحة من صفحات الملف خاص بالقسم ذاته ( للتجربة فقط ) اعلم انك لا تريد العرض بهذا الشكل ولكن للاتفاق علي المبدأ ولايوجد به الترحيل الي صفحة الحالة انتظر ردك جزاك الله خيراً شاشة استعلام ++.rar

السلام عليكم الاخ الكريم / ابراهيم ابو ليلة اعتذر عن قيامي بهذا الرد حيث انه يخص ( الكمبوبكس ) وليس التكست بوكس .... فهو خطأ غير مقصود فعلاً وسأقوم بوضع الرابط التالي الموجود فيه الحل لهذا الموضوع والذي قمت انت بطرحه في موضوع آخر وقام بالرد عليه العملاقين الاستاذ القدير / عبد الله باقشير ...... جزاه الله خيرا والاستاذ القدير / عباد - ابونصار ....... جزاه الله خيراً واليكم الرابط .... ليسهل علي الاخوة الاعضاء في الوصول للرد عند الاطلاع علي هذا الموضوع http://www.officena.net/ib/index.php?showtopic=45498 جزاك الله خيرا

السلام عليكم الاخ الكريم / إبراهيم ابوليله هل قمت بتجربة الأمر الذي تم ذكرة في المشاركة رقم 2 جزاك الله خيراً

السلام عليكم الاخ الكريم / وليد زقزوق قم بوضع ما تريده بالضبط في ملف مرفق كمثال وما تريد عمله بالضبط في الشاشة الرئيسية خاصتك ونحن جميعا معك باذن الله جزاك الله خيراً

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

السلام عليكم الاخ الكريم / محمود المصرى اليك المرفق كما طلبت ولكن هناك مشكلة حيث انه لايمكنني التعديل علي ملفك الموجود في المشاركة الاولي حيث ان الاصدار الذي تعمل عليه ليس لدي وانا اعمل علي اوفيس 2003 ولا اعلم ان كان يمكنك نقل ذلك لملفك الاساسي ام لا وان كان المرفق كما تريد وتريد ان نكمل علي اوفيس 2003 ويتناسب معك ام لا انتظر ردك اخي الحبيب جزاك الله خيرا شاشة استعلام +.rar

السلام عليكم الاخ الكريم / قرين الندى ان ما قدمه لك اخونا / مهند الحافظ كما تريد فإثراءاً للموضوع اليك رابط موضوع للعلامة الخبير الاستاذ القدير / عبد الله باقشير بعنوان ( فورم للتقويم الميلادي والهجري لادراج التاريخ في الخلية النشطة ) فورم راااائع وطريقة اروع لاضافة التاريخ من الفورم http://www.officena.net/ib/index.php?showtopic=42121 جزاك الله خيرا

السلام عليكم الأخ الكريم / مهند ياسر الحافظ بداياتك موفقة وطريقة راائعة لاستخدام فورم التاريخ لاضافته فعلا ( اصبح الآن ياسر الحافظ الكبير ) موجود بيننا بإبنه الصغير جزاك الله خيراً

السلام عليكم الاخ الكريم / أكرم جلال في المرفق الاول تم التعامل مع الملف حيث كان الموجود به البحث عن طريق الارقام وفي الكود يجب تحديد ذلك حيث يختلف جزء بسيط حيث بالكود الاول نستخدم value قم باستبدال السطر التالي الموجود في الكود ============================= If Val(Me.ComboBox1) = cl Then ============================= بالسطر التالي .... وبالاستبدال سيعمل معك البحث باستخدام النص كما تريد ============================= If Me.ComboBox1.text = cl Then ============================= لان VAL علي حسب علمي تستخرج الارقام فقط و تهمل النص . وعذرا لايمكنني ارسال الكود بالطريقة الصحيحة وان اردت ارفقت لك ملف بذلك جزاك الله خيرا

السلام عليكم الاخت الفاضلة / سحـابة خير بالفعل الاستاذ / مجدي يونس ..... جزاه الله خيرا لدية حق فيجب عند كل مشاركة ارفاق ملف للتوضيح حيث ان ارفاق ملف يجعل الحل اسهل واسرع واليك اختي الكريمة رابط لموضوع ( كيفية ارفاق ملف بالمنتدي ) به شرح فيديو للطريقة ولكن يجب عليكي اولاً القيام بعمل ضغط للملف بأحد برامج الضغط WINRAR او WINZIP ثم اتباع الشرح الموجود علي الرابط التالي : http://www.officena.net/ib/index.php?showtopic=44625 ارجو ان ينفع معكي ( بإذن الله ) ونحن في جميعاً معك دائما جزاك الله خيراً