Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
284to288
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
284to288
284to288
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

von Excel Daten nach PP kopieren

von Excel Daten nach PP kopieren
29.07.2003 08:59:54
Bianca
Hallo,
hab hier ein großes Problem!!!
Ich will bestimmte Zeilen aus Excel nach PP kopieren. Ich kann bisher auch P öffnen nur mit dem kopieren klappts noch nicht so wirklich, kann mir da jemand helfen??
Option Explicit
Dim PptApp As PowerPoint.Application, PptPtt As PowerPoint.Presentation

Sub Form_Load()
OpenPresentation ("P:\CBR\Präsentationen\Vorlagen TG\tg_board_budget_neu.ppt")
End Sub


Sub OpenPresentation(Fullname$)
Set PptApp = CreateObject("PowerPoint.Application")      'Erstellt eine neue PowerPoint.Application  (entspricht "new")
PptApp.Visible = True
Set PptPtt = PptApp.Presentations.Open(Fullname$)
nach_pp_kopiern
With PptApp
.Visible = True
.Activate
End With
Selection.Paste
With ActiveWindow.Selection.ShapeRange
.Left = 29.25
.Top = 56.625
.Width = 661.625
.Height = 426.875
End With
'ActiveWindow.View.GotoSlide Index:=ActivePresentation.Slides.Add(Index:=2, Layout:=ppLayoutBlank).SlideIndex
'ActiveWindow.View.Paste
End Sub


Sub nach_pp_kopiern()
Sheets("Cover sheet").Select
Range("A2:I15").Select
Selection.Copy
End Sub

Danke schon mal im Voraus
Gruß
Bianca

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: von Excel Daten nach PP kopieren
29.07.2003 09:08:58
Nike
Hi,
Powerpoint zu programmieren ist fast so schlimm, wie Word ;-)
daher hier ein echt guter Link zum Thema:
http://www.lemitec.de/ppt/pptindex.htm
Bye
Nike

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige