Hallo in die Runde,

bin vielleicht ein bisschen spät mit der Lösung möchte aber noch eine  weitere Lösung zeigen.

Man kann über die Variablen  

   doc.PartDocumentation.Title         = Title
   doc.PartDocumentation.Note1      = "Text 1"
   doc.PartDocumentation.Note2      = "Text 1"

   doc.PartDocumentation.Author     = "Programmierer"
   doc.PartDocumentation.Comments   = "Bemerkung"
   doc.PartDocumentation.Revision   = "Aenderungsnr"
   doc.PartDocumentation.Company    = "Muster Firma"
   doc.PartDocumentation.PartNumber = Teilenummer
   doc.PartDocumentation.SetPreviewPicture()
   doc.PartDocumentation.PreviewPictureIsSet()

die jeweiligen Texte werden wie im Bild zusehen im Punkt Datei /Information eingegeben

Dann mit einen BAS-Makro in P-Variabeln schreiben