Makro
Sub MailSenden() Dim empfanger As String Dim betreff As String Dim body As String Dim attachment As String 'optional voller Pfad zum Attachment empfanger = "dafont@gmx.at" betreff = "e-mail Makro"