[求助]关于VBA和Word的问题，请指教

groovy

Private Sub CommandButton1_Click()
Option Explicit
Dim wrdapp As word.Application
Set wrdapp = New word.Application
With wrdapp
.Visible = ture
.Documents.Add
.ActiveDocument.content.Text = "Hi"
.ActiveDocument.content.Text = "This is a test example"
End With
End Sub

以上代码我输到了VBA的CommandButton控件中了，
可是不管用啊，提示有错误，无效编译过程
是不是跟VB调用Word不同啊
应该怎么写那
还有用word编写计算书时，要想在word中的特定位置放置特定的文本，需要有一个bookmark标记，就是要建立一个模板，不知道这个模板应该怎么样建啊，有没有现关的电子教程，发一个，学习学习。谢谢

wyj7485

首先要引用word类型库

groovy

首先要引用word类型库？是什么意思啊？能不能说得详细一点，最好给个生成word文件中有一两行文字的例子，

word模板文件倒是知道怎么建，根据自己的需要把一些VBA中不能输入的字符先输入进去就行了，我是这个意思。就是不知道怎么用VBA引用WORD模板文件。

waley111

不需要前期引用word类型库的方法

Dim wd As Object
Dim doc As Object
Dim rng As Object

Set wd = CreateObject("word.Application")

'Set wd = New word.application

Set doc = wd.Documents.Add

 Set rng = doc.Content
 
'Clipboard.SetText Text1.Text
'
'rng.Paste

doc.range.Insertafter "小把戏" & Chr(13)

doc.range.Insertafter "nknklklmlkm小人物" & Chr(13)

doc.SaveAs App.Path & "\aaa.doc"

doc.Close

Set wd = Nothing
Set doc = Nothing

End Sub

groovy

doc.SaveAs App.Path & "\aaa.doc"

这句提示错误，要求对象

什么意思？楼上的语句达到一个什么样的效果？