Visual Basic :: Word Object Document

Error 5180 With Word's Document.Open Method
hello,

I have written a large amount of VBA code for converting a set of word documents to a specific xml format, for web publishing. Unfortunately, my user has changed his word version, for a 2004 one.

The opening of a new word document produces now a 5180 error. This error is due to the lack of an "associate" or "template" document the first one needs. Sorry for being not precise enough, but I use a french version of word, and can't give the corresponding english term.

Can someone help me to force word to open my document, without requiring the other one, since it is not required for the limited work I have to do on the first one.

Thanks for any suggestion

Convert Html To Word Docuemtn Using The Word Document Object
i ant in vb6 to open an html page
and convert and save it as word *.doc
how can i do this?
and is it possible to open the html file from the internet with a give url so i will be :
open html document from www..../1.html -> save as 1.doc
thnaks in advance
peleg

AddPicture Method Word Object Lib
How do I use the Addpicture method of the Word Object Lib to insert pictures into a word document using VB ?

Word Document Object
Hi all,

I am using the below code to enter text into a word document.

W1 is declared as word.application
TextLine is declared as string

The code works fine but it gets a line that is too long and I get a run time error 4609 String too long. Is there a way to go around this?

w1.Selection.TypeText TextLine & vbCrLf

Thank you si much in advance!!

Displaying A Word Object/document In OLE
Hi,

I have code that opens a word object and pushes data into the object from the database via bookmarks. The code then prints the document. I want to adapt the code so that after the bookmarks have been populated, It loads the document into an OLE field on a form so that I can view it before printing. The code below is what I use so far but I cant seem to find how to display the document. Can anyone help please?

Code:
Dim objWordApp As Object 'Word.Application
Dim objDoc As Object 'word document object

'Start a new instance of Microsoft Word
Set objWordApp = CreateObject("Word.Application")

'open the Word template document
Set objDoc = objWordApp.DOCUMENTS.Open(strDocumentToPrint)

'overwrite bookmarks
PassDataIntoWordDoc objDoc
'insert signature
SetPictureBookmark objDoc, "signature", mICommonFU.CRFSignatureFile

'display document
???????? Set oleWindow.object = objWordApp.Activedocument

'close document
objWordApp.Activedocument.Close SaveChanges:=0

Word Document As An OLE Object In Table
Hi, I am storing word documents in a sql table as image (access ole object) and i want to print it in a report.

The problem is that if the document have more than 1 page only the first page is shown and printed in the report. The problem is in the control used... its a dependant object. I tried to modify some properties but all i can do is open the document in MS Word.

But i really need to know if it is possible to print it directly through the report in its entirety...

Thanks and sorry for the spelling...

Embedding Word Document In OLE Object (VB6)
I am trying to embed a word document in an OLE object using VB6.
At the moment my code works but there are a few problems that i am experiencing including -
1. Only the first page of the word document is ever displayed
2. scrollbars are not displayed
3. header and footers are not displayed.

VB Code:
oleWordViewer.CreateEmbed (sDocumentPath) oleWordViewer.SizeMode = 2 With oleWordViewer.object .ActiveWindow.DisplayVerticalScrollBar = True .ActiveWindow.DisplayHorizontalScrollBar = True End With

Would be grateful if any one can help me with this.

Many thanks

James

Word Document As An Object In VB Function
I am using word document as an object in my VB ActiveX DLL program, how should I write it?
I am new to this, please give some example on how to write it.

I try to write VB code as following:

function extractData (wordDocument as Object)
'some code here

end function

The dll file will be used later in ASP program.

Copying A Word Document As An Object
Hi All
       Please can anyone help me with this problem I need to store a document as an object so I can then delete the original document and then paste the copy back when a user has made some changes here is some code from word.

Dim poDoc as Word.Document
Dim poPrinters(20) as Word.Range
dim poRange as Word.Range

    Set poDoc = Application.Documents(1)

    ' Select Document
    Set poRange = poDoc.Content
    poRange.Select

    Set poPrinters(1) = poRange

    poRange.Delete

