VB高手请进

用word建立一个模板.dot，相关位置插入书签

Private Sub Form_Load()

Dim objwd As Word.Application
Dim objdoc As Word.Document
Dim re As Integer

Set objwd = New Word.Application
objwd.Visible = True
Set objdoc = objwd.Documents.Add("f:\JJ.dot")

objdoc.Bookmarks("bh").Range.Text = "030205"
objdoc.Bookmarks("jjr").Range.Text = "黄地点"

re = Dialogs(wdDialogFileSaveAs).Display
If re = 0 Then
objdoc.Activate
Else
objwd.Visible = False
objdoc.SaveAs
objdoc.Close False
End If
objwd.Quit False

End Sub

搞什么WORD表格呀，如果要做报表，VB里面就有，而且也方便；如果只是为了要在WORD中添加内容，完全可以用WORD里面的VBA来实现，语法就是VB，不知道楼主是否愿采纳本人意见。