[請教]如何將Excel文件列印PDF並Email？

小弟目前在頁面設計一個按鈕，使用以下巨集、自動列印成ＰＤＦ、並存在指定路徑，
想請教如何修改成存完ＰＤＦ自動抓B3欄位的EMAIL 地址，經由Outlook傳送出去？

如果可以的話，也希望能把B4欄位當作主旨


Sub Print_PDF()

File_Name = Range("B12").Value

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, filename:="C:\文件\" & File_Name & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False, From:=3, To:=3

End Sub




感謝！！