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

أبو حنــــين

الخبراء
  • Posts

    2,845
  • تاريخ الانضمام

  • Days Won

    9

كل منشورات العضو أبو حنــــين

  1. أنظر هذا الرابط : http://www.officena.net/ib/index.php?app=core&module=attach&section=attach&attach_id=51486
  2. الملف الذي أرسلته لك يقوم بهذه العملية حاول مسح الارقام المتشابهة ستجد أن اللون قد مسح من الخلية
  3. عمل احترافي أخي رجب بارك الله فيكم و هذا كود مختصر يقوم بنفس العمل Private Sub CommandButton1_Click() For s = 1 To 8 Cells(8, 10 - s).Value = Cells(5, s + 1).Value Next End Sub
  4. شكرا اخي محمود و هذا باقي الملف AM.rar
  5. السلام عليكم تم الطلب حسب ما هو موجود في الملف AM.rar
  6. أخي الشهابي زيادة الخير خيرين و جزاك الله خيرا هذا من شيم النبلاء . بارك الله فيكم
  7. بالتوفيق إن شاء الله في ما تقبل عليه
  8. أخي الكريم عبد الله باقشير جزاك الله خيرا على هذا الشرح المبسط و المفيد و ننتظر البقية
  9. جزاك الله خيرا اخي : / رجب جزاك الله خيرا اخي : / يوسف
  10. السلام عليكم عندما قمت بتحميل الملف أشار لي آفاست بوجود مشكلة بالملف تأكد أخي من الملف اعتقد ان هناك مشكلة
  11. العفو أخي الكريم : / mk_mk_79
  12. السلام عليكم جرب المرفق مثال.rar
  13. أخي الحبيب : / دغيدي حياك الله أدعوى لك الله الصحة و العافية انت و من تحب ان شاء الله رب العالمين
  14. السلام عليكم اخي الحبيب : / ابو انس و الله اني احبك في الله على دعائكم الطيب حفظك الله و حفظ لك انس
  15. السلام عليكم أولا ان كان هناك اي سؤال فاسأل اخي بدون اي حرج ما نعرفه نقوله و ما لا نعرفه يعرفه غيرنا لقد ارسلت الملف مع تغيير اللون و صورتين للتوضيح اطلب منك ان تقوم انت بالعمل اولا على الملف السابق و هو تغيير العدد 14 بالعدد 10 ان نجحت فهو المطلوب و ان لم تنجح فانظر الى الرفق مجلد جديد.rar
  16. ' في هذا السطر غير الرقم 14 الى الرقم الذي تريد و هو من 0 الى 56 Range(Cells(t, 13).Offset(0, -12), Cells(t, "M")).Interior.ColorIndex = 14
  17. مرحبا اخي هذا شرح للألوان الشرح.rar
×
×
  • اضف...

Important Information