gadelrab قام بنشر منذ 11 ساعات قام بنشر منذ 11 ساعات الاخوة الاعزاء السلام عليكم ورحمة الله لدى عدد كبير من ملفات الوورد تم تسميتها مسلسة رقميا 1...2...3 وقمت بعمل برنامج لتنظيم وفتح تلك الملفات باستخدام برنامج الاكسس حيث قمت باعتبار رقم الملف ترقيم تلقائى هو نفس اسم الملف بالوورد وقمت بعمل سجل واضافة زر امام كل سجل واريد عند الضغط على السجل يقوم بفتح ملف الوورد باستخدم برنامج ماكروسفت وورد بحيث يثوم بفتح نفس الملف الذى طبقا لرقمه قمت بالاطلاع على الموضوع التالى https://www.officena.net/ib/topic/25175-كيف-افتح-ملف-وورد-عن-طريق-الاكسس/ الذى به زر لفتح الملف واريد استخدامه لفتح ملف الورد الذى له نفس الاسم الموضوج بالسجل المحدد مرفق ملف لعمل الكود المطلوب فى الزر ولكم جزيل الشكر مشروع ملفات الوورد.rar
ابوخليل قام بنشر منذ 9 ساعات قام بنشر منذ 9 ساعات تفضل Private Sub أمر13_Click() Openword (CurrentProject.Path & "\" & Me.id & ".docx") End Sub Sub Openword(Docfile As String) On Error Resume Next Dim GetObjwrd As Object Dim Objwrd As Object Set Objwrd = CreateObject("Word.Application") Objwrd.Documents.Open (Docfile) Objwrd.Visible = True Exit Sub Set Objwrd = Nothing End Sub مشروع ملفات الوورد2.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.