指定變量powerpoint.presentation

我有一個小問題，我使用vb6通過代碼修改了一個powerpoint。當我從vb6打開它時，它將它分配給一個全局變量來處理它從一個不同的過程。我的問題是如何在開始我的程序之前將它分配給一個變量，如果它已經打開的話。指定變量powerpoint.presentation

我嘗試這種代碼，但沒有工作

dim ppt as powerpoint.presentation 
Set ppt = GetObject(pptfile) ' pptfile is powerpoint path and filename that is opened

來源

2014-03-28 loosserman

這是一個字符串，請檢查您的字符串。沒有必要引用它。你的代碼在這裏工作。

如果文件未打開，excel將打開隱藏文件。當你的引用超出範圍時excel關閉。

Private Sub Form_Load() 
    Dim ppt As Excel.Workbook 
    pptfile = "C:\Users\user\Documents\Super.xls" 
    Set ppt = GetObject(pptfile) 
    MsgBox ppt.application & " " & Err.Number & " " & Err.Description 
    MsgBox ppt.FullNameURLEncoded 
End Sub

來源

2014-03-29 01:11:26

指定變量powerpoint.presentation

回答

相關問題