Sheet als pdf versenden.
29.09.2014 19:28:13
Keiler
ich weiß nicht mehr weiter.
Ich habe mit dem Makrorecorder das senden als pdf per Mail aufgenommen.
Da hat alles geklappt. Wenn ich jetzt jedoch das Makro wieder ablaufen lasse,
hängt immer eine *.xlsm Datei an der Mail statt eine PDF.
Was muss ich noch anpassen damit es funktioniert?
'-----------------------------------------------------------
Sub Senden()
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"c:\temp\Bestellformular.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
Application.Dialogs(xlDialogSendMail).Show ("xyz@xyz.com")
End Sub
'-----------------------------------------------------------
Vielen dank schon mal
Sascha