InputBox in Word 2010 VBA

Question

我想在模板中添加代码，其中宏询问“表在哪一页上？”用户可以输入响应，即38。之后，将文本“表页38”依次插入到同一个指定的Word文档中。

Dim strPageInfo As String
strPageInfo = InputBox("Type page number for table placeholder.")

任何帮助都将不胜感激。

Answer 1

下面的片段将只将输入编号插入到文本选择中。我不知道这是否正是你要找的。

Dim strPageInfo As String
strPageInfo = InputBox("Type page number for table placeholder.")
Selection.TypeText Text:="[Table Page " + strPageInfo + "]";

这里还有一个宏列表供您参考。如果这样做不起作用，你可能会找到你需要做的事情。

Macros.html