最權威的Outlook2010中的VBA入門

1、Outlook2010中的VBA編程您是否面臨從Outlook2010中重復清除多個聯(lián)系人的難題？是否必須將大量電子郵件附件逐一保存到硬盤？是否想從某些電子郵件消息中自動創(chuàng)建日歷項目？還是不知道如何將MicrosoftOutlook2010中的聯(lián)系人高效地導入MicrosoftExcel2010電子表格？使用VisualBasicforApplications（VBA）可以執(zhí)行上述任務并實現更多功能，VBA是一種簡單而又強大的會程語言，可為Office2010應用程序擴展新功能，還可以自動執(zhí)行重復性任務。本文面向有經驗的Outlook用戶，他們希望了解有關VBA的信息，還希望深入了解編程對其根

2、據需要定制Outlook2010有何幫助。在閱讀本文之前，您可能要閱讀介紹性文章Office2010中的VBA入門,其中詳細介紹了有關VBA編程的基礎知識。Office2010中的VBA編程的強大功能在于，使用VBA可以完成用鼠標、鍵盤或對話框可以執(zhí)行的幾乎所有操作。而且，如果使用VBA可以執(zhí)行一次，就可以輕松地執(zhí)行上百次、上千次。（實際上，自動執(zhí)行重復性任務是VBA在Office中的一種最常見用法。）除了可通過編寫VBA腳本來加速執(zhí)行日常任務，還可以使用VBA為Office2010應用程序添加新功能，或以特定于您的業(yè)務需要的方式來提示文檔用戶并與之交互。例如，在Outlook2010中，您可

3、以使用VBA通過標準用戶界面中未提供的方式對聯(lián)系人、電子郵件、日歷項目或任務執(zhí)行排序、導出和修改操作。本文中的教程可使用VBA實現Outlook的自動化。該教程是一個實際示例，研究為有經驗的Outlook用戶提供的編程、VBA和開發(fā)工具。選擇方法VBA編程是一種功能強大的解決方案，但并不總是最佳方法。有時候使用其他途徑來實現目標更合適。關鍵問題在于是否有更簡單的方法。在開始VBA項目之前，請考慮內置工具和標準功能。例如，如果需要在Outlook中執(zhí)行一項費時的操作，可考慮使用規(guī)則來解決此問題。是否可以執(zhí)行一次任務然后使用Ctrl+Y（重做）來重復該任務？Outlook2010是一種功能強大的應

4、用程序；您需要的解決方案可能已經準備就緒了?；ㄐr間了解有關Outlook2010的更多信息，再跳轉到編程過程。在開始VBA項目之前，確保您有時間使用VBA。需要關注編程，編程結果可能無法預知。尤其是初學者，除非有時間仔細研究，否則切勿依靠編程。當期限迫近會造成極大壓力時，可嘗試編寫快速腳本”來解決問題。如果您的時間很緊，可以使用較傳統(tǒng)的方法，即使這些方法單調又重復，也必須這樣做。VBA編程101通過代碼使應用程序執(zhí)行操作您可能認為編寫代碼是一項神秘而又復雜的工作，但基本原則是使用日常推理，并且很容易掌握。Office2010應用程序的創(chuàng)建方式如下：公開可以接收指令的對象,類似于為了與電話交互

5、而設計帶按鍵的電話。按下按鍵時，電話會識別指令并按照撥號順序包括對應的號碼。在編程時，您是通過向應用程序中的各個對象發(fā)送指令來與應用程序交互。這些對象是可擴展的，但有限制。這些對象只能執(zhí)行為其設計的操作，并且只按照您的指令執(zhí)行操作。例如，請考慮這樣的用戶：他在Outlook中創(chuàng)建電子郵件、選擇收件人、鍵入郵件主題，然后單擊發(fā)送"。在VBA編程中，Outlook會公開一個Mailltem對象。使用VBA代碼，您可以設置Mailltem的主題和正文，并告訴它執(zhí)行保存”或發(fā)送操作。閱讀本文后，您將了解有關這些對象、這些對象的組織方式及其描述和操作方式的更多信息。對象、方法和屬性開發(fā)人員通過

