Visual Basic - abrir documento

Hola a todos tengo un problemilla estoy tratando de abrir un documento de word pero no puedo utilizo lo siguiente espero me puedan ayudar

Dim ApWord As Word.Application
Dim docword As Word.Documents
Dim Hoja As Word.Document
Dim ruta As String

ruta = App.Path & "\credencial.doc"
Set ApWord = CreateObject("Word.Application")
Set docword = ApWord.Application
docword.Open (ruta)
ApWord.Visible = True
¿Por queeeeeeeeeeeeeee? : -(

Declarás docword como un Word Documents y luego le asignás una Aplicación. Ese es el error.
Debés asignarle un Objeto Documents

Dim ApWord As Word.Application
Dim docword As Word.Documents
Dim Hoja As Word.Document
Dim ruta As String
ruta = "D:\Documents and Settings\Documentos \disponibles.doc"
Set ApWord = CreateObject("Word.Application")
Set docword = ApWord.Documents
docword.Open (ruta)
ApWord.Visible = True

Voilâ