次の方法で共有

VisWebPageSettings.EndPage プロパティ

  • [アーティクル]

ページ範囲を Web ページとして保存するときに、範囲内の最後のページのページ番号を指定します。 値の取得と設定が可能です。

構文

式。EndPage

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

戻り値

Long

注釈

スタート ページ番号は、 StartPage プロパティで指定します。

EndPage プロパティの値は、[Web ページとして保存] ダイアログ ボックスの [全般] タブの [to] ボックスの値に対応します ([BackstageButton] タブの [名前を付けて保存>] >の種類リスト >Web ページ (*.htm;*.html)>Publish)。

例

次の Microsoft Visual Basic for Applications (VBA) マクロは、EndPage プロパティを使用して、図面全体ではなくページ範囲 (この場合は 2 ページ目から 3 ページ目) を Web ページとして保存する方法を示しています。

このマクロは、現在の Visio 図面に少なくとも 3 つのページが含まれていることを前提としています。

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

Public Sub EndPage_Example() 
 Dim vsoSaveAsWeb As VisSaveAsWeb 
 Dim vsoWebSettings As VisWebPageSettings 
 
 Set vsoSaveAsWeb = Visio.Application.SaveAsWebObject 
 Set vsoWebSettings = vsoSaveAsWeb.WebPageSettings 
 
 With vsoWebSettings 
 .StartPage = 2 
 .EndPage = 3 
 .TargetPath = "path\filename.htm" 
 End With 
 
 vsoSaveAsWeb.CreatePages 
End Sub

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

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