ich habe folgendes Problem: ich muss ein Makro schreiben, dass beim Speichern, im .doc Format, die vorhandenen Feldbefehle durch welche ersetzt, die auch M$ Office lesen kann.
Code: Alles auswählen
dim document as object
dim dispatcher as object
dim test(5) as new com.sun.star.beans.PropertyValue
test(0).Name = "Type"
test(0).Value = ??
test(1).Name = "SubType"
test(1).Value = ??
test(2).Name = "Name"
test(2).Value = "Dokumentinfo:hallo"
test(3).Name = "Content"
test(3).Value = "Dokumentinfo:hallo"
test(4).Name = "Format"
test(4).Value = 0
test(5).Name = "Separator"
test(5).Value = " "
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, ".uno:InsertField", "", 0, test())
Also wenn ich in den Feldbefehl reinschreibe Dokumentinfo:hallo, dass dann der inhalt des Feldes hallo steht.
Das ganze sollte unter OOo 2.4.1 laufen.
Ich weiss, dass man die Dokumentinfo:... Felder mit Type 18 und Subtype 13 bekommt, aber ich brauche Felder, die auch im .doc Format gespeichert werden.
Für alle Antworten danke ich schon mal im Vorraus.
MfG Wolfram