VBA：运行时错误＆＃39; 5825＆＃39;对象已被删除

Question

我将此代码ActiveDocument.Variables("time1").Delete放在End Sub之前，我收到了错误＆＃34;对象已被删除＆＃34;所以，如果一个变量＆＃34; time1＆＃34;存在，它将在程序结束时删除。我理解为什么我会得到那些代码，因为＆＃34; time1＆＃34;已经在第一次运行时删除但我想跳过并结束sub遇到错误。我试着这样做

On Error Goto here
ActiveDocument.Variables("time1").Delete

here:
End sub

但我仍然得到那个错误。为什么错误处理程序不起作用？

Answer 1

如果您对变量是否存在不感兴趣，您应该可以避免这种情况。

ActiveDocument.Variables("time1") = ""

如果有的话，

应该删除名为“time”的变量，如果没有则执行没有错误。

以类似的方式，

ActiveDocument.Variables("time1") = "something"

如果变量不存在，

将创建变量。

这是使变量比自定义文档属性更容易使用的事情之一，尽管它确实意味着不允许使用空变量。