25-05-15, 12:30 AM
أهلا , جرب هذه الطريقة أخي الكريم , ممكن تضبط معك :
كود :
Dim Word_App As Object
Set Word_App = CreateObject("Word.Application")
Word_App.Documents.Add App.Path & "\word1.doc"
Word_App.Visible = True
