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

yasser_w_2010

02 الأعضاء
  • Posts

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

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

السمعه بالموقع

1 Neutral

عن العضو yasser_w_2010

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    محاسب
  • البلد
    مصر
  • الإهتمامات
    اكسيل

اخر الزوار

بلوك اخر الزوار معطل ولن يظهر للاعضاء

  1. الف شكر لجضرتك الف شكر على الدلة الجميله الف شكر منتدي اوفسينا الحبيب
  2. الف الف شكر لحضرتك ولمجهودك و الكود الرائع ... الف شكر منتدي اوفسينا اضافة كود منع الترحيل اذا كانت الخلية فارغة الاساتذه الكرام .. هل ممكن اضافة الى هذا الكود للاستاذ احمد زمان بحيث عند خلو الخلايا المظللة بالون الاسود لا تتم عملية الترحيل , وتظهر رسالة اكمل البيانات ... شاكر لكم جدا المصنف1.xlsm
  3. اسف لحضرتك ولاكن عندالترحيل لا يرحل اسفل كل خليه فارغه اوقات بيرحل في نفس الصف واوقات بيرحل تحته وبيسيب صف فاضي
  4. الاساتذه الكرام رجو عمل كود ترحيل بيانات من خلايا كثيره واعمدة متفرقه الى اخر صف به بيانات شاكر لكم جدا على مجهودكم معي وشاكر لموقع اوفسينا الممتاذ المصنف1.xlsm
  5. الف الف الف شكر استاذنا الكريم الف شكر على تعبك و مجهودك الف شكر منتداي الغالي اوفسينا ارجو من حضرتك تعرفني خلية a فارغه هل هي مهمه لاني سوف انقل المعادلة و العامود a به بينات شكرا لك استاذنا الكريم
  6. ارجو من الاساتذه الكرام مساعدتي في دله او كود يعمل بحث للمطلوب وشكرا على مجهودكم كثيرا
  7. مرفق ملف المطلوب فيه ايجاد دلة بحث عند كتابة رقم موجود في الجدول ياتي باسم موجود في عامود المصنف2.xlsx
  8. =Combine(Q6:DL6) هذا الكود بكتبه في الخليه وهوه نفس الكود المكتوب فوق وعند حذف الصف الكود بيجيب خطاء هل من حل اكتبه في الخليه بحيث يعمل تنشيط للمعادلة عند حذف الصف
  9. Sub Macro1() ' Macro1 ماكرو' Sheets("data").Range("A3:DM150").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("P3:P4"), CopyToRange:=Range("A5:DM5"), Unique:= _ False End Sub هل يمكن عمل هذا الكود بحيث ريحل البيانات كل مره في اخر صف فيه بيانات بدون مسح البيانات المرحله مسبقا
  10. ارجو المساعدة من الاساتذه الكرام عند عمل ترحيل للصفوف بناء على عامود ( منتهي ) الكود في عامود ارقام الغرف لا يعمل ارجو التعديل على الكود بحيث عند ترحيل الصفوف يعمل في شيت data و شيت save هوه ده الكود عند ترحيل الصف لا يعمل Function Combine(WorkRng As Range, Optional Sign As String = "~") As String Dim Rng As Range Dim OutStr As String For Each Rng In WorkRng If Rng.Text <> " " Then OutStr = OutStr & Rng.Text & Sign End If Next Combine = Left(OutStr, Len(OutStr) - 1) End Function 1.xlsm
  11. الاساتذه الكرام ارجو منكم المساعده في التالي 1 - نقل الصف بالكامل المكتوب في خليه كلمة ( منتهي ) الى الشيت الاخر في اخر صف فارغ الذي يسبقه بيانات 2 - حذف الصف كامل بعد الترحيل شاكر لكم جدا .... تـــم تعديل رفع الملف بدون حماية 11.xlsm
  12. السلام عليكم ورحمة الله اريد ان اعرف كيف يتم اخفاء علمة الانزلاق
  13. الساده الاساتذه الكرام ارجو منكم ايجاد دلة بحث باكثر من شرط بحيث طول ما في ايام متبقيه يبحث عن اسم الشركه بناء على رقم الغرفه\ الموجود في الحجز شكرا لكم حجز.xlsm
  14. Hالف شكر يا استاذ سليم و هحاول اشوفي في الموقع الاكسيس
×
×
  • اضف...

Important Information