Hay dos formas de averiguar en tiempo de ejeción desde visual basic ( por lo menos las que conozco) para saber si está instalado el word
Una es mediante el registro
La otra, es crear una referencia en tiempo de ejecución, si te da un error en el momento de crearla es por que no pudiste acceder por que no está instalada
On Error Resume Next
Set ObWord = CreateObject("Word.Application")
If Err Then
MsgBox "no está instalado", vbInformation
Else
MsgBox "está instalado", vbInformation
err.clear 'Limpia el error
End If
..espero que te sirva .saludos
Recursos visual basic