0

我一直在 VBA 中使用以下代码来获取邮件内容,但我无法获取所有详细信息。

您能帮我获取所有字段(邮件内容等)吗?

With OutlookMAPIFolder.Items(i)
  Range("A" & Trim(Str(RowValue))).Select
  ActiveCell.FormulaR1C1 = RowValue - 1
  Range("B" & Trim(Str(RowValue))).Select
  ActiveCell.FormulaR1C1 = Format(.ReceivedTime, "DD/MM/YYYY HH:MM:SS")
  Range("C" & Trim(Str(RowValue))).Select
  ActiveCell.FormulaR1C1 = .Subject
  Range("D" & Trim(Str(RowValue))).Select
  ActiveCell.FormulaR1C1 = .Sender
End With
4

1 回答 1

1

这是基于您提出的问题类型的通用提示:

初始化 OUTlookMAPIFolder 后,在代码中的任意位置添加断点。在 VBA IDE 中,查看并显示 Locals 窗口。当代码到达断点时,导航到本地窗口中的对象。您可以使用 + 号展开并查看其所有属性及其值。从那里,您应该能够确定如何从项目中引用您想要的信息。

于 2012-07-13T04:56:25.413 回答