无法使用“.Close”关闭自定义 Outlook From

Custom Outlook From could not be closed with ".Close"

我使用 VBA 创建了一个自定义 Outlook 表单。 我想发送一封邮件,然后只需单击一个按钮即可关闭表单。 应该发送邮件,然后关闭表格。 已经编写了以下代码,但这会在提示用户保存更改后关闭表单。 用户必须关闭提示的 kinda MsgBox,然后关闭表单。

Sub cmdbut2_Click
    Set myItem = Application.CreateItem(0)
    myItem.Recipients.Add "Test Test"
    myItem.Close 2
End Sub

我想在没有提示消息的情况下关闭表单。我该怎么做?

你应该通过 olSave value to MailItem.Close method.

Sub cmdbut2_Click
    Set myItem = Application.CreateItem(0)
    myItem.Recipients.Add "Test Test"
    'myItem.Close 2 close with prompt for save
    myItem.Close olSave
End Sub