Question

我在MS Outlook上查找vba中的脚本使用它可以跟踪电子邮件响应时间和其他详细信息，如电子邮件类型，状态等。我对Outlook VBA有一些了解但不确定是否可以使用以下步骤：

点击发送按钮后，应该有userform，我们有下拉列表，如电子邮件类型和状态等。
在userform上发送按钮，在验证附件，复制电子邮件等人员等条件后将发送电子邮件
一旦我点击了userform上的发送按钮，它应该捕获此电子邮件的信息，如发送给，主题，时间，如果收到回复电子邮件，收到电子邮件主题和时间，然后将信息传输到Excel文件< / p>

第1步＆amp; 2我可以使用第3步，我需要帮助，我知道这可以通过跟踪对话完成但不确定如何（https://msdn.microsoft.com/en-us/library/office/cc765583.aspx?f=255&MSPPError=-2147217396）

感谢完成开发的任何帮助。

this is what i have writen so far 
ThisOutllokSession:

Private Sub Application_ItemSend(ByVal CurrentEmail As Object, Cancel As Boolean)    
UserForm1.Show
Cancel = True
MsgBox UserForm1.ComboBox1.Value & vbNewLine & UserForm1.ComboBox2.Value & vbNewLine & currentemail.to & vbNewLine & currentemail.Subject
Unload UserForm1
\\\\\\\\\\\\\\need help\\\\\\\\\\\\\\\\\\\
here i want to get the from Email ID, email recieved time, Subject 
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
End Sub

Userform1 Coding
Private Sub Submit_Click()
Me.Hide
End Sub

Private Sub Cancel_Click()
Unload Me
End Sub

Private Sub UserForm_Initialize()
Me.ComboBox1.AddItem "Responce"
Me.ComboBox1.AddItem "Question"
Me.ComboBox1.AddItem "Feedback"

Me.ComboBox2.AddItem "Pending"
Me.ComboBox2.AddItem "Complete"
Me.ComboBox2.AddItem "Follow Up"
End Sub

Answer 1

使用Application.ItemSend事件在发送消息之前处理消息。您可以显示用户表单并取消提交消息（如有必要）

电子邮件状态跟踪

1 个答案: