vba - attachments - excel macro to send email with excel attachment

Documentos de texto Outlook 2007

Question

Me preguntaba si hay alguna forma de leer información de un archivo de texto con VBA en Outlook 2007.

Gracias por la atención

Answer 1

 Private Sub Command1_Click()
''Declare variables.
Dim fso As New FileSystemObject
Dim ts As TextStream
''Open file.
Set ts = fso.OpenTextFile(Environ("windir") & "/system.ini")
''Loop while not at the end of the file.
Do While Not ts.AtEndOfStream
Debug.Print ts.ReadLine
Loop
''Close the file.
ts.Close
End Sub

Del objeto MSDN FSO

Open sPath, #FileNo más cómodo que Open sPath, #FileNo . Debe agregar FSO a su proyecto con "Herramientas -> Referencias", como se describe en MSDN.