VisWebPageSettings オブジェクト (Visio Web として保存)

Web ページの設定を含みます。

注釈

VisWebPageSettings オブジェクトは、Web ページのプロパティのコンテナーとして機能します。

VisWebPageSettings オブジェクトのプロパティの多くは、ユーザーが [ファイル] タブ >エクスポート>ファイルの種類の変更>Web ページ (*.htm)>名前を付けて保存] を選択したときに、[名前を付けて保存] ダイアログ ボックスで使用できる設定に対応しています。

たとえば、ブラウザーで Web ページが表示されたときにタイトル バーに表示されるタイトルを含む PageTitle プロパティは、[ページ タイトルの設定] ダイアログ ボックス ([名前を付けて保存] ダイアログ ボックス >タイトルの変更) の [ページ タイトル] ボックスの値に対応します。

また、DispScreenRes プロパティは、[名前を付けて保存] ダイアログ ボックス ([名前を付けて保存] ダイアログ ボックス ([名前を付けて保存] >>種類リストWeb ページ (*.htm;*.html)>発行) の [詳細設定] タブのターゲット モニター] リストで選択された値に対応します。

Web ページを作成する場合は、VisSaveAsWeb オブジェクトの WebPageSettings プロパティを使用して、次の例に示すように、VisWebPageSettings オブジェクトへの参照を取得します。このオブジェクトを使用して、Web ページのプロパティを設定できます。

Public Sub VisWebPageSettingsObject_Example() 
 Dim vsoWebSettings As VisWebPageSettings 
 Dim vsoSaveAsWeb As VisSaveAsWeb 
 
 ' Query Visio for the VisSaveAsWeb object. 
 Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
 
 ' Get a WebPageSettings object. 
 Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings 
 
 With vsoWebSettings 
 
 ' Set the title that is displayed in the browser's title bar. 
 .PageTitle = "AccountingDeptOrgChart082501" 
 
 ' Prevent dialog boxes from appearing in the user interface. 
 .QuietMode = True 
 End With 
 
 ' If you don't call the AttachToVisioDoc method to 
 ' identify a specific document, Visio saves the 
 ' active document by default. 
 vsoSaveAsWeb.CreatePages 
End Sub

注:

オブジェクト ブラウザーで VisWebPageSettings クラスを表示するには、プロジェクト内の [名前を付けて保存] Web ページ DLL への参照があることを確認します (Visual Basic エディター ウィンドウの [ツール] メニューの [参照] を選択し、[参照可能なライブラリ] の一覧の [Microsoft Visio 15.0 名前を付けて保存] チェック ボックスをオンにします)。

メソッド

プロパティ

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

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

  • Last updated on