使用VBA重命名并保存ActiveDocument

Question

是否可以使用VBA重命名activedocument（我正在运行宏的word文档）？

现在我正在以新名称保存我的activedocument，然后尝试删除原始文件。后一部分不会通过，因此原文永远不会被删除。

任何人都知道这是否可能？

Answer 1

我最近花了很多时间这样做，因为当我做“另存为”时我不喜欢删除以前的文件 - 我想要一个“另存为并删除旧文件”的答案。我的答案是从here复制的。

我将它添加到快速启动栏中，它非常有效。

1. 将以下代码插入normal.dotm模板（在{7} for Windows 7 for Word中找到）
2. 保存normal.dotm
3. 将其添加到Word中的快速启动工具栏。
4. 可选 - 将键盘快捷键重新映射到此
5. 可选 - 对模板进行数字签名（推荐）

注意这实际上是将旧文件移动到回收站而不是完全废弃，并且还以非常方便的方式设置新文件名。

---

C:\Documents and Settings\user name\Application Data\Microsoft\Templates