Access VBA 2016 SendObject acSendReport Outlook (keine Rückmeldung)

Hallo Dzevad Beciragic,

Um hilfe mit Access zu bekommen ist die
beste Möglichkeit hier.

Im Forum sind viele Fragen Beantwortet und können auch direkt an Developer gestellt werden.

Dieser
Artikel hier könnte ihnen vlt helfen, aber am besten wäre es nochmal selbst

dort zu recherchieren und zu fragen.

Falls du sonst noch Fragen hast scheu dich nicht zu fragen.

Lg

Can S.

Kurze Ergänzung:

irgendwie erinnert mich das an mein Problem mit einer selbsterstellten Access DB vom April/Mai 2018 (?) als Access 2016 die VB Scripte als beschädigt auswies, aber Access 2010 mit der DB arbeiten konnte. Ursache war damals, dass zweizeilige VBA-Befehle als
fehlerhaft galten...

Nett war vor allem, dass nur löschen des GESAMTEN VBA Codes im Access möglich war (ohne eine Möglichkeit des Exports etc.), ist schon sehr hilfreich ...

Hallo!
Den Ribbon-Tab "Entwicklertools" hat es in Access noch nie gegeben. Ebensowenig wie einen Makrorekorder. Access ist in mehrfacher Hinsicht anders.
Eine Schaltfläche für VBA findest du unter "Datenbanktools". Ebenso zu Makros, die aber in Access etwas anderes sind, nämlich eine zeilenbasierte Befehlsstruktur. VBA ist hier VBA. ;-)
Den VBA-Editor kannst du wie überall in Office auch mit Alt+F11 öffnen oder in Access auch über die Ereignis-Eigenschaften von Formularen oder Berichten.
s.a. Einführung in die Access-Programmierung
Servus
Karl

Mit SendObject kannst du nur Anhänge versenden. Wenn du den Body setzen willst, kannst du das per Outlook Automation in VBA. Beispiel:

Sub TestMail()    Dim objOL As Object

    Dim objMail As Object

    Set objOL = CreateObject("Outlook.Application")

    If objOL Is Nothing Then    

        MsgBox "Outlook nicht installiert", vbExclamation

        Exit Sub

    End If

    Set objMail = objOL.CreateItem(0) '0=olMailItem

    With objMail      .Recipients.Add "empfaenger@outlook.com"

      .Body = "Hier kommt der Inhalt deiner Anfrage hin."

      .Subject = "Und hier der Betreff"

      '.Attachments.Add strFile 'Falls ein Anhang rein soll.

      .Send    End With
    Set objMail = Nothing  'Aufraeumen

    Set objOL = NothingEnd Sub
(Luftcode)
Gruss - Peter

Hallo!

Falls das heißen soll, dass im VBA-Editor die Menüs und Symbolleisten fehlen, dann s. meinen abschließenden Beitrag in

dieser Diskussion.