OpenOffice - Abrir archivo doc con VBA y OpenOffice

Hola a todos

Un cliente nuestro quiere pasarse de MS Office a OpenOffice y tenemos que averiguar como abrir, usando scripts de VBA, los documentos que tiene pero en lugar de con MS Word con OpenOffice wRITER. Los scripts están creados desde hace años y funcionan, así que supongo que habrá poco que cambiar. Por si alguien le quiere echar un vistazo esta es la parte del script que abre el doc en Word:

If filesys.FileExists(Archivo) Then
Set appWord = CreateObject("Word.Application")
set docWord = appWord.Documents.Open(Archivo, , True, , "Libertybell")
appWord.Visible = false
For Each parWord In docWord.Paragraphs
Document.Write(parWord.Range.FormattedText)
Document.Write("<br/>")
Next
appWord.quit
else
Document.Write("<br/>")
Document.Write("El Documento no existe:")
Document.Write("<br/>")
Document.Write(Archivo)
Document.Write("<br/>")
End If

Creemos que con cambiar el CreateObject("Word.Application") por su equivalente en OpenOffice será suficiente. Si alguien sabe la solución nos sería de gran ayuda.

Un saludo.