TopOffset Property

expression.TopOffset

expression    Required. An expression that returns a PivotData object.

Remarks

Use the LeftOffset to scroll the data area to the left.

Example

This example scrolls the data area of PivotTable 1 down 45 pixels and left 45 pixels.

Sub ScrollDataArea()

    Dim ptData

    Set ptData = PivotTable1.ActiveData

    ' Scroll 45 pixels down.
    ptData.TopOffset = 45

    ' Scroll the data area to the left.
    ptData.LeftOffset = 45

End Sub