Das Notes Forum
Lotus Notes / Domino Sonstiges => OLE/COM-Programmierung => Thema gestartet von: Matthias22 am 25.04.08 - 11:01:32
-
Hallo,
ich habe eine Anwendung wo Notesdaten ins Worddokument per Textmarken eingetragen werden, dies funktioniert sehr gut.
Dabei werden u.a. auch die Eigenschaften des Worddokumentes ausgelesen:
...
'Worddokument
Set application = GetObject(FilePath, "Word.Document")
application.Application.Visible = True
Set ActiveDocument = application
application.Application.Visible = False
...
'Auslesen der Eigenschaften
For i = 1 To sPropCount
sProp = ActiveDocument.CustomDocumentProperties(i).Name
Select Case sProp
....
End Select
Next
...
Nun zu meiner Frage,
können diese bestehenden Eigenschaften des Worddokumentes auch per LotusScript geändert werden
bzw. können auch neue Eigenschaften eingetragen werden!
Vielen Dank für Eure Antworten!
Gruß
Matthias
-
... Google dich mal durch - bei Microsoft kannst du erfahren, welche Eigenschaften gesetzt und welche nur gelesen werden...
Toni
*** edit ***
hier der Link zu => Microsoft (http://msdn2.microsoft.com/de-de/library/microsoft.office.interop.word._document.customdocumentproperties(VS.80).aspx)
-
.... und hier noch ein Link zum modifizieren => Microsoft (http://msdn2.microsoft.com/en-us/library/dhxe2d75(VS.80).aspx)
Toni
-
Hallo Toni,
vielen Dank für Deine schnellen Antworten, die mich auf die richtige Spur gebracht haben.
Hier noch die Lösung für meinen Fall:
...
ActiveDocument.CustomDocumentProperties(i).Value = "neuer Inhalt"
...
Gruß
Matthias
-
noch eine Ergänzung,
für neue Eigenschaft vom Typ Text
...
ActiveDocument.CustomDocumentProperties.Add "NeueEigenschaft",False,"4", "neuer Inhalt"
...
Gruß
Matthias