Question

我有一个Word模板（建议来自），其中包括一个autonew宏，用于在书签处插入参考号和一个操作按钮（提交），该按钮将参考编号作为文件名的一部分保存在结果文档中并关闭字。通过Windows资源管理器打开模板时，这非常有效。

我们还有一个PowerPoint演示文稿，其中包含超链接到各种文档的操作设置。该链接将打开上述模板，但不插入参考号。此外，当点击“提交”按钮时，文件将保存为另一个包含参考编号的模板。

我不确定问题是Word还是PowerPoint相关。 Word模板的代码是

Sub AutoNew()

REF = System.PrivateProfileString("L:\Local\Lab\Section - Support Services\Health and Safety\H&S Suggestions\Settings.Txt", _
        "MacroSettings", "REF")

If REF = "" Then
    REF = 1
Else
    REF = REF + 1
End If

System.PrivateProfileString("L:\Local\Lab\Section - Support Services\Health and Safety\H&S Suggestions\Settings.Txt", "MacroSettings", _
        "REF") = REF

ActiveDocument.Bookmarks("REF").Range.InsertBefore Format(REF, "000#")


End Sub


Private Sub CommandButton1_Click()

REF = System.PrivateProfileString("L:\Local\Lab\Section - Support Services\Health and Safety\H&S Suggestions\Settings.Txt", _
        "MacroSettings", "REF")

ActiveDocument.SaveAs FileName:="L:\Local\Lab\Section - Support Services\Health and Safety\H&S Suggestions\Suggestion " & Format(REF, "000#.doc")
Application.Quit

End Sub

任何帮助或指示都会被赞赏，好像它可以用于各种其他模板。

Answer 1

从描述中可以很难准确了解发生了什么，但是像AUTONEW这样的声音可能无法在特定组合中运行。

您可以通过使用某些日志记录或MSGBOX调用来验证这一点，以确切了解正在运行的宏，何时。

检查Autonew的文档

http://support.microsoft.com/kb/211659

听起来，如果将宏保存在Normal中，它将无法运行，这听起来不像这里的情况，但值得注意。

您可能还考虑使用AutoOpen宏并检查其他元素以确保这是一个全新的doc而不是已保存的doc（如检查Document.Fullname属性的内容）。

从PowerPoint操作按钮打开时，Word宏未正确运行

1 个答案: