es gibt ja die Möglichkeit, eine Arbeitsmappe als pdf per Mail zu versenden siehe Anlage
https://www.herber.de/bbs/user/54380.xls
Ist es möglich auch nur das aktuelle Tabellenblatt als pdf per mail zu versenden?
Gruß
TOM
Sub Emil()
'E-mail senden
Sheets("DeinTabellenName").Select 'anpassen
ActiveSheet.Range("A1:F39").Select 'anpassen
'Das anzeigen der Envelope Commandbar ist unabdingbar
ActiveWorkbook.EnvelopeVisible = True
'Nun werden die Adressen vergeben
With ActiveSheet.MailEnvelope
.Introduction = "---blubberblubber ---" 'anpassen
.Item.To = "willi@bald.com" 'anpassen
.Item.Subject = "---blubber ---" 'anpassen
.Item.Send
End With
End Sub
Gruss
erwin
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen