VBA Bild (.png) Einfügeautomatisierung Power Point

  • Sonstige

    VBA Bild (.png) Einfügeautomatisierung Power Point

    Hallo,
    Hätte Da mal ne frage bezüglich VB in Verbindung mit PowerPoint.
    Ich bin dabei ein VBA zu schreiben welches 8-10 .png pictures aus einem Ordner einlesen soll und in ein vorbereitetes ppt an bestimmte Positionen einfügt soll.
    Habe schon eine Programmoberfläche und bis zum Öffnen von Powerpoint bin ich schon gekommen.
    Jedoch möcht ich jetzt ein vorbereitetes ppt vom Desktop öffnen.

    Visual Basic-Quellcode

    1. Partial Class Splahscreen
    2. .
    3. .
    4. .
    5. 'Objekt ppApp anlegen
    6. Private ppApp As New PowerPoint.Application
    7. Private ppPres As PowerPoint.Presentation
    8. 'Methode zum Öffnen des Dokuments
    9. Private Sub PowerPointÖffnen()
    10. ppPres = ppApp.Open(C:\Documents and Settings\atsebe\Desktop\Powerpoint_Vorlage.ppt)
    11. End Sub
    12. 'Methode zum Schließen des Dokuments
    13. Private Sub PowerPointDokumentSchließen()
    14. ppPres.Close()
    15. End Sub
    16. 'Methode zum Schließen des Programms PP
    17. Private Sub PowerPointSchließen()
    18. ppApp.Quit()
    19. ppApp = Nothing
    20. End Sub
    21. .
    22. .
    23. .
    24. End Class

    Ich habe folgende Anzeige: siehe Anhang (fehler_VB_Pfad.bmp)

    Dann hätte ich noch eine 2.Frage:
    Wie kann ich dem PowerPoint Dokument ein Bild hinzufügen.
    Ich würde mich auch sehr freuen wenn jemand ein Tutorial kennt welches sich näher mit PowerPoint Automatisierung per VB beschäftigt.
    Vielen Dank für eure Hilfe
    Bilder
    • fehler_VB_Pfad.GIF

      5,58 kB, 629×181, 152 mal angesehen

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „badboerny“ ()