|
Tutorials
|
|
The code below creates a new word document (including the posibility for a template use).
Show/Hidden vbnet code Sub CreateNewWordDoc()
Dim wrdApp As Word.Application
Dim wrdDoc As Word.Document
Dim i As Integer
Dim txtstring As String
Dim txtreplace As String
Set wrdApp = CreateObject("Word.Application")
wrdApp.Visible = True
Set wrdDoc = wrdApp.Documents.Add '("c:\Template.dotx")
wrdApp.Selection.Text = "This new document is created thanks to visiblevisual.com. Enjoy!!"
Set wrdDoc = Nothing
Set wrdApp = Nothing
End Sub
|
