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

أيمن بهجت

عضو جديد 01
  • Posts

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

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

كل منشورات العضو أيمن بهجت

  1. هو مافيش موضوع لامم اغلب الاكواد و استخدام كل كود ايه؟
  2. تشكر يا باشا جاري مالمذاكره
  3. ههههههههههههههههههههه والله انتو ناس زي العسل و بصراحه انا لسه متعلم الماكرو النهرده و ما اخدتش فيه الا نص ساعه كده قرايه و عملت الكومند ده و عايز احترف الماكرو هل في اسلوب اتعلم منه الماكرو و بجد استفدت من مناقشتكو و خصوصا ال 10 اخطاء ;) ربنا يباركلكو والله انتو ناس ميه الميه الميه الميه
  4. مشكور يا غالي على تعبك معايا
  5. Sub InternalSwitch() Dim lr As Integer Sheets(1).Activate ir = [A100000].End(xlUp).Row Range("a2:h" & lr).Copy Sheets(5).Activate Range("a" & [A100000].End(xlUp).Row + 1).Select Selection.PasteSpecial xlPasteValues Sheets(1).Activate Range("a2").Select Range("a2:h10000000").ClearContents End Sub ده الكوماند كلو كل اللى عايزه انقل من شيت 1 لشيت 5 البيانات
  6. Range("A2:H" & lr).Copy حد يعرف ايه المشكله فى الكومند ده مع العلم اني بستخدم اكسل 2013
×
×
  • اضف...

Important Information