referanslarda MISSING olanları kaldır.
yine referanslarda microsoft word 11.0 object library olanı işaretle.

    Dim objWord As New Word.Application

    ' Word ü aç

    objWord.Visible = True

    'yeni belge

    objWord.Documents.Add

    With objWord.Selection

    'text1 i word e aktar

    .TypeText Text1

    'tümünü seç

    .WholeStory

    'font özellikleri

    .Font.Size = 50

    .Font.Outline = True 'sadece kenar çizgili

    .Font.Italic = True 'eğik

    .Font.ColorIndex = wdBlue 'mavi renk

    .HomeKey Unit:=wdStory 'ctrl Home

    End With

    Set objWord = Nothing