iaccessible

Hi, This is a vba code that hopefully accomplishes what the title of the thread says. Obviously, the forms must be modeless so that the user can freely move from one form to aanother. Problem is, using modeless forms makes this task difficult as we cannot subclass modeless forms to properly...

Hi all, This is an attempt to simulate the Windows built-in screen-reader narrator but, done with vba alone. The code is supposed to read-back the type of object currently under the mouse pointer and, if applicable, to read the object caption\text\value as well. The code lets you choose a...

Hi all, As you know, the TypeOf operator cheks if an object implements a certain interface so the following 2 codes return TRUE as expected : in a userform module: Private Sub UserForm_Click() MsgBox TypeOf Me Is IAccessible End Sub The same goes for this : Private Sub Test1() MsgBox...

Hi dear members, I just thought I would share with you here this very small and simple vba function that I recently wrote for switching ribbon tabs. Option Explicit Function ActivateRibbonTab(ByVal TabName As String) As Boolean Const CHILDID_SELF = 0&, NAVDIR_FIRSTCHILD = 7&, NAVDIR_NEXT...

Workbook Demo Hi all , After much trial an error, I have come up with this generic mouse wheel scroll event :Public Sub OnScrollEvent(ByVal Obj As Object, ByVal WheelRotation As WHEEL_ROTATION, _ ByVal CtrlKey As CTRL_KEY_PRESS_STATE, ByVal X As Long, ByVal Y As...