when the poRange is deleted the poPrinter(1) is deleted as well and help would be great thanks

Edited by - mattman on 10/13/2003 3:18:17 AM

Word Document Object Query?
I've a template that when it runs in one instance it runs the Sub Document_New() ONLY. But in another instance it runs Sub Document_New AND then the Sub Document_Open(). Its quite a complex template that runs a lot of code I can't see any differences in the code thats there. But I was wondering what determines if the Document_New() or/and Document_Open() runs?

Code:
'~~~~~~~~~~~~~~~~~~~~
Private Sub Document_New()
Open_NewDoc
End Sub
'~~~~~~~~~~~~~~~~~~~~
Private Sub Document_Open()
Open_Doc
End Sub
'~~~~~~~~~~~~~~~~~~~~

Word 8.0 Object Library, Go To The End Of The Document
Hi all,

How do I using Word 8.0 Object Library put cursor at the end of the opened document?

Thank you,

Biasha

Quit Method Of MS Word Object Gives Memory Error
Dear Friends ,

I m generating One Report from By Using Visual Basic 6.0 and MS Word Object Library.Creating Object Using CreateObject Method of VB. Word Document is Generated Successfully. But When I m Using Quit Method of It Give A Memory Error (Some Memory Address are not Read) Error Is As Follows

" The instruction at "0x77b2be2e" referenced memory at "0x001c6228". the Memory Could not Be read."

Please Give Me Appropate Solution

Thanks in Advance

Manoj Mevada

Mail ID :
manoj_mevada@tectonas.com

Edit Excel Object In Word Document From VB
I am writing a Visual Basic application that needs to modify an Excel object within a MS Word document. I know how to reference the Word document and modify things within it, but I don't know how to reference the Excel object within the Word document. I copied a section of an existing Excel document and did a "Paste Special" into the Word document (as "Microsoft Excel Worksheet Object"). Then I want to pass an argument to a MS Query that is associated with the Excel part. Am I asking too much? While I'm at it, is it possible to pass an argument to a MS Query within an Excel document from Visual Basic?

so far...

Dim WordApp as Word.Application
Dim WordDoc as Word.Document
Dim ExcelApp as Excel.Application
Dim ExcelObject as ?

Set WordApp = CreateObject("Word.Application")
Set WordDoc = WordApp.Document.Open("test.doc")

Set ExcelApp = CreateObject("Excel.Application")
Set ExcelObject = WordDoc.???????

Update An Worksheet Object In Word Document
hi, how can i update an embedded excel worksheet data in microsoft word? I'm using userform to obtain the user input. For example, i write down "How are you?" within the textbox and press the "ok" button, the value of that textbox should be printed on the embeded excel worksheet (for example at range A1). How can i do that? please help me.

How To Know The File Path Of Embeded Object In A Word Document
Hello sir
I want to know that how we know the file path of the embeded object which is lie on the word document.
Satya

Saving Word Document In Access OLE Object Field
I want to make a dll that could transfer a docment of word in the OLE object of MS Access and user will be able to access that document by double clicking on the field of Access OLE Object Field.
Any Idea!
Zia

Find Whether Selected Object Is Excel Sheet In A Word Document!!!
Hi,
I want my program to detect an excel sheet. Actually I'm developing a parser for word document and I'm moving from Top to End of doc. I'm working on selection property and check for the predefined book marks for line, table, etc.

Code:

Selection.bookmarks.exists(" able")=True

But I've not found any way to detect an excel sheet during parsing. Even bookmarks do not work for excel sheet. Hope I'm clear. Can anyone help me out?

Thanks,
Subha

Creating Word Object And Making It Active Document From Excel
I am writing an Excel macro which opens a hyperlink to a Word file and then prints the file. I can get the program to open the file and I know how to get the macro to print the active document. I need to know how to make the Word file the activedocument to execute ActiveDocument.PrintOut

my code is as follows:

Code:

'Code to file hyperlink and open MS Word File
Range("C14").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
'Code to print out active document
ActiveDocument.PrintOut

But I get an error:

"Run-time Error '424'":
Object required