6、層次結構來組織編程對象，該層次結構稱為應用程序的對象模型。例如，Outlook中的收件箱”是OutlookNamespace寸象中白一個Folder對象。Folder對象包含Mailltem對象，等等。對象模型概略地對用戶界面中顯示的內容進行鏡像，對象模型是應用程序及其功能的概念圖。從編程角度而言，Folder對象可以包含任意類型的項目對象，但通常Outlook用戶界面中的幾個文件夾都主要由特定類型的項目對象組成。例如，Outlook用戶界面提供一個主要包含Contactitem對象的聯(lián)系人”文件夾，和一個主要包含Appointmentitem和Meetingitem對象的日歷”文件夾。對象的

7、定義稱為類，因此您可能會看到互換使用這兩個術語的情況。從技術上講，類是用于創(chuàng)建或實例化對象的說明或模板。只要對象存在，便可通過設置其屬性和調用其方法來處理該對象。如果您認為對象是一個名詞，則屬性是描述該名詞的形容詞，方法是為名詞賦予行動的動詞。更改屬性會更改對象的外觀或行為的質量。調用對象的一個方法可使對象執(zhí)行某個操作。在了解Outlook中對象模型的基本布局以及Application、Explorer和Folder對象的一些關鍵屬性（允許您訪問當前狀態(tài)）后，便可以開始使用VBA擴展和處理Outlook了。宏和VisualBasic編輯器既然您已了解Outlook2010應用程序如何公開其對象

8、模型，可能已等不及要嘗試調用對象方法、設置對象屬性以及響應對象事件。為此，您必須在一個位置以Office可以理解的方法編寫代碼；通常使用是VisualBasic編輯器。盡管該編輯器是在默認情況下安裝的，但在功能區(qū)中啟用該編輯器之前，許多用戶都不知道該編輯器的存在。打開開發(fā)工具”選項卡所有Ofice2010應用程序都使用功能區(qū)。功能區(qū)中有一個開發(fā)工具”選項卡，在此可以訪問VisualBasic編輯器和其他開發(fā)人員工具。由于Office2010在默認情況下不顯示開發(fā)工具”選項卡，因此必須使用以下過程啟用該選項卡：啟用開發(fā)工具”選項卡1 .在文件”選項卡上，選擇選項”打開“Outloo選項”對話框。

9、2 .單擊該對話框左側的自定義功能區(qū)3 .在該對話框左側的從下列位置選擇命令”下，選擇常用命令”。4 .在該對話框右側的自定義功能區(qū)”下，選擇主選項卡”，然后選中開發(fā)工具”復選框。5 .單擊確定”。注釋：在Office2007中，顯示開發(fā)工具”選項卡的方法是單擊Office按鈕、單擊選項”，然后在選項”對話框中的常用”類別下選中在功能區(qū)顯示，開發(fā)工具破項卡復選框。啟用開發(fā)工具”選項卡后，可以輕松找到“VisualBasi麗”宏”按鈕圖1.Outlook2010中的開發(fā)工具”選項卡2'日:彳庫星人-Outloak數據文件-Mk開諂發(fā)送，按收文件夾視圖開發(fā)*出口宏，代眄COM禁用現目加延期

10、加奉函3£)IJ_選攆表手設計用體目定義窗體安全問題默認情況下，為了使您免受病毒和其他惡意代碼的侵害，Outlook中會禁用VBA宏。若要啟用這些宏，請使用以下過程：啟用宏1 .在文件”選項卡上，選擇“Outloo選項”打開“Outloo艇項”對話框，然后單擊信任中心”。2 .單擊信任中心設置”，然后單擊左側的宏設置”選項。3 .選擇為所有宏提供通知”，然后單擊確定”。該選項允許在Outlook中運行宏，但在宏運行之前，Outlook會提示您確認是否要運行宏。4 .重新啟動Outlook以使配置更改生效。VisualBasic編輯器在顯示開發(fā)工具”選項卡后，可以打開VisualBas

11、ic編輯器，該編輯器是用于編寫和編輯用于Outlook的VBA代碼的內置工具。使用以下過程可以打開VisualBasic編輯器：打開VisualBasic編輯器1 .單擊開發(fā)工具”選項卡上的宏”按鈕。2 .在隨后出現的宏”對話框中的宏名稱”下鍵入Test。3 .單擊創(chuàng)建"按鈕打開VisualBasic編輯器，其中包含已鍵入的新宏的大綱VisualBasic編輯器包含下列代碼。VBASubTest()EndSubSub代表Subroutine”(子例程)，可將其暫時定義為宏”。運行Test宏將運行SubTest()與EndSub之間的所有代碼?，F在，請編輯宏，使其類似如下代碼。VBAS

