Thema Datum  Von Nutzer Rating
Antwort
Rot Excel-Sheet al pdf und per Mail versenden
 22.07.2017 14:26:06 Firefighter2601
NotSolved
22.07.2017 14:55:45 Crazy Tom
NotSolved

Ansicht des Beitrags:
Von:
Firefighter2601		 Datum:
22.07.2017 14:26:06		 Views:
1205		 Rating:
     
Antwort:
  Ja
Thema:
Excel-Sheet al pdf und per Mail versenden

Hallo,


ich bin auf der Suche nach Hilfe. Ich habe mich in das Abenteuer Visual Basic gewagt, komme aber nicht zum Ziel. Ich möchte in einer Excel-Tabelle eine Seite als pdf speichern und drucken und als Mail an einen vorher definierten Empfänger senden. Die Datei muss nach Angaben in meiner Tabelle kombiniert mit Datum im gleichen Ordner wie die Exceldatei gespeichert werden. Bis hierhin klappt es auch, aber ich bekomme den Versand nicht hin, der Pfad bzw. der Tabellenname ist nicht auffindbar. Der Fehler wird für die Fett markierte Zeile gezeigt. Wie gesagt ich habe wirklich keine Anhng von VBA und brauche wirklich "mundgerechte Hilfe! Vielen Dank vorab für die Hilfe!

Grüße

Firefighter2601

Sub PDFundSenden()
ChDir ThisWorkbook.Path
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Range("L2").Value & Format(Date, "YYYYMMDD") & ".pdf", OpenAfterPublish:=True

Dim Outlook As Object
Dim OutlookMailItem As Object
Dim myAttachmets As Object

Set OutlookApp = CreateObject("outlook.application")
Set OutlookMailItem = OutlookApp.CreateItem(0)
Set myAttachments = OutlookMailItem.attachments

With OutlookMailItem
.to = Range("J2")
.Subject = Range("L2")
.Body = Range("A100")
myAttachments.Add Range("L2").Value & Format(Date, "YYYYMMDD") & ".pdf"
'.send
.Display
End With

Set OutlookApp = Nothing
Set OutlookMailItem = Nothing

End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Excel-Sheet al pdf und per Mail versenden
 22.07.2017 14:26:06 Firefighter2601
NotSolved
22.07.2017 14:55:45 Crazy Tom
NotSolved