ワードを起動して「あいうえお」の文字を入力します。 Sub Sample29() Dim O As Object Set O = CreateObject("Word.application") O.Documents.Add O.Selection.TypeText Text:="あいうえお" O.Visible = True End Sub