2011-08-17 86 views
1

我試圖插入的Shockwave Flash電影到PowerPoint 2010時,使用這樣的VBA值設置爲屬性的FlashVars:設定值FlashVars屬性不起作用

Dim s As Shape 
Set s = ActivePresentation.Slides(1).Shapes.AddOLEObject(0, 0, -1, -1, ClassName:="ShockwaveFlash.ShockwaveFlash") 

With s.OLEFormat.Object 
    .FlashVars = "parm1 = val1" 
    .EmbedMovie = True 
    .Movie = "D:\Samples\test.swf" 
End With 

但是,在執行設置命令後(s.OLEFormat.Object.FlashVars =「parm1 = val1」),FlashVars的值保持爲空。你對這種奇怪的行爲有什麼想法嗎?

感謝,

回答

0

我不知道以這種方式嵌入閃存的想法,但在瀏覽器中定義Flash變量對象的替代可以將變量追加到SWF文件名。如果沒有適當的解決方案,這可能值得一試。

.Movie = "D:\Samples\test.swf?parm1=var1"