Any help would be appreciated.

Find Whether Selected Object Is Excel Sheet In Word Document
Hey All,
I want my program to detect an excel sheet.
Actually i am developing a parser for word document...and i am moving from Top to End of Doc. i am working on selction property...and check for the Predefined bookmarks for Line, Table etc.

Selection.Bookmarks.Exists("Table") = True

But i have not found any way to detect an Excel Sheet during parsing. Even Bookmarks do not work for Excel Sheet. Hope I am clear
Can any body help me

How Do I Create An Embedded MSPaint Object Into A Word Document **with Certain Attributes
I'd like to be able to create an embedded MSPaint object into a Word Document.

Sub BMPembed()
'
' Macro recorded Thursday, December 15, 2005 by Room1Box
'
Selection.InlineShapes.AddOLEObject ClassType:="PBrush", FileName:="", _
LinkToFile:=False, DisplayAsIcon:=False
End Sub

The resulting .bmp has these attributes:
Default width = 150, Default Height = 142 (pixels)
Default = full color

Is it possible to change them to width 600, height 250, black and white via scripting ?

/noob

Edited by - EMRhelp.org on 12/16/2005 6:10:06 AM

Opening Word Document From Excel When The Word Document Is Read Only
I'm trying to open a Word document from Excel and have hit a snag. The file I'm trying to access is Read-only and the code stops when the "This file is read-only..." prompt displays. How do I get past this? Here's the code that I have so far (thanks to some help from this forum):

Code:
Sub OpenAndPrint()
Dim wdApp As Word.Application
Dim wdDoc As Word.Document
Dim stPathName As String

stPathName = Range("B4").Hyperlinks(1).Address

If Dir(stPathName) <> "" Then
Set wdApp = New Word.Application
wdApp.Visible = True
wdApp.DisplayAlerts = wdAlertsNone 'Tried to turn off the prompt, but it didn't work.
Set wdDoc = wdApp.Documents.Open(stPathName) 'Code stops here and waits for the user to respond to the prompt.
Set wdDoc = Nothing
Set wdApp = Nothing
Else
MsgBox "The file does not exist!", vbInformation
End If

End Sub

Word Mail Merge Object &"execute&" Method
I am pulling data from various sources and storing them in a temporary table in a MDB file. Then through code I open an invisible instance of Word 2000, open a document with Mail Merge fields in it, set the Mail Merge's datasource with SQL defining records from the MDB file, set the Mail Merge Object to have the "SendToPrinter" property and then invoke the "execute" method. At this point in the program a printer dialog box opens and expects the user to click the "OK" button in order to print the document created through Mail Merge. The problem with this approach is that I am sending thousands of documents to the printer spool so it is impractical to have the user click the printer dialog box "OK" button for each document.

I need a way to have the document automatically sent to the printer spool right after invoking the "execute" method of the Mail Merge Object. It seems like all flow of the program stops once the "execute" method is invoked. I have unsuccessfully tried to use the "Dialogs" collection in Word, the SendKeys statement and the DoEvents function to get the printer dialog box to accept a command from code to simulate that the user hit the "OK" button. I don't care about the fact that the dialog box shows up but I have to find a way to automatically print the document, so I can loop through to repeat the process 4 or 5 thousand times.

I don't know much about sub-classing or hooking, but I believe there could be a solution along those lines. I also thought about but haven't tried to use the "WithEvents" declaration of the Word objects. Any and all help with this problem would be greatly appreciated.

2000 Application.Sendfax
Windows 2000 does not support the use of Application.Sendfax. Does anyone have a workaround or an api call that can be used?

thanks
joe

MS Word 2000: Closing Forms In A Document From Another Document With Code
I have a project, in which I use a global template to manipulate different other templates. In those templates there are Userforms built in to gather information to use in a MailMerge. The problem I'm having is that I want only to hide the forms in the templates themselves, and close them in the global template when the whole application is closed. The trouble is that I can't find a way to access the open forms from the global template. Can anybody help me?

Object Doesnt Support This Object Or Method
i was using the following code:

