outlook vba查找答复来源项目的属性

我的电子邮件中有用户定义的属性。我想他们被复制的情况下，一个新的项目的答复（从一个，答复来自）

这不是问题，但是下面的代码是从 运行Initialize_处理程序时，我得到“VBA错误91:未设置对象变量”

Public WithEvents myItem As MailItem 

Sub Initialize_Handler() 
  Set myItem = Application.ActiveInspector.CurrentItem 
End Sub 

Private Sub myItem_Reply(ByVal Response As Object, Cancel As Boolean) 
  ...code for copying user-defined properties...
End Sub

是什么导致了这个错误？即使“ThisOutlookSession”中只有这段代码，它也会出现

我是否正在寻找从原始电子邮件项目中获取值/属性的正确方法

谢谢！

---

Max

在运行以下代码时，似乎没有打开任何检查器窗口：

Sub Initialize_Handler() 
  Set myItem = Application.ActiveInspector.CurrentItem 
End Sub 

---

在这种情况下，

ActiveInspector

不返回任何内容。你可以阅读更多关于文章中错误的信息

在运行以下代码时，似乎没有打开任何检查器窗口：

Sub Initialize_Handler() 
  Set myItem = Application.ActiveInspector.CurrentItem 
End Sub 

---

在这种情况下，

ActiveInspector

不返回任何内容。你可以阅读更多关于文章中错误的信息

在另一页上，我找到了一个有效的解决方案。以下是完整（改编）代码：

---

在另一页上，我找到了一个有效的解决方案。以下是完整（改编）代码：

---

据我所知，“检查器窗口”将是作为窗口打开的电子邮件，而不是在预览中。上面的代码在Outlook启动时运行，怎么会有电子邮件打开呢？据我所知，“检查器窗口”是作为窗口打开的电子邮件，而不是在预览中。上面的代码是在Outlook启动时运行的，怎么会有电子邮件打开呢？不完全是。我现在发现了问题的原因：如果我自己以窗口/检查器的身份打开邮件，回复子节点将启动。当我在Outlook本身（“主窗口”）中单击“回复”时，不会触发回复子窗口。我怎样才能做到这一点？同时我发现还有另一个问题……对不起。。。即使当reply.sub启动时，我也无法访问答案所指向的“旧”电子邮件来阅读其属性。我现在发现了问题的原因：如果我自己以窗口/检查器的身份打开邮件，回复子节点将启动。当我在Outlook本身（“主窗口”）中单击“回复”时，不会触发回复子窗口。我怎样才能做到这一点？同时我发现还有另一个问题……对不起。。。即使当reply.sub启动时，我也无法访问“旧”电子邮件，该电子邮件用于读取其属性