Hey zusammen,
kann mir jemand folgenden Codeschnipsel erklären? Ich weiß, das einen Serienbrief in Word erstellt. Aber ich möcht auch gern den Code verstehen, kann mir jemand helfen?
Dim wordobj As Variant
Dim worddoc As Variant
path = GetPath()
path = path + "\Namensschilder.doc"
Set wordobj = CreateObject("Word.Application")
wordobj.Documents.Open(path)
Set worddoc = wordobj.ActiveDocument
wordobj.Visible = True
worddoc.MailMerge.MainDocumentType = wdFormLetters
Call worddoc.MailMerge.OpenDataSource("C:\Data.doc")
worddoc.MailMerge.SuppressBlankLines = True
Call worddoc.MailMerge.Execute(True)
Call worddoc.Close