エクセルでワードを開き、文字を入力する

    '事前に[参照設定]で「Microsoft Word 11.0 Object Library」をチェックします。
    'verは変更になっていることもあるので、
    'それらしい物を探してみましょう。
   
    '変数の宣言
    Dim wdObj    As New Word.Application
    Dim wdDoc    As Word.Document
    Dim wordFile As String
   
    '操作するワードのファイル名をパス名付きで設定します
    wordFile = "C:\Documents and Settings******pathを入れる*******\test word.doc"
   
    'ワードを開きます
    wdObj.Visible = True
    wdObj.Documents.Open wordFile
   
    '入力開始
    wdObj.Selection.TypeText Text:="てすと"
   
    'ワードを閉じます
    wdObj.Quit