Mail senden (anhang)
12.12.2002 14:15:40
chris b.
habe ein Makro das mir automatisch eine mail an einen user schickt.Ich möchte aber gerne das wenn das Makro ausgeführt wird es mir die datei in ->> "C:\Chris\home\test.txt" als anhang mitschickt in der E-mail. Habe schon verzweifelt gesucht unter attachments aber kann leider nichts finden. Ich hoffe ihr könnt mir da einen tipp geben. Danke schon einmal gruß Christian
Das makro !
Sub mail_erstellen()
If IsNull(Application.MailSession) Then
Application.MailLogon "W7-Daemon", "w7vba", False
End If
ActiveWorkbook.SendMail Recipients:="testuser@xyz.de", Subject:="Testmailer"
If Not IsNull(Application.MailSession) Then Application.MailLogoff
End Sub