Partilhar via


Método Search.Save (Outlook)

Salva os resultados da pesquisa em uma Pasta de Pesquisa.

Sintaxe

expressão. Guardar (SchFldrName)

expressão Uma variável que representa um objeto de Pesquisa .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
SchFldrName Obrigatório String Uma sequência de caracteres que representa o nome da Pasta de Pesquisa.

Comentários

O método Save exibe um erro se já existir uma pasta de pesquisa com o mesmo nome.

Exemplo

Os seguintes Microsoft exemplo Visual Basic for Applications (VBA) localiza a caixa de entrada itens cujo assunto igual a 'Test' e salva os resultados em uma pasta de pesquisa. O AdvanceSearchComplete procedimento do evento define o Valor booleanoblnSearchComp como Verdadeiro quando a pesquisa estiver concluída. Essa variável Boolean é usada pelo procedimento TestAdvancedSearchComplete() para determinar quando a pesquisa estiver concluída. O código de exemplo tem de ser colocado num módulo de classe, como ThisOutlookSession, e o TestAdvancedSearchComplete() procedimento tem de ser chamado antes de o procedimento do evento poder ser chamado pelo 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

Confira também

Objeto Search

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.