Application.SmartArtQuickStyles プロパティ (Word)
アプリケーションに現在読み込まれている SmartArt のスタイルを表す SmartArtQuickStyles オブジェクトを取得します。 値の取得のみ可能です。
構文
式。 SmartArtQuickStyles
式 'Application' オブジェクトを返す式。
注釈
SmartArtQuickStyles プロパティによって表されるスタイルのセットは、 Wordで、 SmartArt ツール] コンテキスト タブの [デザイン] タブで、[ スタイル] で使用可能なスタイルに対応します。
例
次のコード例では、作業中の文書に SmartArt グラフィックを追加し、次にその SmartArt グラフィックのスタイルを [立体グラデーション] に設定します。
Dim myShape As Shape
Dim mySmartArt As SmartArt
Set myShape = ActiveDocument.Shapes.AddSmartArt(Application.SmartArtLayouts(1), 50, 50, 200, 200)
Set mySmartArt = myShape.SmartArt
mySmartArt.QuickStyle = Application.SmartArtQuickStyles.Item(6)
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。