Excel 是否有方法在VBA中对outlook电子邮件的主题行进行编码,以对应从不同单元格提取的多个部分?

Excel 是否有方法在VBA中对outlook电子邮件的主题行进行编码,以对应从不同单元格提取的多个部分?,excel,vba,email,outlook,subject,Excel,Vba,Email,Outlook,Subject,基本上希望编码适用于电子邮件主题行的这种格式: 组名称-办公室-销售代表-截止日期 C3-C4-C5-C6-C7 因此,输入上述单元格的信息都显示在主题行中。我目前只是将其编码为在电子邮件弹出时更改: .Subject=“集团名称办事处代表生活年月日:生活和残疾提案通知” 这可能吗?如果是,请帮忙。谢谢 这是我想到的。这取决于你的范围,如果他们是常数或不是,将改变你的代码一点点 Dim objNewWorkbook As Excel.Workbook Dim objNewWorksheet As

基本上希望编码适用于电子邮件主题行的这种格式:

组名称-办公室-销售代表-截止日期

C3-C4-C5-C6-C7

因此,输入上述单元格的信息都显示在主题行中。我目前只是将其编码为在电子邮件弹出时更改:

.Subject=“集团名称办事处代表生活年月日:生活和残疾提案通知”


这可能吗?如果是,请帮忙。谢谢

这是我想到的。这取决于你的范围,如果他们是常数或不是,将改变你的代码一点点

Dim objNewWorkbook As Excel.Workbook
Dim objNewWorksheet As Excel.Worksheet
Dim objOutlookApp As Object
Dim objMail As Object
Dim group As String
Dim office As String
Dim salesrep As String
Dim mydate As String
mydate = Format(Date, "mm/dd/yy")

group = Range("c3")
office = Range("c4")
salesrep = Range("c5")


  On Error Resume Next
       Set objOutlookApp = CreateObject("Outlook.Application")
       Set objMail = objOutlookApp.CreateItem(olMailItem)

       'Set Email
       With objMail
           '.To = "Test"
           .To = "Test"
           .CC = ""
           .Subject = "" & group & "  " & office & "  " & salesrep & "  " & mydate & ""
           .body = "Good Morning. " & vbCrLf & vbCrLf & ""
           '.Attachments.Add ActiveWorkbook.FullName
           .display
        End With

你是说
…=范围(“C3”)和“-”以及范围(“C4”)和“-”以及范围(“C5”)和“:生命和残疾提案通知”
?是的,如果您有其他问题,您可以(在上面的其他地方构建字符串),这里是我之前的一封电子邮件帖子。从post中的excel宏发送的完整工作电子邮件