VBA - Tabellen Auschnitte von Excel nach PP kopieren
Office 2003
Hallo Leute,
Könnt ihr mir helfen, ich muss etwas für Office in VBA Coden.
Und zwar muss ich ausgesuchte Zeilen einer Excel Tabelle in eine PowerPoint Datei übertragen. Ob ich die Zeilen markiere oder per UserForm angebe ist egal.
Und es sollen auch nicht alle Zellen aus dieser Zeile genommen werden sondern immer nur paar aus den selben Spalten.
bisher habe ich das, aber das kopiert mir natürlich nur eine komplette Range.
[CODE]
Dim App As Object
Dim Slide As Object
Dim rngCell As Range
Set App = CreateObject("PowerPoint.Application")
ActiveSheet.Range("A1:B5").Copy
App.Visible = True
App.Presentations.Open "c:\Vorlage Issue Log.ppt"
Set Slide = App.ActivePresentation.Slides(1)
Slide.Shapes.Paste
[/CODE]
Könnt ihr mir helfen, ich muss etwas für Office in VBA Coden.
Und zwar muss ich ausgesuchte Zeilen einer Excel Tabelle in eine PowerPoint Datei übertragen. Ob ich die Zeilen markiere oder per UserForm angebe ist egal.
Und es sollen auch nicht alle Zellen aus dieser Zeile genommen werden sondern immer nur paar aus den selben Spalten.
bisher habe ich das, aber das kopiert mir natürlich nur eine komplette Range.
[CODE]
Dim App As Object
Dim Slide As Object
Dim rngCell As Range
Set App = CreateObject("PowerPoint.Application")
ActiveSheet.Range("A1:B5").Copy
App.Visible = True
App.Presentations.Open "c:\Vorlage Issue Log.ppt"
Set Slide = App.ActivePresentation.Slides(1)
Slide.Shapes.Paste
[/CODE]
Please also mark the comments that contributed to the solution of the article
Content-Key: 111525
Url: https://administrator.de/contentid/111525
Printed on: April 20, 2024 at 02:04 o'clock