如何將文本添加到Word文檔的特定位置？

如何寫入Word文檔中的特定位置，例如第5行，第50個字符？我搜索了幾個小時，但找不到解決方案。如何將文本添加到Word文檔的特定位置？

我使用Microsoft.Office.Interop.Word

2012-08-22 Mahboobeh Mohammadi

如果您的內容與更簡單的句子，而不是行：

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-22 11:10:19 Fionnuala

我想添加一個文本，書籤或類似的東西到一個空白的文件，沒有任何句子!!我應該先添加一些段落？我真的很困惑這個！ –

如果您的空白文檔處於活動狀態，您可以只說'Selection.Text =「大量文本」 – Fionnuala

是的，但空白文檔中沒有句子和字符！例如如何使用此代碼在第5行寫入？！ –

Finding a position in a word document to insert a table

您可能會發現在上述地點一些有用的信息。

來源

2012-08-22 10:58:32

感謝，但我讀過了，但我沒有undrestand！「我不知道我在哪裏可以找到有關Microsoft.Office一些有用的信息.Interop.Word除了msdn！ –

如果您要在同一位置插入文本，每次執行此操作的簡單方法都是在該位置創建一個帶有書籤的.dotx模板文件。確保模板在構建包括

Doc = Word.Documents.Add("Directory\Filename") 
Doc.Bookmarks.Item("BookmarkName").Range.Text = "Text to be inserted"

來源

2013-12-19 17:18:23 Wayne

這是一個更好的方法 – R2D2

如何將文本添加到Word文檔的特定位置？

回答

相關問題