Outlook 2016 VBA可将附件从文件夹保存到特定位置

Question

我在网上找到了此代码，并尝试对其进行更改以适合我的目的。我所需要做的只是将test@noreplay.com的附件保存到“测试”文件夹（它是“收件箱”的子文件夹）。我不知道如何更改它，需要您的帮助！

Public Sub saveAttachtoDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
saveFolder = "C:\Attachments"
    For Each objAtt In itm.Attachments
        objAtt.SaveAsFile saveFolder & "\" & objAtt.DisplayName
        Set objAtt = Nothing
    Next
End Sub

我的VBA看起来像这样（希望有帮助）。

再次尝试将Outlook中的附件保存到相同名称下的特定发件人的特定文件夹中（这样新附件将覆盖现有附件）。