訪問 2010 PDF，使用 VBA 代碼保存和通過電子郵件發送報告

Question

我正在使用 Access 2010，發現“以 PDF 格式發送到電子郵件”命令必不可少。 但是，我有一個問題，因為我對用戶隱藏了主功能區，這意味着他們實際上無法單擊該按鈕。

誰能告訴我 VBA 代碼可以讓我 PDF、保存文件並通過 Gmail 通過電子郵件發送基於給定唯一 ID 的個人報告？ 我很高興用戶添加電子郵件地址、主題和郵件正文，並讓他們單擊發送。

我從以下代碼開始，但它不起作用。

Dim myPath As String
Dim strReportName As String

DoCmd.OpenReport "rptsuivi", acViewPreview, , "tblsuivi.[N°Suivi] = '" & Me.[CompanyName] & "' "

myPath = "C:\"
strReportName = "Raport de suivi" + "-" + ".pdf"

DoCmd.OutputTo acOutputReport, acFormatPDF, , myPath + strReportName, True
DoCmd.Close acReport, "rptsuivi"

Answer 1

看起來你可以創建一個只運行功能區命令的宏

https://msdn.microsoft.com/en-us/library/office/ff862419.aspx

http://www.ribboncreator2010.de/Onlinehelp/EN/_2el0osmon.htm

您需要為您嘗試使用的功能區功能找到正確的 idMso。

Sub SendToEmailAsPDF()

Application.CommandBars.ExecuteMso "FileSendAsAttachment"

End Sub