J
JC
I need to convert a word .doc to a .tif.
I can do it programatically but dont know how to get the Document Image
Writer window closed.
Heres my code - after it runs, i'm left with the Microsoft Office Document
Imaging window showing my TIF.
______________________-
Dim objWordApp As New Word.Application
Dim sPrinter As String
Dim sSaveFile As String
objWordApp.Documents.Open filename:=sdocpath
sSaveFile = "Test.TIF"
With objWordApp
.Visible = False
sPrinter = .ActivePrinter
.ActivePrinter = "Microsoft Office Document Image Writer on NE00:"
' Convert to a TIF
.ActiveDocument.PrintOut OutputFileName:=sSaveFile
.ActivePrinter = sPrinter
End With
objWordApp.Quit
ConvertToTIF = sdocpath
_____________________
Thanks - Joan
I can do it programatically but dont know how to get the Document Image
Writer window closed.
Heres my code - after it runs, i'm left with the Microsoft Office Document
Imaging window showing my TIF.
______________________-
Dim objWordApp As New Word.Application
Dim sPrinter As String
Dim sSaveFile As String
objWordApp.Documents.Open filename:=sdocpath
sSaveFile = "Test.TIF"
With objWordApp
.Visible = False
sPrinter = .ActivePrinter
.ActivePrinter = "Microsoft Office Document Image Writer on NE00:"
' Convert to a TIF
.ActiveDocument.PrintOut OutputFileName:=sSaveFile
.ActivePrinter = sPrinter
End With
objWordApp.Quit
ConvertToTIF = sdocpath
_____________________
Thanks - Joan