Note: The other languages of the website are Google-translated. Back to English

¿Cómo guardar solo archivos adjuntos específicos (Excel) en Outlook?

Outlook proporciona la función Guardar todos los archivos adjuntos para ayudarlo a guardar todos los archivos adjuntos en un correo electrónico en una carpeta específica a la vez. Sin embargo, si desea guardar solo ciertos tipos de archivos adjuntos en uno o más correos electrónicos, como libros de Excel, documentos de Word, etc., ¿cómo lo logra? En este tutorial, le proporcionamos dos métodos para resolver este problema.

Guarde solo archivos adjuntos de formato de archivo específico en Outlook con código VBA
Guarde fácilmente solo archivos adjuntos de formato de archivo específico en Outlook con una herramienta increíble


Guarde solo archivos adjuntos de formato de archivo específico en Outlook con código VBA

El siguiente código de VBA puede ayudar a guardar solo archivos adjuntos de formato de archivo específico en uno o más correos electrónicos seleccionados en una carpeta específica. Por favor, haga lo siguiente.

1. Inicie su Outlook. En la lista Correo, seleccione uno o más correos electrónicos de los que desea guardar solo los archivos adjuntos en un formato de archivo específico.

2. presione el otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana. En la ventana inicial, haga clic en recuadro > Móduloy luego copie el código VBA a continuación en la ventana Módulo.

Código VBA: guarde solo archivos adjuntos específicos en un correo electrónico o varios correos electrónicos en una carpeta

Public Sub SaveSpecifyAttachments()
'Updated by ExtendOffice 20210617
Dim xItem As Object, xFldObj As Object
Dim xSelection As Selection
Dim xAttachment As Outlook.Attachment
Dim xSaveFolder As String
Dim xFSO As Scripting.FileSystemObject
Dim xFilePath, xFilesSavePath As String
Dim xExtStr As String, xExt As String
Dim xExtArr() As String, xS As Variant
On Error Resume Next
Set xFldObj = CreateObject("Shell.Application").BrowseforFolder(0, "Select a Folder", 0, 16)
Set xFSO = New Scripting.FileSystemObject
If xFldObj Is Nothing Then Exit Sub
xSaveFolder = xFldObj.Items.Item.Path & "\"
Set xSelection = Outlook.Application.ActiveExplorer.Selection
xExtStr = InputBox("Attachment Format:" + VBA.vbCrLf + "(Please separate multiple file extensions by comma.. Such as: .docx,.xlsx)", "Kutools for Outlook", xExtStr)
If Len(Trim(xExtStr)) = 0 Then Exit Sub
For Each xItem In xSelection
    If xItem.Class = olMail Then
        xFilesSavePath = ""
        For Each xAttachment In xItem.Attachments
            xFilePath = xSaveFolder & xAttachment.FileName
            xExt = "." & xFSO.GetExtensionName(xFilePath)
            xExtArr = VBA.Split(xExtStr, ",")
            xS = VBA.Filter(xExtArr, xExt)
            If UBound(xS) > -1 Then
                xAttachment.SaveAsFile xFilePath
                If xItem.BodyFormat <> olFormatHTML Then
                    xFilesSavePath = xFilesSavePath & vbCrLf & "<file://" & xFilePath & ">"
                Else
                    xFilesSavePath = xFilesSavePath & "
" & "" & xFilePath & "" End If End If Next xItem.Save End If Next Set xFSO = Nothing End Sub

3. Hacer clic en Herramientas > Referencias, En la Referencias - Proyecto diálogo, marque el Tiempo de ejecución de secuencias de comandos de Microsoft cuadro y haga clic en el OK

4. presione el F5 clave para ejecutar el código. En el estalló Busca por carpetas cuadro de diálogo, elija una carpeta para guardar los archivos adjuntos.

5. Y luego, haga clic en OK, en el siguiente Kutools para Outlook cuadro de diálogo, ingrese la extensión del archivo del adjunto que guardará en el cuadro de texto y haga clic en OK.

Nota: Para múltiples extensiones de archivo, debe separarlas con comas.

Entonces solo se guardan los archivos adjuntos especificados.


Guarde fácilmente solo archivos adjuntos de formato de archivo específico en Outlook con una herramienta increíble

Si eres nuevo en VBA, aquí te recomendamos usar el Guardar todos los archivos adjuntos característica de Kutools para Outlook. Con esta función, puede guardar fácilmente solo los archivos adjuntos en un formato de archivo específico en Outlook.

1. Seleccione los correos electrónicos de los que desea guardar solo los archivos adjuntos en un formato de archivo específico.

2. Hacer clic en Kutools > Herramientas de adjunto > Guardar todo.

3. En el Guardar configuración cuadro de diálogo, debe configurarlo de la siguiente manera.

3.1) en el Guardar archivos adjuntos en esta carpeta sección, haga clic en botón para seleccionar una carpeta para guardar los archivos adjuntos;
3.2) Haga clic en opciones avanzadas botón para desplegar el cuadro de diálogo;
3.3) en el Condiciones de filtrado sección, compruebe el Tipo de apego casilla de verificación, luego ingrese la extensión de archivo de los archivos adjuntos que guardará en el texto.
Consejos: Para múltiples extensiones de archivo, debe separarlas con punto y coma.
3.4) Haga clic en OK botón. Ver captura de pantalla:

4. Aparece un cuadro de diálogo que le recuerda que si desea guardar los archivos adjuntos, haga clic en OK para continuar.

5. Luego aparece otro cuadro de diálogo para decirle cuántos archivos adjuntos se han guardado, haga clic en el OK

Ahora solo se guardan los archivos adjuntos de formato de archivo específico.

Presione aquí para saber más sobre esta función.

  Si desea tener una prueba gratuita (30-día) de esta utilidad, haga clic para descargarloy luego vaya a aplicar la operación según los pasos anteriores.


Artículos relacionados:


Kutools para Outlook: trae 100 funciones avanzadas a Outlook y hace que el trabajo sea mucho más fácil.

  • Auto CC / BCC por reglas al enviar correo electrónico; Reenvío automático Varios correos electrónicos personalizados; Respuesta automática sin servidor de intercambio y más funciones automáticas ...
  • Advertencia de BCC - mostrar mensaje cuando intente responder a todos si su dirección de correo está en la lista CCO; Recordar si faltan archivos adjuntosy más funciones de recordatorio ...
  • Responder (todos) con todos los archivos adjuntos en la conversación de correo; Responder muchos correos electrónicos en segundos; Agregar saludo automáticamente cuando responda; Agregar fecha al asunto ...
  • Herramientas de archivos adjuntos: administre todos los archivos adjuntos en todos los correos, Desconexión automática, Comprimir todo, Renombrar todo, Guardar todo ... Informe rápido, Contar correos seleccionados...
  • Potentes correos electrónicos no deseados por costumbre; Eliminar correos y contactos duplicados... Le permite hacerlo de forma más inteligente, más rápida y mejor en Outlook.
tiro kutools outlook kutools pestaña 1180x121
tiro kutools outlook kutools plus pestaña 1180x121
 
Comentarios (0)
Aún no hay calificaciones. ¡Sé el primero en calificar!
No hay comentarios publicados aquí todavía
Deje sus comentarios
Publicar como invitado
×
Califica esta publicación:
0   Personajes
Ubicaciones sugeridas

Siganos

Copyright © 2009 - www.extendoffice.com. | Reservados todos los derechos. Energizado por ExtendOffice, | Mapa del Sitio
Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y / o en otros países.
Protegido por Sectigo SSL