Folder.GetStorage メソッド (Outlook)

Outlook ソリューションのデータを格納する、親 Folder 上の StorageItem オブジェクトを取得します。

構文

expression. GetStorage( _StorageIdentifier_ , _StorageIdentifierType_ )

式Folder オブジェクトを表す変数。

パラメーター

戻り値

ソリューションのデータを格納するために使用している StorageItem オブジェクト。

注釈

GetStorage メソッドは、StorageIdentifier で指定された識別子を使用して Folder オブジェクトの StorageItem を取得し、StorageIdentifierType で指定された識別子の種類を持ちます。 StorageItem は、非表示のアイテム、 フォルダー アカウントと共に移動し、オンラインとオフラインがあるのです。

StorageIdentifierType に olIdentifyByEntryID 値を使用して StorageItem の EntryID を指定した場合、GetStorage メソッドは指定された EntryID を持つ StorageItem を返します。 該当する EntryID の StorageItem が見つからなかった場合、または StorageItem が存在しない場合、GetStorage メソッドでエラーが発生します。

StorageIdentifierType の olIdentifyByMessageClass 値を使用して StorageItem のメッセージ クラスを指定した場合、GetStorage メソッドは指定されたメッセージ クラスを持つ StorageItem を返します。 同じメッセージ クラスの複数の項目がある場合、 GetStorage メソッドは、最新の PR_LAST_MODIFICATION_TIME に項目を返します。 該当するメッセージ クラスの StorageItem が存在しない場合、GetStorage メソッドは、StorageIdentifier で指定されたメッセージ クラスの StorageItem を新たに作成します。

StorageItem の Subject を指定した場合、GetStorage メソッドは、GetStorage 呼び出しで指定された Subject を使用して StorageItem を返します。 同じ Subject のアイテムが複数ある場合、GetStorage メソッドはその中で PR_LAST_MODIFICATION_TIME が最も新しいものを返します。 指定した Subject に StorageItem が存在しない場合、GetStorage メソッドは StorageIdentifier で指定された Subject を使用して新しい StorageItem を作成します。

GetStorage は、ストアのフォルダーの種類がサポートされていない場合にエラーを返します。 GetStorage は、呼び出されたときに、次のストアにはエラーが返ります。

• Hotmail ストア

• Internet Message Access Protocol (IMAP) ストア

• ストアを委任します。

• パブリック フォルダー ストア

項目の Save メソッドを明示的に呼び出すまで、新しく作成された StorageItem のサイズは 0 (0) です。

ソリューションのデータ格納について詳しくは、「ソリューションのデータを保存する」を参照してください。

例

Visual Basic for Applications では、次のコード サンプルでは、 StorageItem オブジェクトを使用して個人用のソリューション データを格納する方法を示します。 受信トレイ フォルダー内の StorageItem オブジェクトのカスタム プロパティにデータを保存します。 手順を次に示します。

1. コード サンプルでは、受信トレイで件名を [マイ プライベート ストレージを持つ既存の StorageItem オブジェクトを取得 GetStorage を呼び出します。 既にその件名の StorageItem が存在しない場合、 GetStorage は、その件名の StorageItem オブジェクトを作成します。

2. StorageItem を新規に作成された場合、コード サンプルは、オブジェクトのカスタム プロパティ「注文数」を作成します。 「注文数」が受信トレイに非表示のアイテムのプロパティであることに注意します。

3. コード サンプルは、「注文番号」に値を代入し、 StorageItem オブジェクトを保存します。

Sub AssignStorageData() 
 Dim oInbox As Outlook.Folder 
 Dim myStorage As Outlook.StorageItem 
 
 Set oInbox = Application.Session.GetDefaultFolder(olFolderInbox) 
 ' Get an existing instance of StorageItem, or create new if it doesn't exist 
 Set myStorage = oInbox.GetStorage("My Private Storage", olIdentifyBySubject) 
 ' If StorageItem is new, add a custom property for Order Number 
 If myStorage.Size = 0 Then 
 myStorage.UserProperties.Add "Order Number", olNumber 
 End If 
 ' Assign a value to the custom property 
 myStorage.UserProperties("Order Number").Value = 100 
 myStorage.Save 
End Sub

関連項目

フォルダー オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。