Callling Word fronm Excel
 

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

Callling Word fronm Excel
 

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

Callling Word fronm Excel
 

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

Callling Word fronm Excel
 

"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

Callling Word fronm Excel
 

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

Callling Word fronm Excel
 

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.