Forum Discussion
vajindarladdad
12 years agoFrequent Contributor
Hi Ravi,
Please have a look at HScroll & VScroll Object of the Window which has the scroll bars.
I have created a test project for the same.
Please have a look at it , if the problem still persists , please let me know.
***********
Public Function TestNotepadScroll()
Dim HScrollObj , VScrollObj
Dim HPos , VPos
TestedApps.notepad.Run()
Set HScrollObj = Aliases.notepad.wndNotepad.Edit.HScroll
Set VScrollObj = Aliases.notepad.wndNotepad.Edit.VScroll
HPos = HScrollObj.Pos
VScrollObj.Pos=34 ' Set the scroll position for Horizontal scroll bar
End Function
***********
I hope this has been of some help.