VBScript：在MS中添加一个单词；字；2003年文件

下面是打开我的“fox.doc”的简短代码：

---

我只需要在本文档末尾添加一个单词“瓶子”（打开后）。为此，我应该在我的小vbs脚本中添加哪些行

您可以通过在Word中录制宏，然后进行通常很小的更改，从而使代码在VBScript中工作，从而学到很多东西

Set r = doc.Words.Last
r.InsertAfter (" bottle")

---

谢谢你，雷莫。我已经在脚本中添加了这两行，现在它可以工作了！你是怎么想到这两行的？“通过在Word中录制宏，然后进行一些小的更改，使代码在VBScript中工作，您可以学到很多东西”-但这正是我在发布此问题之前所做的。我确实录制了一个小宏，当时只有一行：

Selection.TypeText:=“瓶子”

但是，当我将这一行添加到代码中时，它不起作用。我当时做错了什么？您需要从打开文档时开始录制，因此您可能键入了ctlr+End，这将为您提供

Selection.EndKey Unit:=wdStory

，但是，录制宏并不是全部，我承认，您也可以使用intellisense来探索可用的内容。当您将对象

声明为合适的对象时，Intellisense将真正发挥作用，例如，
Dim doc As Document
，现在当您键入
doc.
，您将获得一个选项列表以供探索。（cont）（cont）不能在VBScript中执行此操作，因此首先在VBA中工作很有用。其他非常有用的工具包括对象浏览器、手表和（tada）F1。我明白了，谢谢。“您不能在VBScript中执行此操作，因此首先在VBA中工作是很有用的”-是的，但据我所见，VBA非常适合在您使用“Word”时编写和使用宏，而我当前的需要是自动修改（或添加）我的“Word”的过程文档而不打开它们-这就是为什么我需要学习如何在word working VBS之外编程。
Set r = doc.Words.Last
r.InsertAfter (" bottle")