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

الردود الموصى بها

قام بنشر

نشكر الأخ الكريم

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

عندي ورقة مثل book1 نريد فتح هذه الورقة

و شكرا

قام بنشر

نفرض أن لديك فيل اكسل اسمه Book1 وقمت بوضعة على البارتشن C

 Dim strDir As String
     strDir = "c:\"
     Shell Chr(34) & "excel.exe" _
        & Chr(34) & Chr(34) & strDir & "\" & "book1.xls" & Chr(34), vbMaximizedFocus

قام بنشر

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

حذفت الجزء الأول من الكود

" strDir = "c

ففتح الملف المطلوب

شكرا

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information