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

دغيدى

أوفيسنا
  • Posts

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

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

  • Days Won

    14

كل منشورات العضو دغيدى

  1. أخى الفاضل / قم بالبحث سوف تجد ضالتك ..لأن المنتدى طرح هذا الموضوع كثيرا .. كى تتعلم أما وضع الصفر فنسق الخلية كنص
  2. أخى الفاضل / ارسل الملف وسوف تجد المطلوب
  3. أخى الفاضل / عبد الله المجرب سلام الله عليكم اينما حللتم أشكركم .. كل الشكر لتكريمى الكبير بنسب الفكرة لى وما أنا إلا مستخدم لهذا الصرح الذى ميزنى عن كثير من زملاء العمل .. لأنه سكنى الحالى ==================== مطلوب قائمة منسدلة بدون ( فراغات أو تكرار ) مرفق ملف به : 1 -قائمة أسماء بها تكرارات 2 - قائمة اخرى بدون تكرارات للقائمة الأولى 3 - قائمة منسدلة بدون تكرار ولكن بها فراغات المطلوب اكتمال العمل بأن تكون القائمة المنسدلة بدون ( فراغات أو تكرار ) تحياتى قائمةبدون تكرار.rar
  4. أخى الفاضل يجب توزيع الملاحظين يدويا لمراعاة كل الظروف
  5. أخى الفاضل / محمد صــالح مروركم شرف لى أشكركم من قلبى
  6. Sub change_sheet_tab_color() ActiveWorkbook.Sheets(1).Tab.ColorIndex = 0 ActiveWorkbook.Sheets(2).Tab.ColorIndex = 1 ActiveWorkbook.Sheets(3).Tab.ColorIndex = 2 ActiveWorkbook.Sheets(3).Tab.ColorIndex = 3 ActiveWorkbook.Sheets(4).Tab.ColorIndex = 4 End Sub كود تلوين تبويبات الأوراق غير فى أرقام الألوان ولاحظ ملحوظة : يجب أن يكون الكود مناسبا للعدد الأوراق كود تلوين تبويبات الأوراق.rar
  7. أخى الفاضل / احمد حمور-ابوعبدالله سلام الله عليكم فى حالة استخدام ملفك وانا لا أعلم الاختصارات سوف تكون مشكلة
  8. أخى الفاضل / بن علية السلام عليكم تغيير جميل وتستحق الشكر
  9. أخى الفاضل اتبع ما قاله "أخى سعد " لأنها اسهل طريقة
  10. اخى عبد الله اثابكم الله على ماتقدمه من خير
  11. أخى أبو عبد الله جزاكم الله خيرا أحد الزملاء كان له ملف كل ماكرو معه اختصار من لوحة المفاتيح فكان متعب جدا لنه كان لا ينتقى الأزرار الخالية شكرا لكم
  12. Sub deletshape() Dim sh As Shape For Each sh In activesheet.Shapes If sh.Type = msoPicture Then sh.Delete End If Next sh End Sub حذف جميع الصور الموجودة فى الصفحة النشطة
  13. لمعرفة عدد ايام شهر محدد ( معين ) =DAY(DATE(YEAR(A2);MONTH(A2)+1;DAY(1))-1)
  14. إدراج صف فارغ عند تغيير البيانات في عمود منقول إدراج صف فارغ.rar
  15. وهذا الكود لفتح control panel Sub open_control_panel_by_vba() Shell ("control panel") End Sub
  16. أخى الفاضل / يوسف تم عمل كود من الأخوة الأفاضل ولكن هناك مشكلة وهى : الهمزة الوسطية مثل : رأفت ستكون رافت
  17. أخى الفاضل / عبد الله المجرب شكرا جزيلا فمنكم تعلمت . وأرغب فى التعلم شكرا
  18. =TEXT(DATE(YEAR(A5);MONTH(A5);DAY(1));"dddd") لمعرفة أول أيام الشهر =TEXT(DATE(YEAR(A5);MONTH(A5)+1;DAY(1))-1;"dddd") لمعرفة آخر أيام الشهر
×
×
  • اضف...

Important Information