Modificar o título de um documento no Writer

[RonaldoElias]

Boa noite, gostaria de um código para alterar o título de um documento Modelo (.ott) do Write.
Desde já, agradeço.

[schiavinatto]

Creio que é mais fácil localizar o diretório do arquivo e alterar manualmente.

Os modelos padrões estão no diretório /Share/template/common…

[RonaldoElias]

Descobri!!! veja o código:

Sub BarraTitulo
		Dim AlterarTitulo as Object
		AlterarTitulo = ThisComponent.CurrentController
		AlterarTitulo.Frame.Title = "Novo Título"
End Sub