Sub HelloWorld1() Selection.TypeText ("Hello World...") End Sub