Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
588to592
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
588to592
588to592
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

PowerPoint öffnen ohne Link??

PowerPoint öffnen ohne Link??
27.03.2005 08:28:42
tino
Hallo,
möchte PowerPoint Dokument ohne Link
öffnen aber wie? So wie unten geht’s schon
mal nicht!???
CreateObject("PowerPoint.application").documents.Open _
("c:\versuch\test.ppt").Application.Visible = True

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PowerPoint öffnen ohne Link??
27.03.2005 08:38:54
andre
Hallo Tino,
hier mal ein Beispiel mit word.
Dim wordObj As Word.Application
' Document öffnen
Set wordObj = CreateObject("Word.Application")
wordObj.Visible = False
On Error GoTo nixda
wordObj.Documents.Open DeinDateiName
With wordObj
geht nicht!
27.03.2005 08:51:05
tino
geht nicht habe Word durch PowerPoint ersetzt.
Meine Version war auch von Word.
"Typ unverträglich"!
Vieleicht ist der Name Powerpoint falsch?!
AW: geht nicht!
27.03.2005 09:13:35
andre
Hallo Tino,
dann nimm mal das. Problem ist nur, dass powerpoint msoTrue statt True will.

Sub test3()
Dim powerpointObj As PowerPoint.Application
' Document öffnen
Set powerpointObj = CreateObject("powerpoint.Application")
powerpointObj.Visible = msoTrue
On Error GoTo nixda
powerpointObj.Presentations.Open "C:\test\test1.ppt"
MsgBox "ok"
nixda:
End Sub

Anzeige
AW: geht nicht!
27.03.2005 09:30:57
tino
Bekomme bei,
Dim powerpointObj As PowerPoint.Application
immer Fehlermeldung
siehe Bild
Userbild
AW: geht nicht!
27.03.2005 09:39:52
andre
Hallo Tino,
da musst Du unter Extras-Verweise die Microsoft Powerpoint Library aktivieren.
Grüsse, Andre
AW: geht nicht!
27.03.2005 09:55:19
tino
Danke jetzt Funktionierts!
Frohe Ostern
... freut mich, auch Dir schöne Ostern oT
27.03.2005 10:07:10
andre

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige