RulerGuides オブジェクト (Publisher)
RulerGuide のコレクション ページ上のオブジェクトを整列するために使用するグリッド線を表すオブジェクト。
注釈
RulerGuides コレクションにルーラーグリッド線を追加するには、 Add メソッドを使用します。
コレクション内のルーラー ガイドの合計数 (水平方向と垂直方向) を返すには、 Count プロパティを使用します。
例
次の使用例は、作業中の文書の先頭ページに 0.5 インチ間隔で水平方向および垂直方向のルーラー ガイドを作成します。
Sub SetRulerGuides()
Dim intCount As Integer
Dim intPos As Integer
With ActiveDocument.Pages(1).RulerGuides
For intCount = 1 To 16
intPos = intPos + 36
.Add Position:=intPos, Type:=pbRulerGuideTypeVertical
Next intCount
intPos = 0
For intCount = 1 To 21
intPos = intPos + 36
.Add Position:=intPos, Type:=pbRulerGuideTypeHorizontal
Next intCount
End With
End Sub
次の使用例は、Count プロパティを使用して、コレクション内の各ルーラー ガイドを削除します。
Sub RemoveAllGuides()
Dim intCount As Integer
With ActiveDocument.Pages(1).RulerGuides
For intCount = 1 To .Count
.Item(1).Delete
Next intCount
End With
End Sub
メソッド
プロパティ
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。