|
下記のVBAでエクセルのファイルをpdfに変換して名をつけ保管する、と同時に自動的にメールへ添付したいのですがうまくいきません
「A」でエクセルをpdfに変換して名をつけて保管することができます。
「B」でメールを開き件名の挿入までできます。
「A」のpdfファイルを「B」のメールに添付するプログラムを教えて下さい。
windows7、.エクセルは2010です。
CDOでの方法もありますが、単純に「A」で作成したpdfファイルを
「B」のメールに自動的に添付したいのです
「A」
Sub メール()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\nakasima\Documents\見 積\見積書控\" & Range("O4").Value & ".pdf",_
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
「B」
Shell "C:\Program Files\Windows Live\Mail\wlmail.exe /mailurl:mailto:?subject=_
見積書送付の件"
End Sub
|
|