Hi,
there is an ole object, and I can write a number to excel by it, it is ok.
but I want to scroll down the sheet inside the ole, say 3, and ı can not do it

I tried ""xlBook.Worksheets("Sheet1").SmallScroll"" but I don't know exactly the syntax. it fails.

How can I do? thank you, have a nice day.


Option Explicit
Dim xlBook As Excel.Workbook

Private Sub Command1_Click()
Set xlBook = OLE1.object
OLE1.DoVerb vbOLEShow
xlBook.Worksheets("Sheet1").Cells(4, 4).Value = "1564897"
end sub