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

omar elhosseini

المشرفين السابقين
  • Posts

    1950
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    4

كل منشورات العضو omar elhosseini

  1. بسم الله الرحمن الرحيم الاستاذ علي السحيب شكرا لك استاذنا الفاضل الاخ خالد نور تحياتى لك مع رجائى من الله عز وجل بالشفاء لجهاد فهو قادر على كل شئ اخى شكرا لك ولكنها مصفوفات فى لغة السى على ما اعتقد اتمنى من الفاضل محمد طاهر اذا سمح وقته التفضل بشرح سريع لأوامرالمصفوفات " ARRAY " فى ال " VBA " من اعلان واضافة والغاء وباقى اوامراها وله جزيل الشكر تحياتى للجميع
  2. اخى قم بنسخ رؤوس الاعمدة فى ملف جديد او ضع الملف الاصلى بعد افراغة من البيانات وضع الملف بالمنتدى
  3. بسم الله الرحمن الرحيم الاستاذ علي السحيب تحياتى لك الملف المرفق هو المطلوب فشكرا لك لى طلب خاص اخر اذا سمح وقتكم بذلك التفضل بشرح سريع لأوامرالمصفوفات " ARRAY " فى ال " VBA " من اعلان واضافة والغاء وباقى اوامراها ولكم جزيل الشكر
  4. بسم الله الرحمن الرحيم الاخ الجزيرة بعد التحية الجملة " EntireRow.Hidden = True " المقصود بها اخفاء الصف . التعديل صحيح ويمكنك استخدام " PrintPreview . " بدلا من " PrintOut. " مؤقتا لمشاهدة النتيجة على الشاشة اثناء تعديل الكود . تحياتى
  5. الاخ TRAVEL بعد التحية هذا كود وليس دالة اكسيل ولا يعمل مع الخلية المنسوخة ضع الملف بالمنتدى لاجراء اللازم على الطبيعة مع النطاقات المستخدمة فى الملف تحياتى
  6. بسم الله الرحمن الرحيم الاخ الجزيرة بعد التحية هذا الكود بقوم بطباعة الصفوف فى المدى المستخدم " UsedRange " بناء على شروط محددة وهى ان تكون الخلييتين " C " و " D " من كل صف فى هذة المدى لاتحتوى صفر فإذا كانتا تحتويان على صفر يقوم بأخفاء هذه الصفوف قبل الطباعة . With Sheets("Balance") فى الورقة المساه " Balance " With .UsedRange مع المدى المستخدم For i = 4 To .Rows.Count من اول صف رقم 4 الى عدد الصفوف فى هذا المدى سوف يقوم بالاختبار الاتى قبل عملية لبطباعة عداد الدورة "For " وهو "i " يمثل رقم الصف المختبر If .Cells(i, 3).Value = 0 And .Cells(i, 4).Value = 0 Then اذا كانت الخلية "C4" وهى (i, 3) و اذا كانت الخلية "D4" وهى (i, 4) تساويان صفر اذن .Cells(i, 3).EntireRow.Hidden = True .Cells(i, 4).EntireRow.Hidden = True هذا الصف وهو الصف الرابع قم بأخفاءه End If ثم يعاود الاختبار حتى تنتهى صفوف المدى المستخدم Next i End With .PrintOut هنا يقوم بالطباعة .Rows.Hidden = False ثم يظهر الصفوف المخفية فى الورقة End With الهدف من الكود اخفاء الصفوف فى المدى المستخدم التى تحقق شرط او شروط محددة ثم يقوم بطباعة المدى المستخدم بدون هذه الصفوف ثم يقوم بأظهار جميع صفوف الورقة
  7. اخى بعد التحية قم بإرسال الملف الى بريد احد الاخوة واخبره عن طريق المنتدى انك قمت بأرساله اليه وسوف يضعه بالمنتدى مشكورا
  8. بسم الله الرحمن الرحيم تحياتى للجميع قام الكثير من الاساتذة الافاضل بعمل دوال او اكواد للتفقيط سواء للعملات المختلفه وبعضها لجميع العملات او الدرجات فهل يوجد كود للترتيب " الاول - الثانى - الرابع مكرر ..................... الألف " تحياتى
  9. بسم الله الرحمن الرحيم الاخ الجزيرة تحياتى لك فى عجالة شاهد المرفق s123_1.rar
  10. بسم الله الرحمن الرحيم بعد اذن اخونا العائد من ارض الجهاد الاخ TRAVEL شاهد المرفق قد يكون هو ما تريد تحياتى OmarTime.rar
  11. انظر المشاركة رقم 9 من هذا الموضوع http://www.officena.net/ib/index.php?s=&am...ost&p=54750
  12. بسم الله الرحمن الرحيم الاخ فلسطيني بعد التحية مرحبا بعودتك نورت المنتدى
  13. بسم الله الرحمن الرحيم الاخت إيناس بعد التحية شكرا لك على تأكيد صحة البيانات البرنامج على وشك الانهاء " مراجعة فقط " تحياتى لك
  14. الاخ هادى سالم بعد التحية اشكرك على هذه الايمائه الجميله فعلا الاوضاع صعبة بعض الشئ الله المعين فشكرا لك اخى الاخ inas aly بعد التحية ما اقصده هو ان يقوم الاخ nasersaeed بمراجعة الحالات الست من ناحية النجاح والرسوب والدور الثانى قبل الانهاء من العمل على النموذج الخاص به الذى سبق ان قدمه ولكنه لم يبدى اى ملحوظة من هذه الناحية سوف انهى العمل قريبا إن شاء الله رغم عدم تواجدى بالمنزل كثيرا فى الفترة الحالية تحياتى للجميع
  15. الاخ nasersaeed بعد التحية مرفق ملف به ورقتان بهما نماذج من صفحتى الطباعة ارجو : 1 - مراجعة الست حالات التى بهما من حيث الناحية الفنية الخاصة بكم من قواعد النجاح و الدور الثانى والرسوب . 2 - مراجعة الشكل العام والتنسيق او قم بتعديل ما تريد باللون الاحمر على النموذج الاول مع مرعاة عدم الخروج عن هوامش الطباعة . test.rar الاخ الجزيرة تحياتى وشكر لك معا دائما فى الخير إن شاء الله
  16. الاخ nasersaeed بعد التحية اخى اقوم بالعمل كما وعدت اما ما اقصد أن الأخ الشرقي يأتي بمثال عملي على دمج الشهادة فهوالعلم بالشئ والتعلم ومعرقة هذا الاسلوب فقط فنحن نتعلم من بعضنا البعض ولا ضير من ذلك تحياتى
  17. الاخ هادى شكرا على المساعدة والمتابعة فظروفى مرتبكة بعض الشئ تحياتى
  18. اعزرنى اخى ارجو افادة الحميع
  19. اخى اتمنى وضع مثال عملى على الشهادات لنتعلم منه تحياتى لك
  20. اللهم اشفى مرضى المسلمين جميعا واشفى جهاد ابنة عبدك خالد اللهم يا ذا الجلال والاكرام يا حان يا منان اللهم اشفي جهـــــاد ورد اليها صحتها وعافيتها اللهم عجل بشفائها انت على كل شيء قدير اللهم تقبل الدعاء امين امين امين
  21. اخى nasersaeed اسف على التأخير ادخل المنتدى سريعا بسبب الوفاة سوف اتفرغ بدأ من يوم الاحد إن شاء الله تحياتى
  22. بسم الله الرحمن الرحيم الاخ ابومحمد1966 بعد التحية اخى للعمل على ملفات الاكسيل الخاصة بسوق الاوراق يلزم بعض الخبرة ببرامج التحديث مثل ما قرأت ويسمى مباشر برو ولا تتوفر لى هذه الخبرة . ولكن بمكن ان امدك ببعض الافكار انت تريد الحصول مثلا من العمود الاول على المجموع الكلى تحت شروط معينه من العمود الثانى وهما يتحدثان كل فترة اذن يجب ترحيل هذان العمودان كل فترة بعد التحديث الى صفحة اخرى وهنا يمكنك التعامل مع هذه الصفحة بأظهر المجاميع مع الشروط فى العمود الاخر . واتعتقد ان لم اكن مخطئ ان الاستاذ حسام نور من النخبة التى تستطيع مساعدتك فى ذلك لما له من خبرة فى هذا المجال فقد قام بعمل برنامج للاسهم من فترة قريبة . تحياتى لك .
  23. بسم الله الرحمن الرحيم الاخ mn20 بعد التحية اسعدنى كلامك فشكرا لك لقد شجعتنى على كتابة كود ظريف اخر للاخ يرموك ارجو الاطلاع عليه وهو موجود بملف اخونا وايضا قمت بوضعه فى ملف منفصل للأطلاع عليه وهو بعمل بالضغط على " F11 " بعد اختيار احد الصفوف او اختيار اكثر من صف فيقوم بإلغاء الصف او الصفوف المختارة من جميع الاوراق حتى لو كانت محمية او كانت مخفية الاخ mn20 عند اطلاعك على الكود ستلاحظ الاتى : هو عبارة عن حلقتين منفصلتين الحلقة الاولى : تقوم بثلاثة مهام 1- تحزين حالة كل ورقة من الاخفاء فى مصفوفة لأعادة الوضع الاصلى بعد الالغاء . 2 - اظهار كل الاوراق . 3 - ازالة الحماية عن كل الاوراق . قبل الحلقة الثانية توجد ايضا ثلاث مهام : 1 - تجميع كل الاوراق . 2 - القيام بالالغاء من جميع الاوراق دفعة واحدة لانها مجمعة . 3 - فك تجميع الاوراق . الحلقة الثانية : 1 - تقوم بحماية الاوراق . 2 - ارجاع حالة الاخفاء للاوراق كل حسب حالته الاولى . 3 - اختيار الورقة التى يعمل منها منذ بدأ الالغاء . ارجو ان اكون اسهمت ببعض الفائدة تحياتى لك وللجميع . omar.rar
  24. بسم الله الرحمن الرحيم استاذنا الفاضل علي السحيب تحياتى لك معك حق سيدى وشكر على توضيح الامور ودعمك الدائم جزاء الله كل خير تحياتى لك
  25. عنوان التحميل بالمرفقات فى اخر المشاركة رقم 20 اى اصعد لاعلى 3 مشاركات وها هو مرة اخرى http://www.uploading.com/?get=VKLCRR6V
×
×
  • اضف...

Important Information