Dim strBox As String
Dim i As Integer
For i = 0 To (List1.Count - 1)
strBox = strBox & List1.List(i) + vbNewLine
Next i

and I get this error:

object doesnt support this object or method

is there a reference or componet I should have selected to fix this error?

Document Method Not Working
Hi

I copied this code from this forum and it worked yesterday, but doesn't today.

Function hyperlinkInformation()
Dim IE As Object
Dim doc, element
Set IE = CreateObject("InternetExplorer.Application")
IE.navigate "http://www.google.com"
Set doc = IE.document
For Each element In doc.all.tags("A")
Debug.Print element.innerText 'prints the text of the hyperlink
Debug.Print element 'prints the hyperlink itself
'press ctrl-g to see debug window
Next element
End Function

it tells me the document method of object webbrowser2 has failed.

any ideas?

Merging/Importing Word, Excel, Powerpoint And Visio Files Into A Word Document
Does anyone know how to do this or know of a website that has source code that does this? I can't find anything anywhere.

Each Page/Worksheet/Slide goes on a seperate page. Print formatting is retained (landscape/portrait) and if the imported Page/Worksheet/Slide is larger than the page im merging/importing to, it should auto-resize to fit the page.

Thx.

Reading The Word Document From Visual Basic Without Opening The Word Applicaiton
Hi

I need to access the word document from visual basic without opening the word application. I can do this by opening the word application. Is there any other way to read a document from vb.

I need to search for a particular word in the document without opening the word application.

Waiting for your reply,

thanks

Mohan

Merging Word, Excel, Powerpoint And Visio Files Into A Word Document
Does anyone know how to do this or know of a website that has source code that does this? I can't find anything anywhere.

Thx.

I posted this in VB General but then i saw this forum so I wasn't sure where it belonged and posted in both. Reply to either one.

Error 4605 Calling Word.Document.Save With Word 2002 SP1
I have a test VB6 exe project with a WebBrowser control, called web1 (added via Project, Components, Microsoft Internal Controls). My project also references the Microsoft Word 10.0 Object Library.

As well as the WebBrowser control, my form has a Save button (cmdSave). Here is the complete code:

Code:

Private g_objDocument As Word.Document

Private Sub cmdSave_Click()
g_objDocument.Save
End Sub

Private Sub Form_Load()
Dim strFileName As String
strFileName = App.Path & "WordWrapper.doc"
web1.Navigate strFileName
End Sub

Private Sub web1_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
Set g_objDocument = pDisp.Document
End Sub

The idea is when I run the exe, it loads a Word document into the WebBrowser control. This document is also assigned to
a global Word.Document object, g_objDocument, when web1 navigates to it. The problem occurs when I try to save the document (in cmdSave_Click). I get the error:

"The Save method or property is not available because this document is in another application."

This error occurs with Word 2002 SP 1 (on Windows XP), but not with Word 2000 SP3.

Please help.

Document.Save Method - Return Value ??
Hi there,

i am writing an Office plugin and need to save any office document (if not saved) before using it for my plugin.

I am using the document.Save method, but if the user presses 'Cancel' instead of OK, a runtime error occurs.

