Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Access 2003 Report per VBA speichern

Frage Microsoft Microsoft Office

Mitglied: e2Mario

e2Mario (Level 1) - Jetzt verbinden

25.05.2009, aktualisiert 14:31 Uhr, 13344 Aufrufe, 4 Kommentare

Hallo Leute,

kann ich in Access einen erstellen Report per VBA in einem bestimmtem Pfad als PDF Datei speichern und anschliessend diese Datei per Email (DoCmd.SendObject) versenden?

DANKE für eure Hilfe!

lg
Mario
Mitglied: NilsErik
25.05.2009 um 14:41 Uhr
Mit 2003 geht es soweit ich weiß nicht mit ohne Zusatztools.

http://www.lebans.com/reporttopdf.htm funktionierte aber bei mir.

Ab 2007 geht es direkt mit SendObject (acFormatPDF).
Bitte warten ..
Mitglied: e2Mario
25.05.2009 um 14:48 Uhr
Danke für den Tip.

Als "Notlösung" könnte ich den Report ja öffnen und mit einem Pdf-Drucker manuell abspeichern. Aber kann ich dann die erzeugte Datei ins Mail einfügen?
Wenn ja, wie müsste das Script aussehen?
Bitte warten ..
Mitglied: NilsErik
25.05.2009 um 15:25 Uhr
Erst erstellst Du den Bericht als PDF. Danach wird der Bericht am einfachsten mit Outlook verschickt.

Bei Outlook nervt je nach Einstellung die Standard-Sicherheitsabfrage. Diese kann man z.B. mit VB Script umgehen. Das wird etwas aufwendiger.

Ohne Fehlerbehandlung usw.:

Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookRecip As Outlook.Recipient
Dim objOutlookAttach As Outlook.Attachment
Dim xlapp As Object
Dim bRet As Boolean
Dim sPfad As String
dim sText As String
Dim sBetreff As String
Dim sAn As String

' PDF-Datei erzeugen
sPfad = "C:\Daten\BerichtPDF.pdf"
bRet = ConvertReportToPDF("Berichtname", vbNullString _
, sPfad, False, False, 0, "", "", 0, 0)

' Als Outlookmail verschicken
' Mail erstellen

Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)

With objOutlookMsg
.display
.To = sAn
.Subject = sBetreff
.body = sText
.Attachments.Add sPfad, 1, 1

.Send

End With

Set objOutlook = Nothing
Bitte warten ..
Mitglied: e2Mario
08.06.2009 um 10:28 Uhr
SUPER DANKE - klappt perfekt und ich spar mir nun die lästige Email schreiberei!

lg
Bitte warten ..
Ähnliche Inhalte
Datenbanken
gelöst Access Report per Email versenden, hat jemand zufällig einen Code dafür(VBA) (7)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Microsoft Office
gelöst VBA Excel Tabellenblätter als PDF speichern (8)

Frage von Florian86 zum Thema Microsoft Office ...

VB for Applications
gelöst VBA-Makro verschwindet nach Speichern (5)

Frage von lupi1989 zum Thema VB for Applications ...

Neue Wissensbeiträge
Windows Server

Umstellung SHA 1 auf SHA 2 - Migration der CA von CSP auf KSP

Tipp von Badger zum Thema Windows Server ...

Windows 10

Quato DTP94 unter Windows 10 x64 installieren und verwenden

Anleitung von anteNope zum Thema Windows 10 ...

Windows 10

Win10 1703 und Nutzerkennwörter bei Ersteinrichtung - erstaunliche Erkenntnis

(15)

Erfahrungsbericht von DerWoWusste zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Server-Hardware
HP DL380 G7: Booten vom USB via USB 3.1-PCI-e Karte möglich? (24)

Frage von Paderman zum Thema Server-Hardware ...

Windows 7
Bluesreens unternehmensweit (19)

Frage von SYS64738 zum Thema Windows 7 ...

LAN, WAN, Wireless
IP Adressen - Modem - Switch - Accesspoint (18)

Frage von teuferl82 zum Thema LAN, WAN, Wireless ...

Windows Netzwerk
gelöst DNS ins mehreren Subnetzen (15)

Frage von joerg zum Thema Windows Netzwerk ...