Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() I am stumped. I am running the below code to print a mail merge. Excel stars word , the mail merge macro in word runs and prints but Excel opens debugger and halts at .Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") witrh the comment "Word can not open this file" What am I missing here. Thanks in advance Duane Sub ControlWordFromXL() Dim objWord As Word.Application 'Set objWord = New Word.Application With objWord .Visible = True .Activate .WindowState = wdWindowStateMaximize .Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") End With End Sub |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() It worked for me after removing the comment ( ' ) in front of Set. (I used a correct file path/file for my system) Also, it is a good idea to set object variables to nothing when using automation... Add this line just before End Sub... Set objWord = Nothing -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware (Excel Add-ins / Excel Programming) "Duane Reynolds 322310" wrote in message I am stumped. I am running the below code to print a mail merge. Excel stars word , the mail merge macro in word runs and prints but Excel opens debugger and halts at .Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") witrh the comment "Word can not open this file" What am I missing here. Thanks in advance Duane Sub ControlWordFromXL() Dim objWord As Word.Application 'Set objWord = New Word.Application With objWord .Visible = True .Activate .WindowState = wdWindowStateMaximize .Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") End With End Sub |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
It runs and executes just fine on my system but opens debug and highlights
that one line leaves excel open Duane "Jim Cone" wrote in message ... It worked for me after removing the comment ( ' ) in front of Set. (I used a correct file path/file for my system) Also, it is a good idea to set object variables to nothing when using automation... Add this line just before End Sub... Set objWord = Nothing -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware (Excel Add-ins / Excel Programming) "Duane Reynolds 322310" wrote in message I am stumped. I am running the below code to print a mail merge. Excel stars word , the mail merge macro in word runs and prints but Excel opens debugger and halts at .Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") witrh the comment "Word can not open this file" What am I missing here. Thanks in advance Duane Sub ControlWordFromXL() Dim objWord As Word.Application 'Set objWord = New Word.Application With objWord .Visible = True .Activate .WindowState = wdWindowStateMaximize .Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") End With End Sub |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() "but opens debug and highlights that one line leaves excel open" Huh... What line? There is nothing in your posted code that closes Excel, why wouldn't it still be open? -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware (Excel Add-ins / Excel Programming) "Duane Reynolds 322310" wrote in message It runs and executes just fine on my system but opens debug and highlights that one line leaves excel open Duane |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Sorry next line after that sub is Application.quit but it stalls at
.Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") with this line highlighted in yellow in debug. "Jim Cone" wrote in message ... "but opens debug and highlights that one line leaves excel open" Huh... What line? There is nothing in your posted code that closes Excel, why wouldn't it still be open? -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware (Excel Add-ins / Excel Programming) "Duane Reynolds 322310" wrote in message It runs and executes just fine on my system but opens debug and highlights that one line leaves excel open Duane |
#6
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() Your posted code should be all on one line (not two lines). If that is not the problem then the file path and/or file name is probably incorrect. '-- ..Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware (Excel Add-ins / Excel Programming) "Duane Reynolds 322310" wrote in message Sorry next line after that sub is Application.quit but it stalls at .Documents.Open ("D:\Duane Docs\Inspection_Report_browser_Merge2008_Fields.do c") with this line highlighted in yellow in debug. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Need Excel count of 1 word if found in multi-word cells of column | Excel Worksheet Functions | |||
Copy from Word to Excel, and retain indent, plus word wrap | Excel Discussion (Misc queries) | |||
Import cells from excel into word and create multiple word docs | Excel Programming | |||
Printing Word Document using Excel Programming hangs Word | Excel Programming | |||
How do I determine a Function's callling Row Number. | Excel Programming |