在VBA中切換不同發件人的最簡單方法是什麼？

即，我正在談論MAPIFolder，MailItem和Recipient對象類型。在VBA中切換不同發件人的最簡單方法是什麼？

-------------------附加信息------------------------- ------------------

下面是一些我的對象有：

Dim w As Outlook.Application 
Dim wInbox As Outlook.MAPIFolder 
Dim objOutlookMsg As Outlook.MailItem 
Dim objOutlookRecip As Outlook.Recipient

來源

2012-02-05 stanigator

不是真的.....因爲你想要什麼，然後確認您的詳細信息使用Excel來自動化Outlook將是有益的 – brettdj 2012-02-05 03:33:00

@brettdj：見我的編輯。 – stanigator 2012-02-05 03:46:51

我還不清楚你在做什麼。代表其他人發送郵件（有問題的「其他發件人」）或更改收件箱，收件人等 – brettdj 2012-02-05 04:16:56

如果第二個郵箱叫「其他人」，那麼你可以試試這個從引用屬於它（從默認收件箱不同）收件箱

Dim objOl As Outlook.Application 
Dim objNS As Outlook.Namespace 
Dim objFolder As Outlook.MAPIFolder 
Set objOl = New Outlook.Application 
Set objNS = objOl.GetNamespace("MAPI") 
Set objFolder = objNS.Folders("Other Person") 
Set objFolder = objFolder.Folders("Inbox")

來源

2012-02-05 04:32:02 brettdj

我想找.SendUsingAccount屬性，例如低於：

Public Sub New_Mail() 
Dim oAccount As Outlook.Account 
Dim oMail As Outlook.MailItem 

For Each oAccount In Application.Session.Accounts 
    If oAccount = "Name_of_Default_Account" Then 
     Set oMail = Application.CreateItem(olMailItem) 
     oMail.SendUsingAccount = oAccount 
     oMail.Display 
    End If 
Next 
End Sub

來源

2012-02-05 04:46:31 stanigator

那麼你面臨的問題是什麼？上面的代碼應該可以工作。 – 2012-02-06 23:24:13

在VBA中切換不同發件人的最簡單方法是什麼？

回答

相關問題