どのようにしてプログラム的に次のようにします.
私は私が取り組んでいるPowerPoint VBAプロジェクトを持っていますが、私はちょっと「noob」ですので、私はいくつかの助けが必要です:
私はこの質問をここに投稿しましたが、それはすぐに答えられているので、私はこの非常にこれをする必要がありました すぐ.
私は達成したい:
-ボタンを押すと3つのスライドがあり、3つのスライドのすべてのスライド「タブストリップ」というタブを「APP1」
に追加します.-同時にスライド2に行き、それは「App1」にタブストリップの選択だけを変更したいが、後で別のタブを追加し、固定順序にすることができないので数値的には変更されない.
-スライド2の別のボタンを押すと、すべてのスライドの「APP1」タブを削除し、スライド1
に移動します.-スライド2と3の他のタブ「デスクトップ」を押すと、スライド1に戻りたい.
私はこれまでに以下をやった:
スライド1のボタン:
ActivePresentation.Slides(1).Shapes( "TabStrip1").OLEFORMAT.OBJECT.TABS.ADD.CAPTITION= "APP1"
ActivePresentation.Slides(2).Shapes( "TabStrip1").OLEFORMAT.OBJECT.TABS.ADD.CAPTION= "APP1"
ActivePresentationSlideshowWindow.View.gotoslide 2
ActivePresentation.Slides(2).Shapes( "TabStrip1").OLEFORMAT.OBJECT.TABS(APP1).SELECTED= true
スライド2のボタン:
ActivePresentation.Slides(1,2,3).SHAPES( "TABSTRIP1").OLEFORMAT.OBJECT.TABS.REMOVE(APP1)
ActivePresentation.SlideshowWindow.View.Gotoslide 1
「デスクトップ」を押す
IFActivePresentation.Slides(2,3).Shapes( "TabStrip1").OLEFORMAT.OBJECT.TABS(デスクトップ).Selected=
trueNatePresentation.SlidEShowWindow.View.Gotoslide 1
'壊れていない
しかし、それはうまくいきません.任意のアイデア?
返信リスト(回答:2)
あなたはこのスレッドからコードを使うことができます
SelectionItemによってタブストリップからタブを削除しますか?
各スライドのタブストリップにアクセスするには、この
のような各ループにaを使用します.各vacypresentation.Slides
についてごとにts= s.shapes( "tabstrip1")を設定します.OLEFORMAT.Object
他のスレッドのようにコードの残りの部分.
アンドレアス