Thema Datum  Von Nutzer Rating
Antwort
28.12.2018 17:07:37 Christine
NotSolved
Blau PPT als PDF Speichern - Objekterstellung durch ActiveX-Komponente nicht möglich
28.12.2018 19:35:25 Gast70117
NotSolved
28.12.2018 19:44:31 Gast70117
NotSolved
29.12.2018 15:11:00 Christine
NotSolved
30.12.2018 12:06:39 Gast70117
NotSolved

Ansicht des Beitrags:
Von:
Gast70117
Datum:
28.12.2018 19:35:25
Views:
530
Rating: Antwort:
  Ja
Thema:
PPT als PDF Speichern - Objekterstellung durch ActiveX-Komponente nicht möglich

wie gehabt

Option Explicit

Sub exportPPT()
'Refresh all Shape objects in named presentation
'
'Excel
Dim oWBData As Excel.Workbook

'PPT
Dim pptApp As PowerPoint.Application
Dim pp As PowerPoint.Presentation
Dim sl As PowerPoint.Slide
Dim sh As PowerPoint.Shape

'
Dim strPOTX As String, strPDF As String
Dim strPfad As String
'
Dim pptVorlage As String
'
 
   Application.ScreenUpdating = False
   
   strPfad = "E:\WordVBA\" 'Ordner der Vorlage
   strPOTX = "TestPräsi.pptx"
 
   'PPT
   Set pptApp = New PowerPoint.Application
   '
   pptVorlage = strPfad & strPOTX
   '
   Set pp = pptApp.Presentations.Open(pptVorlage)
   pptApp.WindowState = ppWindowMaximized
   '
   strPDF = Replace(pptVorlage, ".pptx", ".pdf")
   pp.SaveAs strPDF, ppSaveAsPDF
   '
   pp.Close
   pptApp.Quit
   
   Application.ScreenUpdating = True

'PPT
If Not pptApp Is Nothing Then Set pptApp = Nothing
If Not pp Is Nothing Then Set pp = 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
28.12.2018 17:07:37 Christine
NotSolved
Blau PPT als PDF Speichern - Objekterstellung durch ActiveX-Komponente nicht möglich
28.12.2018 19:35:25 Gast70117
NotSolved
28.12.2018 19:44:31 Gast70117
NotSolved
29.12.2018 15:11:00 Christine
NotSolved
30.12.2018 12:06:39 Gast70117
NotSolved