word vba 在文档首输入指定内容?

Question

现在有一个变量,需要输入在打开的文档首,请问代码格式是?
a = excelObject.workbooks("list.xls").worksheets("list").Cells(i, 1)

WordObject.Application.Activate
这里接定位光标到首位,并输入变量A内容

Answer 1

不知道你这个a是怎么定义的，从代码上看像是 个range变量

你可以试试这样的代码：

WordObject.Application.Activate
WordObject.ActiveDocument.Selection.HomeKey Unit:=wdStory
WordObject.ActiveDocument.Selection.Text = a.text

 其中 .Selection.HomeKey Unit:=wdStory 可以实现把光标定位在文档的开始位置

Selection.Text = a.text 是将你的文本插入到光标所在位置

也可以用 selection.typetext=a.text

本回答被网友采纳

Answer 2

试试下面的代码，应该可以解决你的问题。

WordObject.Application.Activate

With ActiveDocument
.Words(1).Select '选择文档的第一个词
.Range.Words(1).InsertBefore a '在文档第一个词前插入 a

End with本回答被提问者采纳

Answer 3

With Selection
    .HomeKey Unit:=wdStory
    .Text = a  '仅限文本
End With