8

如何写入 Word 文档中的特定位置,例如第 5 行第 50 个字符?我已经搜索了几个小时,但找不到解决方案。

我在用Microsoft.Office.Interop.Word

4

3 回答 3

4

如果您满足于更简单的句子,而不是行:

ActiveDocument.Sentences(1).Characters(5).Select
Selection.Collapse
Selection.InsertBefore "added "

VBA中的五个段落和50个空格

Selection.Text = String(5, vbCrLf) 
Selection.Collapse wdCollapseEnd
Selection.Text = String(50, " ")

但是,对于特定位置,我更喜欢文本框:

Set sh = doc.Shapes.AddTextbox(1, 10, 344, 575, 80)
sh.Name = "Course1"

具有一些属性:

sh.Fill.Visible = False
sh.Line.Visible = False
sh.TextFrame.MarginLeft = 0#
sh.TextFrame.MarginRight = 0#
sh.TextFrame.MarginTop = 0#
sh.TextFrame.MarginBottom = 0#
于 2012-08-22T11:10:19.577 回答
2

如果您每次都在同一位置插入文本,一个简单的方法是创建一个 .dotx 模板文件,并在该位置添加一个书签。确保模板包含在构建中

Doc = Word.Documents.Add("Directory\Filename")
Doc.Bookmarks.Item("BookmarkName").Range.Text = "Text to be inserted"
于 2013-12-19T17:18:23.003 回答
1

在 Word 文档中查找位置以插入表格

您可以在上述位置找到一些有用的信息。

于 2012-08-22T10:58:32.203 回答