Outlookオブジェクトライブラリがバージョン12と14の間で切り替わらない

Question

ネットワーク共有に.dotmテンプレートファイルがあります。 Word、Office、およびOutlookオブジェクトライブラリへの参照を持つマクロがあります。 Microsoft Office 2007とOffice 2010と共に、Windows XPとWindows 7の2つの異なるプラットフォームを使用します。ユーザーがテンプレートファイルを開くと、WordとOfficeの参照が自動的に調整されます（Microsoft Word 12 Objectライブラリまたは必要に応じてMicrosoft Word 14 Object Library）、問題なくマクロが実行されます。

Microsoft Outlook Object Libraryは、バージョン12から14に適切に切り替わります。バージョン14から12に正しく切り替えられません。その場合、libaryが見つからないというエラーが表示されます。これはバグですか？回避策はありますか？何か私は見落としている？

Answer 1

ForEachLoop、

あなたの質問は主に回答されているようです。私は、明快にするために、ちょっとした情報を追加し、この質問に答えを提供するだけです。 OssiemacのMicrosoftフォーラムのユーザーは、Siddarth Routによって述べられているようにLateBinding was the way to goと記載しました。 Siddarthが暗示するように、それはあなたが参照を心配する必要はないということを意味します。 -

〜JOL

Private Sub btnLateBindMethod_Click() 
    ' Variables used for LateBinding 
    Dim objOutlook As Object 'Outlook.Application 
    Dim objEmail As Object  'Outlook.MailItem  
    Dim objNameSpace As Object 'Outlook.NameSpace  
    Const OutLookMailItem As Long = 0 'For Late Binding 
    Const OutLookFolderInbox As Long = 6 'For Late Binding 
    Const OutLookFormatHTML As Long = 2 'For Late Binding 
    Dim strSubject As String 
    Dim strAddress As String 


On Error Resume Next 
Set objOutlook = GetObject(, "Outlook.Application") 
On Error GoTo 0  

    If objOutlook Is Nothing Then 
     Set objOutlook = CreateObject("Outlook.Application") 
     Set objNameSpace = objOutlook.GetNamespace("MAPI") 
     objNameSpace.GetDefaultFolder(OutLookFolderInbox).Display 
    End If 

Set objEmail = objOutlook.CreateItem(OutLookMailItem) 

strSubject = "Hello World" 

    With objEmail 

     '.To = strToAddress 'Commented to prevent accidental send 

     .Subject = strSubject 

     .BodyFormat = OutLookFormatHTML 

     .Display 

     'Full Name of window can change depending on Tools -> Options -> Mail Format 
     'Changing this option for outgoing mail changes the window name. 
     'However, AppActivate appears not to require entire name but needs up to end 
     'of - Message which is included in heading following the Subject string 
     'irrespective of the Mail Format option chosen. 
     AppActivate (strSubject & " - Message") 

    End With  
End Sub 

ジミー・ペーニャがcontrast of EarlyBinding and LateBindingを議論する記事があります。

Ossiemacは、私は再フォーマットし、ここに置かれている、電子メールの送信にLateBindingを使用するためのいくつかのサンプルコードを提供しました