Visual Basic - Abrir Word y crear un doc en blanco

Estoy tratando de crear un documento en blanco de word con VB6, tengo cargadas las librerias de officce y word, lo hago con lo siguiente

Dim x As New Word.Application
Dim y As New Word.Document
Set x = CreateObject("Word.Application")

x.Visible = True
x.Activate
y.Activate

me habre word sin barras de herramientas ni menues y me da error despues y no se como hacerlo

El problema es que tienes que crear el documento de Word. Antes de y.Activate tendrias que hacer:
set y=x.Documents.Add
O opcionalmente indicar la plantilla:
set y=x.Documents.Add("C:\Palntilla.dot")

Saludos.