generate word Activewindow

[Shinya]

How can I force to generate Activewindow event?

I tried going
Dim l_Handle as long
l_Handle = FindWndow( "", WordDocTitle)
SendMessage l_Handle, &H6, 0, ByVal 0&
I can find the word active document window, however,
SendMessage doesn't work to generate ActiveWindow
event.


Shinya