Question

在Outlook中使用宏将电子邮件移动到子文件夹时，不会保留收据日期。

有没有人知道如何避免这种情况？

Answer 1

我发现宏更改了实际上正确的ModifiedTime参数。有什么问题是文件夹视图中的outlook -in列为Receveid-不显示ReceivedTime，而是显示ModifiedTime。我还发现Modified Column（通常不可见）包含实际的RecievedTime。因此，一种补救措施是保持宏不变，但将Modified列（在文件夹视图中的列上的鼠标右键）添加到视图中，并可选择删除Received列。您将在“所有帖子字段”部分找到修改。

Answer 2

不是答案..但这里有一些复制问题的代码。似乎无法在任何地方找到答案。不过有很多人在问这个问题。

Sub MoveToFolder(objFolder As Outlook.MAPIFolder)
  'On Error Resume Next
  If objFolder Is Nothing Then
    MsgBox "This folder doesn't exist!", vbOKOnly + vbExclamation, "INVALID FOLDER"
  End If

  If Application.ActiveExplorer.Selection.Count = 0 Then
    Exit Sub
  End If

  Dim objItem As Outlook.MailItem
  For Each objItem In Application.ActiveExplorer.Selection
      If objFolder.DefaultItemType = olMailItem Then
          If objItem.Class = olMail Then
              objItem.Move objFolder
          End If
      End If
  Next

  Set objItem = Nothing
  Set objFolder = Nothing
End Sub

Outlook - 使用宏移动电子邮件不会保留收据日期

2 个答案: