Thema Datum  Von Nutzer Rating
Antwort
Rot Daten v Excel nach Powerpoint als Bild importieren
14.10.2008 20:13:19 Frederik
NotSolved
15.10.2008 12:50:19 Holger
NotSolved

Ansicht des Beitrags:
Von:
Frederik
Datum:
14.10.2008 20:13:19
Views:
1872
Rating: Antwort:
  Ja
Thema:
Daten v Excel nach Powerpoint als Bild importieren
HAllo Leute,

ich bin an einer kniffligen Sache dran, ich habe mehrere Datensätze die ich von Excel (Daten und Diagramm) nach Powerpoint als Bild schicken möchte.

Die zusammenhängenden Daten sind in den Spalten A bis Z und jeweils 25 Zeilen lang.
Diese Darstellung möchte ich als Bild in Powerpoint darstellen. Diese Lösung habe ich annährend in den Foren gefunden, reicht jedoch nicht für mich aus!

Sub ShowInPP()
Dim objPP As Object
Dim objP As Object 'PowerPoint.Presentation
Dim objCL As Object 'PowerPoint.CustomLayout
Dim objS As Object 'PowerPoint.Slide

Set objPP = CreateObject("PowerPoint.Application")
Set objP = objPP.Presentations.Add
Set objCL = objP.SlideMaster.CustomLayouts.Add(1)
Set objS = objP.Slides.AddSlide(1, objCL)
ActiveSheet.Range("A1:H30").CopyPicture
With objS.Shapes.Paste 'PowerPoint.ShapeRange
.Left = (objCL.Width - .Width) / 2
.Top = (objCL.Height - .Height) / 2
End With
objPP.Visible = True
End Sub

Insgesamt können bis zu 50 Datensätze folgen, oder aber auch nur 2 und ich weiß nicht, wie ich meine "wenn dann" Bedingung einbauen muss, um nur bis zum letzten Diagramm/Datensatz meine Daten nach Powerpoint exportiere. Jeder Datensatz ist von der Länge her identisch!

Ich hoffe ihr könnt mir helfen

Danke im Voraus

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 Daten v Excel nach Powerpoint als Bild importieren
14.10.2008 20:13:19 Frederik
NotSolved
15.10.2008 12:50:19 Holger
NotSolved