我的Outlook中設定了2個郵箱[email protected]和[email protected], A為被設定為默認郵箱。
以下代碼可以生成宏1,然后把宏1應用到郵箱B的郵件規則里,每次郵箱B收到一個郵件會自動生成一個任務。
目前每次郵箱B收到郵件都能自動生成一個任務,但這個任務歸屬在郵箱A的任務串列中。
我希望郵箱B通過規則自動產生的任務能歸屬在郵箱B的任務串列中,請高手指教,謝謝!
Sub ConvertMailtoTask(Item As Outlook.MailItem)
Dim objTask As Outlook.TaskItem
Set objTask = Application.CreateItem(olTaskItem)
With objTask
.Subject = Item.Subject
.StartDate = Item.ReceivedTime
.Body = Item.Body
.Save
End With
Set objTask = Nothing
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/qita/55725.html
下一篇:舵機的速度
