VBAのPublishObjectsコレクション

PublishObjectsコレクション

PublishObjectsコレクションについての解説になります。

PublishObjectsコレクションとは

PublishObjectsコレクションは、ブックに含まれるすべての PublishObject オブジェクトのコレクションです。各 PublishObject オブジェクトは、Web ページとして保存されたブック内のアイテムを表し、オブジェクトのプロパティに指定された値やメソッドに従って更新されます。

PublishObjects コレクションを取得するには、PublishObjects プロパティを使用します。次の使用例は、作業中のブックに含まれるすべての静的な PublishObject オブジェクトを Web ページとして保存します。


Set objPObjs = ActiveWorkbook.PublishObjects
For Each objPO in objPObjs
    If objPO.HtmlType = xlHTMLStatic Then
        objPO.Publish
    End If
Next objPO

単体の PublishObject オブジェクトを取得するには、PublishObjects(index) プロパティを使用します。引数 index には、ブック内で指定されたアイテムのインデックス番号を指定します。次の使用例は、ブック 3 の先頭アイテムを保存する場所を設定します。


Workbooks(3).PublishObjects(1).FileName = _
    "\\myserver\public\finacct\statemnt.htm"

シート見出しの色を設定するサンプルコード

こちらでは、シート見出しの色を設定するマクロになります。


Sub sample()

    Sheets("Sheet1").Tab.ColorIndex = 3

End Sub

実行結果

解説

こちらのマクロは、PublishObjectsコレクションのColorIndexプロパティを利用しています。

PublishObjectsコレクションの親オブジェクト一覧

親オブジェクト名	内容
Chartオブジェクト	ブック内のグラフを表します。ChartObject オブジェクトに含まれている埋め込みグラフか、独立したグラフシートのどちらかのグラフです。
Worksheetオブジェクト