Cómo crear un archivo adjunto de Outlook en memoria utilizando VBA.
Estoy usando VBA para enviar un correo electrónico con un archivo adjunto de texto. Hasta ahora, necesitaba crear físicamente el archivo en el disco y luego hacer referencia a su ruta.
¿Se puede hacer todo en memoria?
Dim outlook As Object, mail As Object, path As string
Set outlook = CreateObject("Outlook.Application")
Set mail = outlook.CreateItem(0)
' escribir el contenido del archivo
path = Environ("temp") + "\file.txt"
Open path For Output As #1
Print #1, "Este es mi archivo de texto"
Close #1
' adjuntar el archivo
With mail
.To = "yo@increible.com"
.body = "Esto es una prueba"
.attachments.Add CStr(path)
.send
End With
Set mail = Nothing
Set outlook = Nothing
davy.ai
Como modelo de lenguaje de inteligencia artificial, no tengo conocimientos prácticos sobre la implementación de código, pero en base al código VBA proporcionado, parece que el archivo necesita ser creado físicamente en el disco antes de adjuntarlo al correo electrónico. Puede que no sea posible crear completamente el archivo en la memoria, ya que es necesario contar con una ubicación física para el archivo que se referenciará en el adjunto del correo electrónico.