Powerpoint 2010 youtube嵌入问题

时间:2010-06-16 04:34:08

标签: vba youtube powerpoint powerpoint-vba

我知道这是更多与编程相关的网站,但我无法想到一个更好的地方问这个...无论如何,我试图使用新的嵌入视频网站功能,但它似乎被禁用。请帮帮忙?

alt text

1 个答案:

答案 0 :(得分:2)

好吧,我想我会把这变成一个编程问题,以便其他人也能以编程方式获益。

此处最可能的原因是您使用的是x64版本的PowerPoint 2010. help file状态:

  

PowerPoint 2010 64位不是   与32位版本兼容   QuickTime或Flash。你必须安装一个   64位版本的QuickTime或Flash,   或者是32位版本的PowerPoint   2010。

有点毫无意义,因为Flash或QT都没有64位版本。也就是说,您仍然可以使用代码以编程方式嵌入(实际上,“链接到”)文件,例如:

Sub InsertWebVideo()
Dim sl As Slide
Set sl = ActivePresentation.Slides(28)
sl.Shapes.AddMediaObjectFromEmbedTag EmbedTag:= _
        "<object width='640' height='385'>" & _
        "<param name='movie' value='http://www.youtube.com/v/gejJM3n2LHU&hl=en_US&fs=1&'>" & _
        "</param><param name='allowFullScreen' value='true'></param>" & _
        "<param name='allowscriptaccess' value='always'></param>" & _
        "<embed src='http://www.youtube.com/v/gejJM3n2LHU&hl=en_US&fs=1&' " & _
        "type='application/x-shockwave-flash' allowscriptaccess='always' " & _
        "allowfullscreen='true' width='640' height='385'></embed></object>"
End Sub

问题是这在x64上根本不起作用 - 幻灯片上出现一个对象,但没有任何反应。虽然Windows Media Player踢错了,但嵌入Silverlight似乎不起作用。如果您碰巧在网站上有WMV,请尝试使用<embed/>代码尝试上面的代码。