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

اسلام رجب

عضو جديد 01
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    26

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

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

 نوع المحتوي 

مشاركات المكتوبه بواسطه اسلام رجب

    الترحيل من ملف لملف آخر

    في منتدى الاكسيل Excel

    قام بنشر

    بعد اذن الاستاذ ياسر هذا الكود يقوم بترحيل دون اظهار الملف المرحل الية
    "Workbooks.Open Filename:="e:\book2.xlsm
     
    Windows("book2.xlsm").Activate
     
    Workbooks("book2.xlsm").Sheets(1).Range("a1:j" & Cells(Rows.Count, "a").End(xlUp).Row).Copy
     
    Workbooks("book1.xlsm").Activate
     
    Workbooks("book1.xlsm").Sheets(1).Range("a" & Rows.Count).End(xlUp).Rows.Offset(1, 0).Select
     
    Selection.PasteSpecial xlPasteValues
     
    Workbooks("book2.xlsm").Save
     
    Workbooks("book2.xlsm").Close
    • Like 1
×
×
  • اضف...

Important Information

  I accept