كود فتح ملف

[وليد زقزوق]

عندي ملف اكسيل مفتوح واريد كود اضعة بة لفتح ملف اكسيل اخر

[أبو إيمان]

بسم الله والصلاة والسلام على رسول الله

إليك أخي الفاضل هذا الكود ولعله المطلوب

    ChDir "C:\Users\Eman\Desktop"
    Workbooks.Open Filename:="C:\Users\Eman\Desktop\m01.xls"

[وليد زقزوق]

غير مفهوم يا اخي ارجو الايضاح واين يوضع وكيف اضع فية مسار ملفي انا

[أبو إيمان]

السلام عليكم أخي الفاضل

السطر الأول الأول تقوم فيه بتحديد مكان الملف ( المسار )

السطر الثاني تقوم فيه بكتابة اسم الملف والامتداد متبوعا بالمسار وإليك مثال توضيح 

 

ولكي يعمل الكود برجاء وضعه على سطح المكتب

 

 

تجربة.rar

[وليد زقزوق]

الاخ ابو ايمان الملف لم يعمل يقوم باظهار رسالة خطا في الكود

[ابو تميم]

بعد  إذن أخي ابو ايمان

تم تعديل الكود وهو يعمل جيدا

 

ملاحظة

تم وضع مسار الملف محددا بالاسم وهو الملف الموجود بنفس مجلد الملف الاصلي

تجربة _ 2.rar

[وليد زقزوق]

شكرا اخي ولكن كيف اطبق هذا غلي ملفين اخرين هل انتق الكود للملف الجديد فقط

ام ماذا

[أبو إيمان]

جزاك الله خيرا أخي ابو تميم ونحن هنا كلنا للاستفادة والتعلم

أخي وليد انسخ الكود مع كتابة اسم ملفك مف المكان المخصص لذلك بالسطر الثاني من الكود