komme mal wieder mit einem Problem, welches ich im Forum nicht lösen kann:
Ich habe eine umfangreiche Datei, von der ich aber nur die "Tabelle1" mit allen Inhalten aber frei von Macro's per Mail versenden will, geht das?
Sub EmailActiveSheet()
ActiveWorkbook.Worksheets("Test").Copy
ActiveWorkbook.SendMail Recipients:="Test@web.de", _
Subject:="aktive Tabelle" Betreffs Zeile
ActiveWorkbook.Close savechanges:=False
End Sub
Sub EmailActiveSheet()
ActiveWorkbook.Worksheets("HdlAnf").Copy
ActiveWorkbook.SendMail Recipients:="test.mail.de", _
Subject:="Garantieanfrage"
ActiveWorkbook.Close savechanges:=False
End Sub