Método Search.Save (Outlook)
Guarda los resultados de la búsqueda en una carpeta de búsqueda.
Sintaxis
expresión. Guardar (SchFldrName)
Expresión Variable que representa un objeto Search .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
SchFldrName | Obligatorio | String | Cadena que representa el nombre de la carpeta de búsqueda. |
Comentarios
El método Save muestra un error si ya existe una carpeta de búsqueda con el mismo nombre.
Ejemplo:
El siguiente ejemplo de Microsoft Visual Basic para aplicaciones (VBA) se busca en la Bandeja de entrada los elementos cuyo asunto igual a "Test" y guarda los resultados en una carpeta de búsqueda. El AdvanceSearchComplete
procedimiento de evento establece el valor booleanoblnSearchComp
en True cuando se completa la búsqueda. Esta variable booleana se usa mediante el procedimiento TestAdvancedSearchComplete()
para determinar cuándo finaliza la búsqueda. El código de ejemplo debe colocarse en un módulo de clase como ThisOutlookSession
, y se debe llamar al TestAdvancedSearchComplete()
procedimiento antes de que Outlook pueda llamar al procedimiento de evento.
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
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.
Comentarios
https://aka.ms/ContentUserFeedback.
Próximamente: A lo largo de 2024 iremos eliminando gradualmente GitHub Issues como mecanismo de comentarios sobre el contenido y lo sustituiremos por un nuevo sistema de comentarios. Para más información, vea:Enviar y ver comentarios de