Pegar de de qualquer formato

meu amigos boa noite.
monte junto com outro  codigo que eu abro por esse link abaixa, mas ele do abre no formato .doc e não docx ...
como eu faço para ele abrir em diferentes formatos para que não seja necessário instalar runtime,

Código:

LWordDoc = "C:\Eclesis\Cartas\carta_de_apresentação.docx"
If Dir(LWordDoc) = "" Then
    MsgBox "O documento não existe, talves tenha deletado", vbInformation, "Eclesisis"

Else
'Create an instance of MS Word
Set oApp = CreateObject(Class:="Word.Application")
oApp.Visible = True

'Open the Document
oApp.Documents.Open FileName:=LWordDoc
MsgBox "O documento não existe, talves tenha deletado", vbInformation, "Eclesisis"

End If

Bom día Crysostomo!

Tenta assim:

Código:

Call Shell("C:\Program Files\Microsoft Office\root\Office16\Winword.exe ""C:\CaminhoDocumento\Arquivo.docx""", 1)

Saludos

Boa tarde meu amigo, ai não tem como pois so vai pegar o documento com  a extensão .docx
mas acho que idependente dos documentos será necessário a implantar o runtime da versão pro acess rodar