البحث في الموقع
Showing results for tags 'اكسيل و وورد'.
تم العثور علي 1 نتيجه
-
السلام عليكم حصلت علي كود لفتح ملف اكسيل وكان كالاتي Private Sub Command6_Click() Dim strExl As String strExl = "D:\2017\" + Me.pass Dim xlApp As Excel.Application Set xlApp = CreateObject("Excel.Application") xlApp.Visible = True xlApp.Workbooks.Open strExl, True, False Set xlApp = Nothing End Sub واردت ان اجربه علي فتح ملف الوورد فتم التعديل علي النحو الاتي Private Sub Command8_Click() Dim strwrd As String strwrd = Me.word Dim DocApp As word.Application Set DocApp = CreateObject("Word.Application") DocApp.Visible = True DocApp.Documents.Open strwrd Set DocApp = Nothing End Sub فلم يقم بفتح الملف واعطي رسالة بان الملف غير موجود قمت بتغيير صيغة الملف الي ورد 2003 فتم الفتح اريد معرفة المشكلة في الورد 2010 علما بان الاكسيل كان ايضا 2010 ولكم جزيل الشكر ملحوظة تم اضافة مكتبة الاكسيل والورد Database4.rar
