Cómo eliminar por lotes todas las carpetas de búsqueda en Outlook

De forma predeterminada, Outlook no permite a los usuarios eliminar más de una carpeta de búsqueda de una vez, sin mencionar la eliminación masiva de todas las carpetas de búsqueda. Pero este artículo te compartirá un método, que puede realizarlo.

Generalmente, para eliminar una carpeta de búsqueda, puede hacer clic derecho en una y elegir la opción "Eliminar carpeta" de su menú contextual. De esta manera, cuando necesite eliminar todas sus carpetas de búsqueda, seguramente lo considerará bastante tedioso y engorroso. Debes desear eliminarlos todos de una vez. Por lo tanto, aquí le presentaremos un medio que puede ayudarlo a lograr la eliminación en un santiamén.

Eliminar por lotes todas las carpetas de búsqueda

1. Desde el principio, debe iniciar Outlook de la forma habitual.
2. Luego, después de acceder a la pantalla principal de Outlook, debe presionar los botones de tecla "Alt + F11".
3. De inmediato, accederá a la ventana "Microsoft Visual Basic para aplicaciones".
4. Posteriormente, debe buscar y abrir un módulo que no esté en uso.
5. A continuación, puede copiar y pegar el siguiente código VBA en este módulo.

Sub BatchDeleteAllSearchFolders()
    Dim objStores As Outlook.Stores
    Dim objStore As Outlook.store
    Dim objSearchFolders As Outlook.Folders
    Dim objSearchFolder As Outlook.Folder

    On Error Resume Next
    Set objStores = Outlook.Application.Session.Stores
 
    For Each objStore In objStores
        'Get all search folders under each Outlook data file
        Set objSearchFolders = objStore.GetSearchFolders
        For Each objSearchFolder In objSearchFolders
            'Delete each search folder
            objSearchFolder.Delete
        Next
    Next
End Sub

Notas:

• Quizás haya configurado varias cuentas de correo electrónico en su Outlook. Y cada uno tiene sus propios archivos PST. En cada archivo, puede crear algunas carpetas de búsqueda. Con el código anterior, se eliminarán todas las carpetas de búsqueda, sin importar en qué archivos se encuentren.
• Si desea especificar un archivo de datos de Outlook, puede agregar la siguiente línea en "Para cada objStore en objStores". Aquí debe cambiar "John Smith" por el nombre para mostrar de su propio archivo PST.

If objStore.DisplayName = "John Smith" Then
 . . . . . . . . . . . . . . .
End If

6. Después de eso, debe cambiar su nivel de seguridad macro de Outlook a bajo.
7. Finalmente, en la ventana "Microsoft Visual Basic para Aplicaciones", para ejecutar esta macro, puede hacer clic en el botón de la tecla F5.
8. Una vez que finalice la macro, encontrará que se han eliminado todas las carpetas de búsqueda de Outlook.

Proteja sus datos de Outlook

Debido a que Outlook es propenso a la corrupción, debe hacer grandes esfuerzos para mantener los datos de Outlook bien protegidos. Sin duda, una de las formas más vitales es hacer copias de seguridad consistentes y actualizadas de sus archivos de Outlook. Además, para ofrecer un rescate inmediato en caso de Corrupción de Outlook, es mejor que prepare una herramienta de reparación convincente y de buena reputación, como DataNumen Outlook Repair.

Introducción del autor:

Shirley Zhang es experta en recuperación de datos en DataNumen, Inc., que es el líder mundial en tecnologías de recuperación de datos, incluyendo recuperar sql y productos de software de reparación de Outlook. Para más información visite www.datanumen.com