| 投稿日 | ： 2005/09/09(Fri) 19:44 |
| 投稿者 | ： 藤代千尋 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re: OLEコンテナ上でのスライドの切り替えについて |
OLE コンテナは、無条件に最初のスライドを表示します。そして、通常の方法では、表示
するスライドを切り替えることが出来ません。
「最初のスライドなら」ということで、「最初のスライドを最後に持っていって、2 番目
のスライドを最初にしてしまう」という技も出来ます。ただ、遅いですが。(^^;
Dim prez As Object
Set prez = OLE1.object
With prez.Slides
.Item(1).MoveTo .Count
End With
OLE1.Refresh
「スライドショーをしたい」ということでしたら、
OLE1.DoVerb
です。ただし、全画面になります。ウインドウ内でスライドショーをする方法はないと思
われます。「ウインドウ内のスライドショー」を実行すると、パワーポイントが表示され
た上で、その中でスライドショーを開始してしまいます。(v_v)