I am planning on implementing a check on the return value of that Save call (i.e. like the DoModal() function on CFileDialog in VC++ returns IDCANCEL or IDOK), but I have not been able to find any documentation on how to do this (i'm primarily a c++ programmer, not vb) and what the return values can possibly be. I presume it's somewhat similar to the C++ calls/values but all my attempts failed so far.

Any info on this or links to office97/2000 development references in VB(A) would be appreciated a lot.

Thanks in advance,
Jeffrey

Load Word Document In VB Form And Use Word's Zoom Features - Help
Hi

I've this VB6 application where I can opt to load a word document or scaned 8X11 image of a paper form on the VB form and let user write or draw using a tablet. Since screen doesn't have enough space to show complete form at one time, I need to zoom it down to fit the screen so it get mapped properly with tablet. Once user is done drawing or writing, I need to bring the document or image back to original size and print it or save it.

I don't know where to start. Plese guide me about the best way to accomplish this. Thanks.

Load Word Document On VB Form And Use Word's Zoom Fetrures - Help
Hi

I've this VB6 application where I can opt to load a word document or scaned 8X11 image of a paper form on the VB form and let user write or draw using a tablet. Since screen doesn't have enough space to show complete form at one time, I need to zoom it down to fit the screen so it get mapped properly with tablet. Once user is done drawing or writing, I need to bring the document or image back to original size and print it or save it.

I don't know where to start. Plese guide me about the best way to accomplish this. Thanks.

VB In Access To Find And Format A Word In A Mailmerged Word Document
I use my Access data base to create mail merged letters to our customers. Not only are the names etc stored on the database I also store the content of the letter in memo fields. I have occasions where I want the newly created letter to have some words bold. After having VB code open the main document, mail merge then close the main document I run the following code. It works the first time round, the specified word becomes bold. However after closing the letter and running it a second time the new letter opens but no changes are made and I get an error. "Run Time error '462' : The remote server machine does not exist or is unavailable". This gives me a Debug option. When selecting debug The first row in this code is selected.

With ActiveDocument.Content.Find

    .ClearFormatting
    .Font.Bold = False
    .MatchCase = True
    .Text = "SATURDAY"
    With .Replacement
        .ClearFormatting
        .Font.Bold = True
        .Text = "SATURDAY"
    End With
    .Execute Format:=True, Replace:=wdReplaceAll
End With

If I leave the new letter open and re run it the code opens a second new letter with no errors, however it does not make the changes to the newest document only the first new document it finds. ie If I then close the first one created and rerun it the second document will have the changes made and the third one does not change. The error only occurs once I have closed all new documents and try to open another letter.

Hope someone can help

MSAccess Database DOA

Word Automation - Retaining The Numbering Format In New Word Document
Hi all,

I am using word automation to read a word document. I use word automation to read the word document page by page and paste the contents of each page in a new document.

The problem i am facing is, the word document which is read contains Heading1,Heading 2 etc and these are numbered. When I paste these pages onto a new document the numbering is not retained. (Eg., if my Heading1 number is 2.1 when i paste it in a new document the Heading1 number is shown as 1.1)

VBA: Creating Word, And Sending Data To A Word Document Using Ranges
The following code works fine when it is executed only once in any instance of the VB program.

It is OK provided I do not close Word, and it will create multiple instances of the document into the same instance or word.

Screen.MousePointer = 11
GetWord2
WordApp.Documents.Open ("C:Program FilesWill WizardTemplatesClauseLib.doc")
set MyDoc = Documents.Open(FileName:="C:Program FilesWill WizardTemplatesClauseLib.doc")
set FldRng(1) = MyDoc.Range(Start:=MyDoc.Bookmarks("Name").Range.End, End:=MyDoc.Bookmarks("NameEnd").Start - 1) 'read bookmarks into range object variables
FldRng(1).Text = ClauseHold 'put the stuff into the document
WordApp.ActiveDocument.SaveAS FileName:=("C:Program FilesWill WizardTemplates emp" & Trim(Str(TMPNum)) & ".doc")
WordApp.Application.Activate
WordApp.Visible = true
set WordApp = nothing
set MyDoc = nothing
Screen.MousePointer = 0
Command8.Enabled = true
Exit Sub

If Word is closed, and the code is executed again, an error occurs "the remote server machine does not exist or is not available" The only remedy for this is close and re-start the VB application containing this code.

The GetWord2 et-al Function codes are: (which is stored in a module)

option Explicit
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (byval lpClassName as string, byval lpWindowName as string) as Long
Declare Function SendMessage Lib "user32" Alias "SendMessageA" (byval hwnd as Long, byval wMsg as Long, byval wParam as Long, byval lParam as Long) as Long
public WordApp as Word.Application
public WordWasNotRunning as Boolean ' Flag for final word unload

public Sub DetectWord()
' Procedure detects a running Word and r
' egisters it.
Const WM_USER = 1024
Dim hwnd as Long
' If Word is running this API call retur
' ns its handle.
hwnd = FindWindow("OpusApp", vbNullString)
If hwnd = 0 then ' 0 means Word Not running.
Exit Sub
else
' Word is running so use the SendMessage
' API function to enter it in the Running
' Object Table.
SendMessage hwnd, WM_USER + 18, 0, 0
End If
End Sub
public Sub GetWord2()

' Test to see if there is a copy of Micr
' osoft Word already running.
on error resume next ' Defer error trapping.
' Getobject function called without the
' first argument returns a
' reference to an instance of the applic
' ation. If the application isn't
' running, an error occurs.
set WordApp = GetObject(, "Word.Application")
If Err.Number <> 0 then
WordWasNotRunning = true
else
WordWasNotRunning = false
End If
Err.Clear ' Clear Err object In Case error occurred.
' Check for Microsoft Word. If Microsoft
' Word is running,
' enter it into the Running Object table
' .
DetectWord
If WordWasNotRunning = true then
'set the object variable to start a new
' instance of Word.
set WordApp = new Word.Application
End If
' Show Microsoft Word through its Applic
' ation property. then
' show the actual window containing the
' file using the Windows
' collection of the MyWord object refere
' nce.
WordApp.Visible = true
WordApp.Application.WindowState = wdWindowStateNormal
Screen.MousePointer = vbDefault
End Sub

do I need to close the document? = deactivate something?

I would like a code example on how to fix the above, else, any suggestions, ideas...

Jason.

A Search Of A Word Document And .XLS Document
Hello,
I need to search a word document for time values that look like this 13:43:42. Find them in a spreadsheet document. Once found there are 3 columns of data in the .xls that correspond to the time. This then needs to go into a .txt file. Then need to search the word document again for the next time and do again. When done the final .txt file should have the time and cooresponding data across the page. Who out there can put this together to run in a macro?

Word Document (*.DOC) And WordPad Document (*.DOC) ?
Hi,

I need to identify that a document file (*.DOC) is a Word document or a WordPad document in me program. Because WordPad can not open always a file (*.DOC) which can be openned by WORD.

Thanks

nYU

Word: Counting A Specific String In A Word Document
Hi all,

After visiting the Word FAQ I couldn't find any clue for my query:
I would like to count (in VB) how many times the string "Yesterday"
appears in a word document I am working on.

By using the manual Replace function (replacing "Yesterday" by "Yesterday"),
Word tells you how many replacement it has done and therefore how many
instances of the string "Yesterday" were in the document.

Can anyone point me in the right direction about using VB to find out
how many times "Yesterday" appears in my document, please?

Many thanks
Francois

Can I Insert A Word In The Cursor Position In A Word Document
I use this statement in VBA2000:

ActiveDocument.Content.InsertAfter ("USA")

but it alwasy insert at the end.

How can I insert a word in the cursor position?

Selecting A Particular Word From A Word Document (.doc) Through Visual Basic 6
I am a developer using Visual Basic 6. One of my program accepts some values through text boxes and then creates a Word document. The text boxes are optional, and the created Word document contains only non-empty values along with appropriate labels. I am able to apply styles (bold and underline) to entire paragraphs. But the user wants me to apply bold formatting only to values entered by him and not to the labels which describe those values. Please help me.

Thank You.

Lalit Kumar Barik
India

ADO Command Object Returns A &"Method 'Execute' Of Object '_Connection' Failed&" Error
Hi you all,
I have a VB6 app using an Access XP back end.
I Use a function which returns a Read Only, Disconnected ADO Recordset (used to populate lists, combos etc. using minimal resources).
I use it all the time without a hitch.
It started returning a "Method 'Execute' of object '_Connection' failed" error called with a SQL which works just fine when it's used as a query in the Access DB.
Why should the Execute method fail if the SQL works well in Access' Query design window?
Any help will be highly appreciated.
Thanx!
Guy

The function is:
Function GetDisconnectedRS(ByVal sSQL As String) As ADODB.Recordset
Dim adoRS As New ADODB.Recordset
Dim ucmdGetDisconnectedRS As ADODB.Command

Set ucmdGetDisconnectedRS = New ADODB.Command
With ucmdGetDisconnectedRS
.ActiveConnection = oConnect.ConnnectionObject
.CommandType = adCmdText
.CommandText = sSQL

Set adoRS = .Execute()

End With

Set adoRS.ActiveConnection = Nothing
Set GetDisconnectedRS = adoRS

SQL:
SELECT at.ActualTestID, at.PatientID, at.TestID, at.atDate, t.testDescription, p.patFirstName, p.patSurname
FROM (tblActualTests at INNER JOIN tblTests t ON at.TestID = t.TestID) INNER JOIN tblPatients p ON at.PatientID = p.PatientID WHERE at.atDate BETWEEN #02/08/2007# AND #02/08/2007# AND Not atDone
ORDER BY at.atDate DESC, at.TestID, p.patSurname

Just a note: The function works fine few code statements before it fails, with SQLs such as "SELECT DISTINCT patFirstName FROM tblPatients ORDER BY patFirstName".
I've tryed to run "SELECT * FROM tblActualTests" and it does work but hey, what's wrong with a few Joins?
And besides which the function didn't fail me in the past with much more complex SQLs.

Thanx,
Guy

Open A Document Word From A Template Of Word
Hello, I'm working in Visual Basic 6 and I want open a document word. But this document must be from a template of word (its name is Informe).

I do it with the code
Dim objWord As Word.Application
Dim objDoc As Word.Document

Set objWord = New Word.Application
Set objDoc = objWord.Documents.Add("C:Informe.dot")

It's ok but I only see the document, I want to see the menus of word,....
If it isn't possible can you send me the code to print this document?

Thank's and sorry for my poor english

Word Form >> Process >> Word Document
Please be gentle, as this is my first foray into VBA. To make matters worse, I'm not a programmer, just someone who needs to get something done. My guess, based on what I want to do, it that I can do it easiest in VBA, but I am hoping this forum will help flesh out that answer for me.

In a nutshell, I am trying to create a document (possibly a Word form?...) that has a definite format with fields to be filled in (mostly numberic values, checkboxes, or free text). This form will be filled out by our techs at a customer site. They may do this 'live' with Word open, or they may print it out, then fill in the document later from their handwritten copy.

Next, I would like to 'process' their answers by feeding some information directly into an output document (Word hopefully). Now, some fields like name, address, etc... will go straight over and don't require manipulation. Some other data will need to be processed.

For example, if the tech fills in 34, I might want the output document to put 'this text' under a certain heading. If it is >34, then some other text, less, maybe no text. I'd also like to be able to change some graphics based on limits. i.e. if the value is less than this, insert this picture into the output document at a specific location, if not, insert this picture.

So, in general, before I go down the road of learning a language... do the members here think VBA would be a good choice for this? Would I 'read' from the input document in Word Excel, process in Excel and then pump data out to the output docment, etc... I am looking for advice whether this is;

1. fairly straightforward, understanding that I would need to learn some VBA.
2. possible
3. a good choice. i.e. would another language, or a pre-done software make a better choice.

My contraints are that my company has Office 2000 rolled out, WITHOUT Access. We use Lotus Notes and Access is apparently frowned upon. I am an optimist, so I expect it's possible with careful design and help from the experts who've been down these roads before.

Thanks in advance for any help, insight, advice or code.

Regards,
John

Word Object Document - Sendfax Method

I have got the microsoft fax server installed, though when I try and use the sendfax method of an open word document, no error message is return but nothing happens. Has anyone had any experience of this.

Edited by - RoystonC on 5/14/2003 3:17:14 AM

Word Object Document - Sendfax Method

I have got the microsoft fax server installed, though when I try and use the sendfax method of an open word document, no error message is return but nothing happens. Has anyone had any experience of this.Edited by - RoystonC on 5/14/2003 3:17:14 AM

I have got the microsoft fax server installed, though when I try and use the sendfax method of an open word document, no error message is return but nothing happens. Has anyone had any experience of this.

Edited by - RoystonC on 5/14/2003 3:17:14 AM