Thema Datum  Von Nutzer Rating
Antwort
Rot markierter emailtext als pdf in einem freien ort speichern
 27.05.2016 09:47:53 Mylopotas
NotSolved
27.05.2016 18:55:49 Gast86152
NotSolved

Ansicht des Beitrags:
Von:
Mylopotas		 Datum:
27.05.2016 09:47:53		 Views:
1084		 Rating:
     
Antwort:
  Ja
Thema:
markierter emailtext als pdf in einem freien ort speichern

guten morgen. wer kann mir helfen. arbeite auf office 2013

benötige code um die markierten zeilen im Email als pdf abzuspeichern.

1.Speicherort und Dateiname sollte man von mal zu mal aussuchen können. oder 2. Speicherort vorgegeben, Dateiname frei.

habe es bis hierhin geschafft, jedoch nur mit fixen speicherort und name.

code:


Public Sub PdfSelection()
Dim wdApp As Word.Application
Dim wdDoc As Word.Document
  Dim wdSelection As Word.Selection
  Dim wdWin As Word.Window
  Dim olDoc As Word.Document
 
  Set wdApp = CreateObject("Word.Application")
  Set wdDoc = wdApp.Documents.Add(Visible:=True)
 
  Set olDoc = Application.ActiveInspector.WordEditor
  Set wdWin = olDoc.Windows(1)
  Set wdSelection = wdWin.Selection
  wdSelection.Range.Copy
  wdDoc.Range.Paste

wdDoc.ExportAsFixedFormat OutputFileName:="c:\temp\neuedatei.pdf", ExportFormat:=wdExportFormatPDF
 
   
  DoEvents
  wdDoc.Close False
  wdApp.Quit

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 markierter emailtext als pdf in einem freien ort speichern
 27.05.2016 09:47:53 Mylopotas
NotSolved
27.05.2016 18:55:49 Gast86152
NotSolved