12、ubTest()MsgBox("Helloworld")EndSub圖2.在VisualBasic編輯器中測試宏注意VisualBasic編輯器的左面板。Test宏位于Project1的Module1中。一個項目模塊包含多個模塊，每個模塊包含可以作為.bas文件導入或導出的VBA代碼的集合。只要對象存在，便可通過設置其屬性和調用其方法來處理該對象。您編輯過的子例程中包含一個方法，該方法是用于執(zhí)行操作的代碼。該子例程中的Test()方法現在是對象Project1的一個成員。注釋:其他Ofice應用程序可能會在VisualBasic編輯器中列出多個項目，但在OutlookVBA

13、中，只列出一個項目，并且該項目始終名為Projectl。返回到Outlook中的開發(fā)工具”選項卡，再次單擊宏”按鈕。在隨后出現的列表中選擇“Projectl.Tes宏，”然后單擊運行”顯示包含文本“Hello,world!的小消息框。祝賀您！您剛剛在Outlook中創(chuàng)建并實現了VBA代碼！在消息框中單擊確定”關閉消息框并完成宏的運行。如果未出現消息框，請檢查宏安全性設置并重新啟動Outlook。使宏可供訪問如果您經常使用宏，可能會發(fā)現用鍵盤快捷方式或快速訪問工具欄”按鈕訪問宏更為方便。若要在快速訪問工具欄”中為“Test®創(chuàng)建按鈕，請使用以下過程：在快速訪問工具欄”中為宏創(chuàng)建按鈕1

14、.單擊文件”選項卡。2 .單擊選項”打開“Outloo選項”對話框，然后單擊快速訪問工具欄3 .在從下列位置選擇命令：'下的列表中，選擇宏”。在隨后出現的列表中查找類似于“Project1.Module1.Tes的文本，并選擇該文本。4 .單擊添加>>”按鈕將宏添加到右側的列表中，然后單擊修改”按鈕選擇與該宏關聯(lián)的按鈕圖像。5 .單擊確定”?，F在，您應在快速訪問工具欄”中的文件”選項卡上方看到新按鈕?，F在，您不必使用開發(fā)工具”選項卡，便可隨時快速運行宏，趕快試試吧。圖3.向快速訪問工具欄分配宏UuLLovk選質特規(guī)網口歷膝條孔行帝鑼如H記號常手曲=息iSsm定£功

