• Ek olarak gönderme 2. Microsoft Office programları (Excel, Word, PowerPoint vb.) kullanılarak dosya > paylaş > e-posta seçeneği ile PDF dosyası ek olarak gönderilebilir 2.
• Bulut depolama hizmeti kullanma 5. PDF dosyası, Google Drive, Dropbox veya OneDrive gibi bir bulut depolama hizmetine yüklenerek, alıcıya dosyanın bağlantısı gönderilebilir 5.
• Kod kullanma 3. Outlook üzerinden e-posta göndermek için aşağıdaki kod kullanılabilir 3:

Private Sub Report_DblClick(Cancel As Integer)
    DoCmd.OutputTo acOutputReport, Me.Name, acFormatPDF, "C:\PDF\" & [Forms]![MUSTERILER2]![FIRMAADI].Value & "_" & Format(Date, "dd_mm_yyyy") & ".pdf"
    MsgBox "PDF Aktarımı Tamamlandı", vbInformation, "Report Exported as PDF"

    Dim appOutLook As Outlook.Application
    Dim MailOutLook As Outlook.MailItem
    Dim RptName As String
    RptName = [Forms]![MUSTERILER2]![FIRMAADI].Value & "_" & Format(Date, "dd_mm_yyyy") & ".pdf"
    If Len(Dir(RptName)) > 0 Then Kill RptName
    DoCmd.OutputTo acOutputReport, Me.Name, acFormatPDF, RptName
    Set appOutLook = CreateObject("Outlook.Application")
    Set MailOutLook = appOutLook.CreateItem(olMailItem)

    With MailOutLook
        .To = "BURAYA ALICININ E-MAIL ADRESİ YAZILACAK"
        .Subject = "BURAYA KONU YAZILACAK"
        .HTMLBody = "E-MAIL METNİNİZ YAZILACAK"
        .Attachments.Add RptName
        .Send
    End With
    MsgBox "Mail Gönderildi", vbInformation, "Report Sent as PDF"
End Sub
Kopyala

to

subject

HTMLbody