اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

خالد الشاعر

05 عضو ذهبي
  • Posts

    1,514
  • تاريخ الانضمام

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

  • Days Won

    2

كل منشورات العضو خالد الشاعر

  1. استاذ رسول ارجو ان يكون هذا الكل المطلوب الارقام معكوسة.rar
  2. استاذ خجول الكون ممكن تعمل نسح من ملف البيانات ثم فى الملف الثاني المراد نقل البيانات به تعمل اختار past special ثم اختار اخر اختيار هو past link بالتوفيق
  3. استاذ الموسطي هذا الكود فى السر =OFFSET(Feuil1!$L$3;;;MAX(Feuil1!$K:$K)) من مجموعة Formulas ثم Name Manager ثم سوف تجد نطاق اسمه List هو ده اللى شغالة علية القائمة المنسدلة ارجو اكون وفقت فى الشرح
  4. الاستاذة الخبراء هل ممكن استخدام دالة vlookup فى combobox ولكم جزيل الشكر
  5. وجدت الحل فى هذا العمل العظيم من اعمال الاستاذ عبد الله باقشير اتمنى انا يرجع بمشاركته العظيمة التى ابهرت الكل جزاه الله كل خيراً وجعلة فى ميزان حسناته فورم بحث1.rar
  6. السادة الخبراء عند ملف به اكثر من 12 ورقة عمل اريد عمل يوزر فورم بحث من ورقة رقم 1 الر ورقة رقم 12 نطاق البحث من B13:B262 البحث عن اسم موظف و يكون الناتج فى الفورم جزاكم الله كل خيراً بحث.rar
  7. استاذ زيزو جزاك الله كل خير
  8. اشكرك استاذ زيزو ولكن النسخ لن ينفع لان الاسماء ممكن تكون مش نفس الترتيب علشان كدة اختارت هذه المعادلة فهل ممكن يتحقق من الاسم ثم ينسخ جزاك الله كل خيراً
  9. الساده الخبراء هل ممكن تحويل هذه المعادلة لكود =IF($A13="";"";INDEX(Data_all;MATCH(INDIRECT("C13");'12'!$B$13:$B$262;0);2)) مرفق ملف للتوضيح Book1.rar
  10. هذا هو الملف مرة ثانية افتح الملف اولا ثم ابحث فى شاشة فيجول بيسيك Calendar.rar
  11. استاذ سليم ليس صعب اعمالك تاخذ اعجاب الجميع جزاك الله كل خير
  12. استاذ سليم شكرا على سرعة المساعدة جزاك الله كل خيراً
  13. استاذ عبد الله من شاشة الفيجوال بعد فتح الملف المرفق فى مشاركة السابقة الخاصة بى ادخل tools ثم reference تم علم اما هذا الاختيار Microsoft calendar control ارجو ان تنفع معك
  14. السادة الخبراء اريد حذف المعادلات فى نطاق معين وهذا كود اريد تعديلة Sub Formula() Dim Cl As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual For Each Cl In Range("AZ1:AZ300") If Cl.Value = Formula Then Cl.ClearContents End If Next Cl Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub يعطى خطاء فى هذا السطر If Cl.Value = Formula Then جزاكم الله كل خيراً
  15. استاذ طلعت عمل جيد و تطوير ممتاز جزاك الله كل خيراً
  16. استاذ العيدروس اشكرك جزاك الله كل خيراً
  17. استاذ عبد الله هذا عمل من اعمال المنتدى العظيم لعله ينفذ ما تريد Calendar.rar
  18. السادة الخبراء هذا الماكرو يعطى خطاء عند التنفيذ invalid next control variable reference برجاء المساعدة جزاكم الله كل خيراُ Book1.rar
  19. استاذ سليم الكود يكتب المعادلة فى كل خلية و لكن الناتج خطاء المعادلة هى المشكلة فى هذا الجزء CHAR(COLUMNS($A$1:A1)+70) لانه يكتب اسم العمود فهذه المعادلة بعد عمود z لا يكتب اسم العمود مضبوط برجاء النظر فى الملف المرفق ممكن يوضح لكم سبب المشكلة جزاكم الله كل خيراً جمع الشيت.rar
  20. استاذ محمد عمل رائع جزاك الله كل خيراً
×
×
  • اضف...

Important Information