Search.Tag プロパティ (Outlook)

現在の検索条件の名前を指定する 文字列 を返します。 Tag プロパティを使用して、特定の検索を識別します。 読み取り専用です。

構文

式。タグ

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

注釈

Tag プロパティは、 Search オブジェクトを作成するときは、 ここ を使用して設定されています。

例

次の Visual Basic for Applications (VBA) の例では、フラグのないすべてのアイテムをユーザーの受信トレイから検索します。 Tag プロパティで指定された名前 "FlagSearch" が検索に指定されます。 AdvanceSearchComplete イベント プロシージャは、検索が完了するとブール値blnSearchCompTrue に設定されます。 このブール変数は、検索がいつ完了したかを判断するために TestAdvancedSearchComplete() プロシージャによって使用されます。 Outlook によってイベント プロシージャを呼び出すには、サンプル コードを ThisOutlookSession などのクラス モジュールに配置し、 TestAdvancedSearchComplete() サブルーチンを呼び出す必要があります。 通常、検索は非同期であり (IsSynchronous プロパティを使用して検索が同期か非同期かを判断します)、複数の検索を同時に実行できるため、AdvanceSearchComplete イベント プロシージャはタグをユーザーに表示して、どの検索が完了したかをユーザーが特定できるようにします。

Public blnSearchComp As Boolean 
 
 
 
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search) 
 
 MsgBox "The AdvancedSearchComplete Event fired for " & _ 
 
 SearchObject.Tag & " and the scope was " & SearchObject.Scope 
 
 blnSearchComp = True 
 
End Sub 
 
 
 
Sub TestAdvancedSearch111Complete() 
 
 'List all items in the Inbox that do NOT have a flag: 
 
 Dim objSch As Outlook.Search 
 
 Const strF As String = "urn:schemas:httpmail:messageflag IS NULL" 
 
 Const strS As String = "Inbox" 
 
 Dim rsts As Outlook.Results 
 
 Dim i As Integer 
 
 blnSearchComp = False 
 
 Const strF1 As String = "urn:schemas:mailheader:subject = 'Test'" 
 
 Const strS1 As String = "Inbox" 
 
 Set objSch = _ 
 
 Application.AdvancedSearch(Scope:=strS1, Filter:=strF1, _ 
 
 Tag:="FlagSearch") 
 
 While blnSearchComp = False 
 
 DoEvents 
 
 Wend 
 
 Set rsts = objSch.Results 
 
 For i = 1 To rsts.Count 
 
 MsgBox rsts.Item(i).SenderName 
 
 Next 
 
End Sub

関連項目

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

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

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

  • Last updated on