15、能國體定距靛-不建斌閻st快出向界網恒叱曜的令。:0雌窟邕拴也再=丈件是另白孟前走百寶出匕的It目之之義t也更訪ar反后：口瞿逞第fci斯爾伴實町的用3PrcjectL*Te>l:而口囿-a<廿忘三傳*回JIr區(qū)為淺區(qū)下方顯示唬運方可工后后整白罡山jg(L.*號.>/導H®聯(lián)系人編輯宏假設您在名為ExampleSystems的公司中有多個聯(lián)系人，每個聯(lián)系人的電子郵件地址都包含域。現在，假定ExampleNetworks收購了ExampleSystems,并將所有員工的電子郵件地址更改為如果您只有一個或兩個聯(lián)系人在ExampleSystems則手動更改這些地址是很簡單

16、的工作。但如果有20、50或100個聯(lián)系人，則自動執(zhí)行此類重復性任務便是VBA在Office中的常見用途了。本文探討如何使用Outlook中的VBA修改聯(lián)系人，還對一些VBA概念做了解釋訪問聯(lián)系人文件夾按照您創(chuàng)建Test宏時使用的步驟創(chuàng)建名為CompanyChange的新宏并在VisualBasic編輯器中打開該宏。第一個任務是在Outlook中訪問聯(lián)系人”文件夾對象，然后將對該對象的引用存儲在一個變量中。在編程中，變量是一個臨時的命名對象，可保存值或對對象的引用。下面的示例代碼使用一個名為ContactsFolder的變量。該代碼指示VBA,它將把一個Folder對象放入其中并運行Sessi

17、oM象的GetDefaultFolder方法，以查找Contacts文件火并將對它的引用存儲在該變量中。VisualBasic編輯器中包含一種有幫助的自動代碼條目，名為智能感知"。在鍵入Session.GetDefaultFolder時要仔細查看，然后按下左括號作為其參數。在執(zhí)行此操作期間，VisualBasic編輯器會顯示選項列表。使用下拉箭頭或鼠標選擇olFolderContacts（這是一種可用的文件夾類型），然后按下Tab鍵將其選中。圖4.使用智能感知”選取文件夾類型actDie*ttVisv&J,Eae;ie1atApplie-niinni-n»flJFr

18、aj*et.段跑J慢的）國:蹄咬件E球H現酊M晦F嶼心黃酒星際印叫D相造序間漸口物砧如卡VC'咽去號通Tb=tU二JJJ與OcejflisiDktiCmbi(4CIjld-ciAziFuldcl5i1CoitactsFoL6ei=常播iQ。gUfef軌liTulder11L=Faldssrjlylkclan£LL>LFcl4«tjJtlat-euttnE*LBclderlikb'xilFcld*rJ才arralTOiT：IW1按竽毋予ICmtKftFfildiir益丫上不文,F血d打雖然在處理代碼時使用復制和粘貼功能是可以有效避免鍵入錯誤的極好做法，但

19、直接在VisualBasic編輯器中鍵入代碼可以親自體驗編輯器對您有何幫助。VBASubCompanyChange()DimContactsFolderasFolderSetContactsFolder=Session.GetDefaultFolder(olFolderContacts)EndSub再添加一行，以獲取一些反饋并在宏的運行過程中測試宏。(而且可以像在使宏可供訪問”一節(jié)中那樣，花一分鐘的時間為CompanyChange創(chuàng)建一個快速訪問工具欄”按鈕。)VBASubCompanyChange()DimContactsFolderasFolderSetContactsFolder=Ses

20、sion.GetDefaultFolder(olFolderContacts)MsgBox("ContactsFound:"&ContactsFolder.Items.Count)EndSubItems是Folder對象的一個屬性，Count是Items屬性的一個屬性。運行宏；Outlook中的聯(lián)系人數應出現在消息框中。如果尚未執(zhí)行此操作，請打開聯(lián)系人”文件夾，創(chuàng)建一些為虛構的ExampleSystems公司工作的示例聯(lián)系人。為每個示例聯(lián)系人給定公司名稱ExampleSystems并為每個聯(lián)系人創(chuàng)建一個與someone目似的不同電子郵件地址。對象集合集合是現代編程語

21、言(如VBA)中最強大的功能之一。集合是可以存儲在屬性中的一組對象，通過輕松演練”可以訪問每個對象。在該示例中，代碼必須遍歷聯(lián)系人的集合以查找ExampleSystems勺人員。如上所述，ContactsFolder變量可提供對Folder的Items集合的訪問權限。聯(lián)系人Folder的Items集合將返回ContactItem類型的對象。創(chuàng)建一個變量，來保存對每個ContactItem的引用。VBADimContactAsContactItem請注意，如果您不知道從集合中返回何種類型的對象，也可以使用通用Object類型。但如果您知道對象的類型，精確指定類型有許多優(yōu)點。VBADimConta

22、ctAsObject在擁有Contactitem后，必須檢查每個人的公司名稱。由于Contactitem對象用于存儲有關聯(lián)系人的信息，因此必須存在一個用于存儲公司名稱的屬性，但由于您不知道該屬性的名稱，因此必須使用下列兩種方法之一來查找該名稱。確定屬性名稱為了在VBA中充分利用對象，必須了解其屬性和方法。雖然使用在Web中找到的示例代碼可以執(zhí)行許多任務，但您可以通過系統(tǒng)地檢查所使用的對象來增加選項、減少調試和節(jié)省時間。例如，您可以通過在代碼中選擇Contactitem并按下F1來在幫助”的“Outlool#發(fā)人員參考”中查找有關Contactitem的信息，也可以在幫助”中搜索Contacti

23、tem請務必研究各個主題中的鏈接，以深入了解相關對象。開發(fā)人員參考”是用于VBA編程的強大工具，也是查找您的代碼所需屬性的一種方法。在閱讀有關Contactitem對象的一般信息后，可單擊“Contactitem寸象成員”鏈接查看方法和屬性的列表（屬性和方法統(tǒng)稱為成員）。如果您繼續(xù)查看該列表，您會看到一個CompanyName屬性。此屬性聽起來似乎很有用。除了使用“Outloo研發(fā)人員參考”查找屬性或方法外，還可以使用VisualBasic編輯器中的智能感知功能。在將變量Contact定義為Contactitem后，鍵入Contact和句點可以顯示與幫助”中所列內容相同的成員列表。若要選擇一個

24、智能感知選項，請使用向上和向下箭頭或鼠標突出顯示該選項，然后使用Tab鍵將其選中。智能感知不提供各個成員的說明，因此當上下文使您的選擇很明顯或您已了解成員的名稱但無法記住其準確拼寫時，使用此方法將很有幫助。成員名稱拼寫錯誤會產生VisualBasic編輯器在您運行宏之前一直無法標記的錯誤。循環(huán)訪問集合現在，您有一個集合，您了解該集合中包含的對象類型，并且要訪問找到的對象中的一個屬性。您已準備好要使用ForEach循環(huán)來遍歷集合并處理它所包含的對象。在偽代碼中，您準備執(zhí)行下列操作。VBAForEachobjectvariableinacollectionthatcontainsthattypeo

25、fobjectdosomethingwithobjectvariable.PropertyNext在實際代碼中，上述代碼轉換為下列代碼，其中涉及包含MsgBox語句的行。VBAForEachContactInContactsFolder.ltemsDebug.PrintContact.CompanyNameNext再次運行宏之前，請在VisualBasic編輯器中打開立即窗口。為此，請在菜單欄中單擊視圖”，然后單擊立即窗口”。前面，您使用MsgBox從腳本中獲取反饋。雖然MsgBox很有用，但它總是等待您單擊確定”，然后才顯示下一條消息。相反，Debug.Print每次都向立即窗口發(fā)送一行輸出

26、，而不等待您確認。運行此腳本后，您應該能夠在立即窗口中看到公司名稱的列表。注意，該列表對于開發(fā)人員非常有用，但與您共享此宏的用戶看不到該列表。使用If語句做決定在您已完成的解決方案中，您希望宏只更改在ExampleSystemsX作的聯(lián)系人，而不更改其他聯(lián)系人。這種條件邏輯正是編程的優(yōu)勢所在。這里，您可以使用If語旬告知VBA僅在所提供條件為真時運行代碼；否則，它應跳到EndIf語句之后的代碼。VBAIfsomeconditionistrueThen'dothingsEndIf'continueonwhetherornottheconditionwastrue在您所處理的問題中

27、，決定條件是當前Contactitem的CompanyName屬性是否設置為字符用“ExampleSystems”在下面的代碼中，請注意雙引號。字符串值(即文本值)與數字值相反，始終包含在雙引號內。VBA忽略單引號，單引號用于您和其他開發(fā)人員的注釋中。在代碼中添加條件，使完整腳本類似于如下代碼。VBASubCompanyChange()DimContactsFolderAsFolderSetContactsFolder=Session.GetDefaultFolder(olFolderContacts)MsgBox("ContactsFound:"&Contacts

28、Folder.Items.Count)DimContactAsContactItemForEachContactInContactsFolder.ItemsIfContact.CompanyName="ExampleSystems"ThenDebug.Print"Found:"&Contact.FullNameEndIfNextEndSub運行代碼后，應在立即窗口中看到ExampleSystems系人的姓名圖6.使用立即窗口進行輸出注意Debug.Print和前面的MsgBox為了清晰起見而合并已修復字符串的方法，例如"Found:&q

29、uot;后跟屬性返回的值。為使此方法起作用，必須使用字符串連接運算符(&)來合并這兩個文本字符串。重要信息：重要信息：在繼續(xù)此教程的過程中，請務必謹慎。您使用的是實際的Outlook聯(lián)系人列表，其中包含幾個來自ExampleSystems的虛構聯(lián)系人。將每個聯(lián)系人的公司名稱都修改為“ExampleNetworks并不合適。更改公司名稱該操作已接近尾聲。您已經加載了聯(lián)系人，現在可以循環(huán)訪問這些聯(lián)系人并將您的聯(lián)系人與來自ExampleSystems的聯(lián)系人相區(qū)分。若要對ExampleNetworks進行更改，您可以更改CompanyName屬性并調用Save方法來提交更改。VBAIfCon

30、tact.CompanyName="ExampleSystems"ThenContact.CompanyName="ExampleNetworks"Contact.SaveDebug.Print"Changed:"&Contact.FullNameEndIf運行宏，然后查看ExampleSystems系人；現在，這些聯(lián)系人的公司名稱應該已改為ExampleNetworks請注意，為了以后測試腳本，必須手動將公司名稱更改回ExampleSystem葭創(chuàng)建可為您執(zhí)行該更改的另一個宏。雖然Debug.Print語句不是腳本運行所必需

31、的語句，但請將其保留。您和您的用戶從宏中獲取的反饋越多越好。更改電子郵件地址更改CompanyName屬性只是簡單更改整個字符串。若要將電子郵件地址的域由更改為,需要執(zhí)行字符串操作。每個字符串都有一個內置的編號系統(tǒng)，其中每個字符都有一個從1開始的索引號。您可以使用各種VBA函數來處理部分或全部字符串。由于存在許多需要檢查子字符串或更改部分字符串的編程情況，因此了解這些字符串操作可顯著增加您作為VBA程序員時的選擇。（在Web中搜索“VBA字符串函數”可提供許多有用的列表和示例。）可以使用Replace函數來執(zhí)行將一個子字符串替換為另一個子字符串的簡單替換，但您可能經常會面臨需要用更復雜的代碼來

32、處理字符串的情況。在緊鄰代碼之前的位置添加下面的行，將調用Contact.Save。VBAContact.EmaillAddress=Replace（Contact.Email1Address,"",""）請從左至右認真閱讀代碼。該代碼指示將聯(lián)系人的EmaillAddress屬性（第一個電子郵件地址）設置為新值。提供新值的方法是讓Replace函數在當前的Contact.EmaillAddress屬性中查找字符串“將其替換為“”確保虛構聯(lián)系人的公司名稱已設置為ExampleSystems然后運行該腳本。電子郵件地址應全都更改為公司名稱應全都更改為Exam

33、pleNetworks。使代碼通用現在，您有一個強大的宏，但功能有限，因為指定新公司名稱的唯一方法是編輯代碼。若要使您的代碼更加有用，可以使用InputBox函數提示用戶輸入。下列代碼是最終腳本。這是一個有用并且完整的Outlook解決方案。VBASubCompanyChange()DimContactsFolderAsFolderSetContactsFolder=Session.GetDefaultFolder(olFolderContacts)DimOldCompanyNameAsStringDimNewCompanyNameAsStringDimOldEmailDomainAsStri

34、ngDimNewEmailDomainAsStringDimContactsChangedCountAsInteger'AskuserforinputsMsgBox("Thisscriptwillchangeallofyourcontactsfromonecompanytoanother.")OldCompanyName=InputBox("UnderwhatnamearethecontactslistedinOutlooknow?")NewCompanyName=InputBox("Whatisthenewcompanynametos

35、etthemto?")OldEmailDomain=InputBox("Whatisthee-maildomainnamecurrentlylistedafterthesign?")NewEmailDomain=InputBox("Whatshouldthee-maildomainbesetto?LeaveblankandclickOKifnochange")ContactsChangedCount=0DimContactAsContactItem'loopthroughContactsandsetthosewhoneeditForEa

36、chContactInContactsFolder.ItemsIfContact.CompanyName=OldCompanyNameThenContact.CompanyName=NewCompanyNameIfNewEmailDomain<>""ThenContact.Email1Address=Replace(Contact.Email1Address,OldEmailDomain,NewEmailDomain)EndIfContact.SaveContactsChangedCount=ContactsChangedCount+1Debug.Print&q

37、uot;Changed:"&Contact.FullNameEndIfNext'confirmandcleanupMsgBox(ContactsChangedCount&"contactswerechangedfrom'"&OldCompanyName&"'to'"&NewCompanyName)SetContact=NothingSetContactsFolder=NothingEndSub分發(fā)代碼從開發(fā)所在計算機向其他計算機移動代碼的過程被稱為部署，這是編程項目的一個重要部分。本節(jié)介紹如何將新宏移動到其他計算機中。首先需要一個小型后臺。OutlookVisualBasicforApplications代碼設計用作個人宏開發(fā)環(huán)境；并非設計用于部署或分發(fā)。因此，無法像處理其他Office應用程序（如Excel或Word）那樣在文檔內保存宏。若要將OutlookVBA宏從一臺計算機移至另一臺計算機，可從第一臺計算機中導出代碼模塊并將其導入第二臺計算機。也可以