Senden Sie E-Mail aus verschiedenen E-Mail-Konten
Wenn ich E-Mails senden, gehen Sie von meinem persönlichen Posteingang bei der Arbeit, aber ich brauche Sie, um zu gehen von einem anderen Postfach, dass ich Zugang habe. Ich habe beide Postfächer in meinem outlook.
Kann ich senden E-Mails aus einem bestimmten Postfach?
Hier ist der code, den ich verwende. Es nicht die 2. Sache, die in meinem Konto.
Sub Mail_small_Text_Change_Account()
Dim cel As Range
Dim OutApp As Outlook.Application
Dim OutMail As Outlook.MailItem
Dim strbody As String
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(olMailItem)
strbody = "Hi there" & vbNewLine & vbNewLine & _
"This is line 1" & vbNewLine & _
"This is line 2" & vbNewLine & _
"This is line 3" & vbNewLine & _
"This is line 4"
On Error Resume Next
For Each cel In Range(("C2"), Range("C2").End(xlDown))
With OutMail
.To = cel.Value
'.CC = cel.Offset(0, 3).Value
.Subject = "Benefits Refund"
.Body = strbody
.SendUsingAccount = OutApp.Session.Accounts.Item(2)
.Send 'or use .Display
End With
Next
On Error GoTo 0
Set OutMail = Nothing
Set OutApp = Nothing
End Sub
Du musst angemeldet sein, um einen Kommentar abzugeben.
Ja. Mit einem POP-mail-box, können Sie den Benutzernamen und das Kennwort für jedes Konto.