Я разрабатываю код для Excel, который будет отправлять информацию внутри компании через Outlook.
Однако мы реализовали функцию в Outlook, и всегда, когда я нажимаю на кнопку отправки электронной почты в Outlook, я получаю всплывающее окноокно с раскрывающимся меню, где я должен выбрать категорию электронной почты (это наша внутренняя классификация электронных писем).
Я не знаю, как работает эта классификация.
У меня есть также кнопкис категорией в окне, где я пишу новое электронное письмо, и если я не буду отмечать его, я получаю всплывающее окно после нажатия на кнопку отправки электронного письма.
Я хотел бы отправить это электронное письмо без уведомления, но я незнать, возможно ли это с помощью этой классификации, которую мы реализовали.
С этим кодом я также получаю упомянутое окно с классификацией.
Dim Email_Subject, Email_Send_From, Email_Send_To, _
Email_Cc, Email_Bcc, Email_Body As String
Dim Mail_Object, Mail_Single As Variant
Email_Subject = "TEST"
Email_Send_From = ""
Email_Send_To = ""
Email_Cc = ""
Email_Bcc = ""
Email_Body = "TEST"
On Error GoTo debugs
Set Mail_Object = CreateObject("Outlook.Application")
Set Mail_Single = Mail_Object.CreateItem(0)
With Mail_Single
.Subject = Email_Subject
.To = Email_Send_To
.cc = Email_Cc
.BCC = Email_Bcc
.Body = Email_Body
.send
End With
debugs:
If Err.Description <> "" Then MsgBox Err.Description
Есть ли возможность классифицировать этот документ в коде или есть какой-либо другой способ отправлять электронную почту без уведомления?