Error message when opening a .doc file using excel macro
Morning,
I have created a macro in excel that when the user clicks a "done" button a word document is opened from a shared drive. this is what i have so far: ------------------------------------ Dim x As String Dim wordApp As Object ThisWorkbook.Save x = Range("A156") Set wordApp = CreateObject("Word.Application") wordApp.Documents.Open "\\Flcscsrv02\share\Mercury Transactions\Test Docs\ " & x & "\Test word document.doc" ------------------------------------ when i run the macro the first time, nothing happens. when i run it a second time, i get the "File in Use" pop up. Where am i going wrong here? -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200703/1 |
Error message when opening a .doc file using excel macro
Set wordApp = CreateObject("Word.Application")
wordApp.Visible = True -- Tim Williams Palo Alto, CA "GainesvilleWes via OfficeKB.com" <u32072@uwe wrote in message news:6f38f9987ede1@uwe... Morning, I have created a macro in excel that when the user clicks a "done" button a word document is opened from a shared drive. this is what i have so far: ------------------------------------ Dim x As String Dim wordApp As Object ThisWorkbook.Save x = Range("A156") Set wordApp = CreateObject("Word.Application") wordApp.Documents.Open "\\Flcscsrv02\share\Mercury Transactions\Test Docs\ " & x & "\Test word document.doc" ------------------------------------ when i run the macro the first time, nothing happens. when i run it a second time, i get the "File in Use" pop up. Where am i going wrong here? -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200703/1 |
Error message when opening a .doc file using excel macro
Hi
Try Dim x As String Dim wordApp As Word.Application Dim myDoc As Word.Document ThisWorkbook.Save x = Range("A156") Set wordApp = CreateObject("Word.Application") wrdApp.Visible = True Set myDoc = wordApp.Documents.Open "\\Flcscsrv02\share\Mercury Transactions\Test Docs\ " & x & "\Test word document.doc" myDoc.Activate regards Paul On Mar 15, 3:20 pm, "GainesvilleWes via OfficeKB.com" <u32072@uwe wrote: Morning, I have created a macro in excel that when the user clicks a "done" button a word document is opened from a shared drive. this is what i have so far: ------------------------------------ Dim x As String Dim wordApp As Object ThisWorkbook.Save x = Range("A156") Set wordApp = CreateObject("Word.Application") wordApp.Documents.Open "\\Flcscsrv02\share\Mercury Transactions\Test Docs\ " & x & "\Test word document.doc" ------------------------------------ when i run the macro the first time, nothing happens. when i run it a second time, i get the "File in Use" pop up. Where am i going wrong here? -- Message posted via OfficeKB.comhttp://www.officekb.com/Uwe/Forums.aspx/excel-programming/200703/1 |
All times are GMT +1. The time now is 04:19 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com