Powerint在VB中的调用？解襄求救！！

Question

为什么这样简单的问题都没人回答，CSDN原来很菜。

Answer 1

看完 这篇文章， 你就 知道了。http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnpower97/html/ppppt_w95.asp

Answer 2

Dim appWord As Object
Set appWord = CreateObject("Powerpoint.Application")

Answer 3

sonicdater(发呆呆(我答问题*不吵架*因为我呆)先生：
你说的不是我所问的，我所问的是这个对象建立后如何打开呀，即后续的语句中的问号？
apppowerpoint.???????.Open (name2)

Answer 4

Dim ppApp As PowerPoint.Application
Dim ppPres As PowerPoint.Presentations
Dim ppPre As PowerPoint.PresentationPrivate Sub Command1_Click()
    Set ppApp = New PowerPoint.Application
    ppApp.Visible = msoTrue
    
    
    Set ppPres = ppApp.Presentations
    Set ppPre = ppPres.Add(WithWindow:=msoTrue)
    
End Sub

Answer 5

add Microsoft PowerPoint 9.0 Object Library
add Microsoft Office 9.0 Object Library
Dim ppApp As PowerPoint.Application
Dim ppPres As PowerPoint.Presentations
Dim ppPre As PowerPoint.PresentationPrivate Sub Command1_Click()
    Set ppApp = New PowerPoint.Application
    ppApp.Visible = msoTrue
    
    
    Set ppPres = ppApp.Presentations
    Set ppPre = ppPres.Open(FileName:="D:\test2.ppt", ReadOnly:=msoFalse)
End Sub

Answer 6

Dim PRES As Object
Set PRES = PPT.Presentations.Open("c:\[path]\[File Name]")