Scroll sheet to the right

[hfkchristian]

Hi

I want to make a button which can zoom in the current sheet, and then scroll it to the right. For the zoom I use this:

set mysheet=ActiveDocument.ActiveSheet
set sp=mysheet.GetProperties
sp.ZoomFactor = 1.5
mysheet.SetProperties sp

But I can't find any property (or setting elsewhere) to automatically scroll the sheet. Whenever I zoom in, it always scrolls to the left.

Is it possible to make the sheet scroll to the right while zooming?