VisWebPageSettings.Stylesheet プロパティ

Microsoft Visio によって提供される、またはユーザーが作成したものが Web ページに適用されるカスケード スタイルシート (CSS) を指定します。 値の取得と設定が可能です。

構文

スタイル シート

VisWebPageSettings オブジェクトを返す式。

戻り値

String

注釈

スタイル シートは、Visio が提供するものと、自分で作成するものを選べます。 作成したスタイルシートを次のフォルダに保存すると、[名前を付けて保存] ダイアログ ボックスの [詳細設定] タブの [スタイル シート] ドロップダウン リストに表示されます ([BackstageButton] タブ >名前を付けて保存]>[名前を付けて保存] >[Web ページ] (*.htm;*.html)>発行>詳細設定)。

\ your_Visio_path\ your_language_ID\

Visio は、言語 ID (たとえば、1033) で CSS ファイルを検索することで、スタイルシートを識別します。

次の Microsoft Visual Basic for Applications (VBA) マクロは、スタイルシート プロパティを使用して、作成中の Web ページに (Visio で提供される) スチール スタイル シートを割り当てる方法を示しています。

このマクロを実行する前に、 path\filename.htm をコンピューター上の有効なターゲット パスと、Web ページに割り当てるファイル名に置き換えてください。 また、 your_Visio_pathyour_language_ID をコンピューター上の Visio スタイルシートへのパスに置き換えます。次に例を示します。

C:\Program Files\Microsoft Office\Visio14\1033...

Public Sub Stylesheet_Example() 
 Dim vsoSaveAsWeb As VisSaveAsWeb 
 Dim vsoWebSettings As VisWebPageSettings 
 
 Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
 Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings 
 
 With vsoWebSettings 
 .Stylesheet = "your_Visio_path\your_language_ID\Steel.css" 
 .TargetPath = "path\filename.htm" 
 End With 
 
 vsoSaveAsWeb.CreatePages 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。