leider hab ich mit folgendem Makro ein Problem.
Was muss ich verändern, damit nicht nur der Inhalt von A1, sondern der Inhalt von A1:H5 versandt wird.
Mein Chef wünscht keine Copy des TB, sondern nur den Inhalt des Bereichs A1:H5.
Sub Mailversand() Sheets("Tabelle1").Select Dim outObj As Object Dim Mail As Object Dim Adresse As String Dim Betreff As String Dim text As String Dim Anhang As String Adresse = [I1] Betreff = [J1] text = [A1] Anhang = [K1] Set outObj = CreateObject("Outlook.Application") Set Mail = outObj.CreateItem(0) On Error Resume Next With Mail .Subject = Betreff .To = Adresse .Attachments.Add Anhang .Body = text End With Mail.send Set Mail = Nothing Set outObj = Nothing End Sub
Vielen Dank für jeden Tipp und noch einen schönen Tag.
Grüße
Gisela