Fill Word-template fields

[steven]

Hello,

I've created a Word-template for a letter. I've made some fields in the
template (such as 'customer number', 'name', ...) as follows: insert
field - DocVariabele with name 'customer number' and 'name'. Now I want
to fill these fields from my application and print them:


Dim myWord As New Word.Application
myWord.Documents.Add("c:\template.dot")
'fill the fields
'...
'print
myWord.ActiveDocument.PrintOut()
myWord.Quit(Word.WdSaveOptions.wdDoNotSaveChanges)


So what code is needed before I print the document to fill my template
fields?

Thanks

Steven

 

[Robin Tucker]

You can read/write the document variables collection. Something like this:
(might not be exactly like this!):


For i as Integer = 0 To TheDocument.Variables.Count


Select Case theDocument.Variables.Item(i).Name

Case "a_name"

theDocument.Variables.Item(i).Value = "test"

End Select


Next


Something to note: make sure you clean up all references correctly

 

[Herfried K. Wagner [MVP]]

Dim myWord As New Word.Application
myWord.Documents.Add("c:\template.dot")
'fill the fields
'...
'print
myWord.ActiveDocument.PrintOut()
myWord.Quit(Word.WdSaveOptions.wdDoNotSaveChanges)

So what code is needed before I print the document to fill my template
fields?

\\\
Option Strict Off
..
..
..
Dim WordApp As Object = CreateObject("Word.Application")
Dim WordDoc As Object = WordApp.Documents.Open("C:\Hallo.doc")
WordDoc.FormFields("Text1").Result = "Bla"
WordDoc.Save()
WordDoc.Close()
WordApp.Quit()
///

 

[steven]

\\\
Option Strict Off
.
.
.
Dim WordApp As Object = CreateObject("Word.Application")
Dim WordDoc As Object = WordApp.Documents.Open("C:\Hallo.doc")
WordDoc.FormFields("Text1").Result = "Bla"
WordDoc.Save()
WordDoc.Close()
WordApp.Quit()
///

Thanks for the tip, but my document doesn't seem to have any items in
the 'FormFields' property, and neither does the 'Fields' and the
'Variables' property. Are there any other properties to look at?

Thanks in advance.

Steven

 

[steven]

You can read/write the document variables collection. Something like this:
(might not be exactly like this!):


For i as Integer = 0 To TheDocument.Variables.Count
Select Case theDocument.Variables.Item(i).Name
Case "a_name"
theDocument.Variables.Item(i).Value = "test"
End Select
Next


Something to note: make sure you clean up all references correctly

Thanks for the tip, but my document doesn't seem to have any items in
the 'Variables' property, and neither does the 'Fields' and the
'FormFields' property. Are there any other properties to look at?

Thanks in advance.

Steven

 

[steven]

Thanks, that worked (eventually) great.

Steven

\\\
Option Strict Off
.
.
.
Dim WordApp As Object = CreateObject("Word.Application")
Dim WordDoc As Object = WordApp.Documents.Open("C:\Hallo.doc")
WordDoc.FormFields("Text1").Result = "Bla"
WordDoc.Save()
WordDoc.Close()
WordApp.Quit()
///