次の方法で共有

Search.Save メソッド (Outlook)

  • [アーティクル]

検索フォルダーに検索結果を保存します。

構文

式。保存 (SchFldrName)

表現Search オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
SchFldrName 必須 String 検索フォルダー名を表す文字列です。

解説

Save メソッドでは、同じ名前の検索フォルダーが既に存在する場合、エラーが表示されます。

例

次の Microsoft Visual Basic for Applications (VBA) の例では、件名行が "Test" と等しいアイテムを受信トレイで検索し、結果を検索フォルダーに保存します。 イベント プロシージャはAdvanceSearchComplete、検索が完了したときにブール値を True に設定しますblnSearchComp。 この ブール 変数は、検索が TestAdvancedSearchComplete() いつ完了するかを判断するためにプロシージャによって使用されます。 サンプル コードは、 などの ThisOutlookSessionクラス モジュールに配置する必要があり、イベント プロシージャを TestAdvancedSearchComplete() Outlook から呼び出す前にプロシージャを呼び出す必要があります。

Public blnSearchComp As Boolean 
 
 
 
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search) 
 
 MsgBox "The AdvancedSearchComplete Event fired" 
 
 blnSearchComp = True 
 
End Sub 
 
 
 
Sub TestAdvancedSearchComplete() 
 
 Dim sch As Outlook.Search 
 
 Dim rsts As Outlook.Results 
 
 Dim i As Integer 
 
 blnSearchComp = False 
 
 Const strF As String = "urn:schemas:mailheader:subject = 'Test'" 
 
 Const strS As String = "Inbox" 
 
 Set sch = Application.AdvancedSearch(strS, strF) 
 
 While blnSearchComp = False 
 
 DoEvents 
 
 Wend 
 
 sch.Save("Subject Test") 
 
End Sub

関連項目

オブジェクトを検索します。

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

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